Audio plugin host https://kx.studio/carla
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

1086 lines
64KB

  1. /*
  2. * ZamTube triode WDF distortion model
  3. * Copyright (C) 2014 Damien Zammit <damien@zamaudio.com>
  4. *
  5. * This program is free software; you can redistribute it and/or
  6. * modify it under the terms of the GNU General Public License as
  7. * published by the Free Software Foundation; either version 2 of
  8. * the License, or any later version.
  9. *
  10. * This program is distributed in the hope that it will be useful,
  11. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  13. * GNU General Public License for more details.
  14. *
  15. * For a full copy of the GNU General Public License see the doc/GPL.txt file.
  16. *
  17. * Tone Stacks from David Yeh's faust implementation.
  18. *
  19. */
  20. #include "ZamTubePlugin.hpp"
  21. START_NAMESPACE_DISTRHO
  22. // -----------------------------------------------------------------------
  23. ZamTubePlugin::ZamTubePlugin()
  24. : Plugin(paramCount, 1, 0), // 1 program, 0 states
  25. Vi(0.0,10000.0), Ci(0.0000001,48000.0), Ck(0.00001,48000.0), Co(0.00000001,48000.0), Ro(1000000.0), Rg(20000.0),
  26. Ri(1000000.0), Rk(1000.0), E(250.0,100000.0),
  27. S0(&Ci,&Vi), I0(&S0), P0(&I0,&Ri), S1(&Rg,&P0),
  28. I1(&S1), I3(&Ck,&Rk), S2(&Co,&Ro), I4(&S2), P2(&I4,&E)
  29. {
  30. // set default values
  31. d_setProgram(0);
  32. }
  33. // -----------------------------------------------------------------------
  34. // Init
  35. void ZamTubePlugin::d_initParameter(uint32_t index, Parameter& parameter)
  36. {
  37. switch (index)
  38. {
  39. case paramTubedrive:
  40. parameter.hints = PARAMETER_IS_AUTOMABLE;
  41. parameter.name = "Tube Drive";
  42. parameter.symbol = "tubedrive";
  43. parameter.unit = " ";
  44. parameter.ranges.def = 0.0f;
  45. parameter.ranges.min = -30.0f;
  46. parameter.ranges.max = 30.0f;
  47. break;
  48. case paramBass:
  49. parameter.hints = PARAMETER_IS_AUTOMABLE;
  50. parameter.name = "Bass";
  51. parameter.symbol = "bass";
  52. parameter.unit = " ";
  53. parameter.ranges.def = 0.5f;
  54. parameter.ranges.min = 0.0f;
  55. parameter.ranges.max = 1.0f;
  56. break;
  57. case paramMiddle:
  58. parameter.hints = PARAMETER_IS_AUTOMABLE;
  59. parameter.name = "Mids";
  60. parameter.symbol = "mids";
  61. parameter.unit = " ";
  62. parameter.ranges.def = 0.5f;
  63. parameter.ranges.min = 0.0f;
  64. parameter.ranges.max = 1.0f;
  65. break;
  66. case paramTreble:
  67. parameter.hints = PARAMETER_IS_AUTOMABLE;
  68. parameter.name = "Treble";
  69. parameter.symbol = "treb";
  70. parameter.unit = " ";
  71. parameter.ranges.def = 0.0f;
  72. parameter.ranges.min = 0.0f;
  73. parameter.ranges.max = 1.0f;
  74. break;
  75. case paramToneStack:
  76. parameter.hints = PARAMETER_IS_AUTOMABLE | PARAMETER_IS_INTEGER;
  77. parameter.name = "Tone Stack Model";
  78. parameter.symbol = "tonestack";
  79. parameter.unit = " ";
  80. parameter.ranges.def = 0.0f;
  81. parameter.ranges.min = 0.0f;
  82. parameter.ranges.max = 24.0f;
  83. break;
  84. case paramGain:
  85. parameter.hints = PARAMETER_IS_AUTOMABLE;
  86. parameter.name = "Output level";
  87. parameter.symbol = "gain";
  88. parameter.unit = " ";
  89. parameter.ranges.def = 0.0f;
  90. parameter.ranges.min = -15.0f;
  91. parameter.ranges.max = 15.0f;
  92. break;
  93. }
  94. }
  95. void ZamTubePlugin::d_initProgramName(uint32_t index, d_string& programName)
  96. {
  97. if (index != 0)
  98. return;
  99. programName = "Default";
  100. }
  101. // -----------------------------------------------------------------------
  102. // Internal data
  103. float ZamTubePlugin::d_getParameterValue(uint32_t index) const
  104. {
  105. switch (index)
  106. {
  107. case paramTubedrive:
  108. return tubedrive;
  109. break;
  110. case paramBass:
  111. return bass;
  112. break;
  113. case paramMiddle:
  114. return middle;
  115. break;
  116. case paramTreble:
  117. return treble;
  118. break;
  119. case paramToneStack:
  120. return tonestack;
  121. break;
  122. case paramGain:
  123. return mastergain;
  124. break;
  125. default:
  126. return 0.0f;
  127. }
  128. }
  129. void ZamTubePlugin::d_setParameterValue(uint32_t index, float value)
  130. {
  131. switch (index)
  132. {
  133. case paramTubedrive:
  134. tubedrive = value;
  135. break;
  136. case paramBass:
  137. bass = value;
  138. break;
  139. case paramMiddle:
  140. middle = value;
  141. break;
  142. case paramTreble:
  143. treble = value;
  144. break;
  145. case paramToneStack:
  146. tonestack = value;
  147. break;
  148. case paramGain:
  149. mastergain = value;
  150. break;
  151. }
  152. }
  153. void ZamTubePlugin::d_setProgram(uint32_t index)
  154. {
  155. if (index != 0)
  156. return;
  157. /* Default parameter values */
  158. tubedrive = 0.0f;
  159. bass = 0.5f;
  160. middle = 0.5f;
  161. treble = 0.0f;
  162. tonestack = 0.0f;
  163. mastergain = 0.0f;
  164. /* Default variable values */
  165. /* reset filter values */
  166. d_activate();
  167. }
  168. // -----------------------------------------------------------------------
  169. // Process
  170. void ZamTubePlugin::d_activate()
  171. {
  172. T Fs = d_getSampleRate();
  173. // Passive components
  174. T ci = 0.0000001; //100nF
  175. T ck = 0.00001; //10uF
  176. T co = 0.00000001; //10nF
  177. T ro = 1000000.0; //1Mohm
  178. T rp = 100000.0; //100kohm
  179. T rg = 20000.0; //20kohm
  180. T ri = 1000000.0; //1Mohm
  181. T rk = 1000.0; //1kohm
  182. e = 250.0; //250V
  183. Vi = V(0.0,10000.0); //1kohm internal resistance
  184. Ci = C(ci, Fs);
  185. Ck = C(ck, Fs);
  186. Co = C(co, Fs);
  187. Ro = R(ro);
  188. Rg = R(rg);
  189. Ri = R(ri);
  190. Rk = R(rk);
  191. E = V(e, rp);
  192. //Official
  193. //->Gate
  194. S0 = ser(&Ci, &Vi);
  195. I0 = inv(&S0);
  196. P0 = par(&I0, &Ri);
  197. S1 = ser(&Rg, &P0);
  198. I1 = inv(&S1);
  199. //->Cathode
  200. I3 = par(&Ck, &Rk);
  201. //->Plate
  202. S2 = ser(&Co, &Ro);
  203. I4 = inv(&S2);
  204. P2 = par(&I4, &E);
  205. // 12AX7 triode model RSD-1
  206. v.g1 = 2.242e-3;
  207. v.mu1 = 103.2;
  208. v.gamma1 = 1.26;
  209. v.c1 = 3.4;
  210. v.gg1 = 6.177e-4;
  211. v.e1 = 1.314;
  212. v.cg1 = 9.901;
  213. v.ig01 = 8.025e-8;
  214. // 12AX7 triode model EHX-1
  215. v.g2 = 1.371e-3;
  216. v.mu2 = 86.9;
  217. v.gamma2 = 1.349;
  218. v.c2 = 4.56;
  219. v.gg2 = 3.263e-4;
  220. v.e2 = 1.156;
  221. v.cg2 = 11.99;
  222. v.ig02 = 3.917e-8;
  223. fSamplingFreq = Fs;
  224. fConst0 = float(min(192000, max(1, fSamplingFreq)));
  225. fConst1 = (2 * fConst0);
  226. fConst2 = faustpower<2>(fConst1);
  227. fConst3 = (3 * fConst1);
  228. for (int i=0; i<4; i++) fRec0[i] = 0;
  229. for (int i=0; i<4; i++) fRec1[i] = 0;
  230. for (int i=0; i<4; i++) fRec2[i] = 0;
  231. for (int i=0; i<4; i++) fRec3[i] = 0;
  232. for (int i=0; i<4; i++) fRec4[i] = 0;
  233. for (int i=0; i<4; i++) fRec5[i] = 0;
  234. for (int i=0; i<4; i++) fRec6[i] = 0;
  235. for (int i=0; i<4; i++) fRec7[i] = 0;
  236. for (int i=0; i<4; i++) fRec8[i] = 0;
  237. for (int i=0; i<4; i++) fRec9[i] = 0;
  238. for (int i=0; i<4; i++) fRec10[i] = 0;
  239. for (int i=0; i<4; i++) fRec11[i] = 0;
  240. for (int i=0; i<4; i++) fRec12[i] = 0;
  241. for (int i=0; i<4; i++) fRec13[i] = 0;
  242. fConst4 = (1.0691560000000003e-08f * fConst1);
  243. fConst5 = (3.2074680000000005e-08f * fConst1);
  244. for (int i=0; i<4; i++) fRec14[i] = 0;
  245. fConst6 = (0.044206800000000004f * fConst0);
  246. for (int i=0; i<4; i++) fRec15[i] = 0;
  247. for (int i=0; i<4; i++) fRec16[i] = 0;
  248. for (int i=0; i<4; i++) fRec17[i] = 0;
  249. for (int i=0; i<4; i++) fRec18[i] = 0;
  250. for (int i=0; i<4; i++) fRec19[i] = 0;
  251. for (int i=0; i<4; i++) fRec20[i] = 0;
  252. for (int i=0; i<4; i++) fRec21[i] = 0;
  253. for (int i=0; i<4; i++) fRec22[i] = 0;
  254. for (int i=0; i<4; i++) fRec23[i] = 0;
  255. for (int i=0; i<4; i++) fRec24[i] = 0;
  256. }
  257. void ZamTubePlugin::d_run(const float** inputs, float** outputs, uint32_t frames)
  258. {
  259. T tubetone = 0.f;
  260. //12AX7 triode tube mod
  261. v.g = v.g1 + (v.g2-v.g1)*tubetone;
  262. v.mu = v.mu1 + (v.mu2-v.mu1)*tubetone;
  263. v.gamma = v.gamma1 + (v.gamma2-v.gamma1)*tubetone;
  264. v.c = v.c1 + (v.c2-v.c1)*tubetone;
  265. v.gg = v.gg1 + (v.gg2-v.gg1)*tubetone;
  266. v.e = v.e1 + (v.e2-v.e1)*tubetone;
  267. v.cg = v.cg1 + (v.cg2-v.cg1)*tubetone;
  268. v.ig0 = v.ig01 + (v.ig02-v.ig01)*tubetone;
  269. float fSlow0 = middle;
  270. float fSlow1 = (1.3784375e-06f * fSlow0);
  271. float fSlow2 = expf((3.4f * (bass - 1)));
  272. float fSlow3 = (8.396625e-06f + ((7.405375e-05f * fSlow2) + (fSlow0 * (((1.3784375000000003e-05f * fSlow2) - 5.7371875e-06f) - fSlow1))));
  273. float fSlow4 = ((1.3062500000000001e-09f * fSlow2) - (1.30625e-10f * fSlow0));
  274. float fSlow5 = (4.468750000000001e-09f * fSlow2);
  275. float fSlow6 = (4.46875e-10f + (fSlow5 + (fSlow0 * (fSlow4 - 3.1625e-10f))));
  276. float fSlow7 = (fConst1 * fSlow6);
  277. float fSlow8 = (0.00055f * fSlow0);
  278. float fSlow9 = (0.0250625f * fSlow2);
  279. float fSlow10 = (fConst1 * (0.01842875f + (fSlow9 + fSlow8)));
  280. float fSlow11 = ((fSlow10 + (fConst2 * (fSlow7 - fSlow3))) - 1);
  281. float fSlow12 = (fConst3 * fSlow6);
  282. float fSlow13 = ((fConst2 * (fSlow3 + fSlow12)) - (3 + fSlow10));
  283. float fSlow14 = ((fSlow10 + (fConst2 * (fSlow3 - fSlow12))) - 3);
  284. float fSlow15 = (0 - (1 + (fSlow10 + (fConst2 * (fSlow3 + fSlow7)))));
  285. float fSlow16 = (1.0f / fSlow15);
  286. float fSlow17 = treble;
  287. float fSlow18 = ((fSlow0 * (1.30625e-10f + fSlow4)) + (fSlow17 * ((4.46875e-10f - (4.46875e-10f * fSlow0)) + fSlow5)));
  288. float fSlow19 = (fConst3 * fSlow18);
  289. float fSlow20 = (2.55375e-07f + (((9.912500000000003e-07f * fSlow17) + (fSlow0 * (1.4128125e-06f - fSlow1))) + (fSlow2 * (2.5537500000000007e-06f + (1.3784375000000003e-05f * fSlow0)))));
  290. float fSlow21 = (6.25e-05f * fSlow17);
  291. float fSlow22 = (fSlow8 + fSlow21);
  292. float fSlow23 = (0.0025062500000000002f + (fSlow9 + fSlow22));
  293. float fSlow24 = (fConst1 * fSlow23);
  294. float fSlow25 = (fSlow24 + (fConst2 * (fSlow20 - fSlow19)));
  295. float fSlow26 = (fConst1 * fSlow18);
  296. float fSlow27 = (fSlow24 + (fConst2 * (fSlow26 - fSlow20)));
  297. float fSlow28 = (fConst1 * (0 - fSlow23));
  298. float fSlow29 = (fSlow28 + (fConst2 * (fSlow20 + fSlow19)));
  299. float fSlow30 = (fSlow28 - (fConst2 * (fSlow20 + fSlow26)));
  300. float fSlow31 = tonestack;
  301. float fSlow32 = ((fSlow31 == 23) / fSlow15);
  302. float fSlow33 = (1.0607618000000002e-05f * fSlow0);
  303. float fSlow34 = (3.1187760000000004e-05f + ((0.00032604000000000004f * fSlow2) + (fSlow0 * (((0.00011284700000000001f * fSlow2) - 1.9801382e-05f) - fSlow33))));
  304. float fSlow35 = ((3.5814000000000013e-09f * fSlow2) - (3.3665160000000007e-10f * fSlow0));
  305. float fSlow36 = (8.100000000000003e-09f * fSlow2);
  306. float fSlow37 = (7.614000000000002e-10f + (fSlow36 + (fSlow0 * (fSlow35 - 4.247484000000001e-10f))));
  307. float fSlow38 = (fConst1 * fSlow37);
  308. float fSlow39 = (0.00188f * fSlow0);
  309. float fSlow40 = (0.060025f * fSlow2);
  310. float fSlow41 = (fConst1 * (0.027267350000000003f + (fSlow40 + fSlow39)));
  311. float fSlow42 = ((fSlow41 + (fConst2 * (fSlow38 - fSlow34))) - 1);
  312. float fSlow43 = (fConst3 * fSlow37);
  313. float fSlow44 = ((fConst2 * (fSlow34 + fSlow43)) - (3 + fSlow41));
  314. float fSlow45 = ((fSlow41 + (fConst2 * (fSlow34 - fSlow43))) - 3);
  315. float fSlow46 = (0 - (1 + (fSlow41 + (fConst2 * (fSlow34 + fSlow38)))));
  316. float fSlow47 = (1.0f / fSlow46);
  317. float fSlow48 = ((fSlow0 * (3.3665160000000007e-10f + fSlow35)) + (fSlow17 * ((7.614000000000002e-10f - (7.614000000000002e-10f * fSlow0)) + fSlow36)));
  318. float fSlow49 = (fConst3 * fSlow48);
  319. float fSlow50 = (1.9176000000000002e-07f + (((5.400000000000001e-07f * fSlow17) + (fSlow0 * (1.0654618000000002e-05f - fSlow33))) + (fSlow2 * (2.0400000000000004e-06f + (0.00011284700000000001f * fSlow0)))));
  320. float fSlow51 = (2.5e-05f * fSlow17);
  321. float fSlow52 = (0.005642350000000001f + (fSlow40 + (fSlow39 + fSlow51)));
  322. float fSlow53 = (fConst1 * fSlow52);
  323. float fSlow54 = (fSlow53 + (fConst2 * (fSlow50 - fSlow49)));
  324. float fSlow55 = (fConst1 * fSlow48);
  325. float fSlow56 = (fSlow53 + (fConst2 * (fSlow55 - fSlow50)));
  326. float fSlow57 = (fConst1 * (0 - fSlow52));
  327. float fSlow58 = (fSlow57 + (fConst2 * (fSlow50 + fSlow49)));
  328. float fSlow59 = (fSlow57 - (fConst2 * (fSlow50 + fSlow55)));
  329. float fSlow60 = ((fSlow31 == 24) / fSlow46);
  330. float fSlow61 = (4.7117500000000004e-07f * fSlow0);
  331. float fSlow62 = (0.00011998125000000002f * fSlow2);
  332. float fSlow63 = (5.718000000000001e-06f + (fSlow62 + (fSlow0 * (((1.1779375000000001e-05f * fSlow2) - 4.199450000000001e-06f) - fSlow61))));
  333. float fSlow64 = ((1.0281250000000001e-09f * fSlow2) - (4.1125e-11f * fSlow0));
  334. float fSlow65 = (7.343750000000001e-09f * fSlow2);
  335. float fSlow66 = (2.9375e-10f + (fSlow65 + (fSlow0 * (fSlow64 - 2.52625e-10f))));
  336. float fSlow67 = (fConst1 * fSlow66);
  337. float fSlow68 = (0.00047000000000000004f * fSlow0);
  338. float fSlow69 = (fConst1 * (0.015765f + (fSlow9 + fSlow68)));
  339. float fSlow70 = ((fSlow69 + (fConst2 * (fSlow67 - fSlow63))) - 1);
  340. float fSlow71 = (fConst3 * fSlow66);
  341. float fSlow72 = ((fConst2 * (fSlow63 + fSlow71)) - (3 + fSlow69));
  342. float fSlow73 = ((fSlow69 + (fConst2 * (fSlow63 - fSlow71))) - 3);
  343. float fSlow74 = (0 - (1 + (fSlow69 + (fConst2 * (fSlow63 + fSlow67)))));
  344. float fSlow75 = (1.0f / fSlow74);
  345. float fSlow76 = ((fSlow0 * (4.1125e-11f + fSlow64)) + (fSlow17 * ((2.9375e-10f - (2.9375e-10f * fSlow0)) + fSlow65)));
  346. float fSlow77 = (fConst3 * fSlow76);
  347. float fSlow78 = (9.187500000000001e-07f * fSlow17);
  348. float fSlow79 = (9.925e-08f + ((fSlow78 + (fSlow0 * (5.0055e-07f - fSlow61))) + (fSlow2 * (2.48125e-06f + (1.1779375000000001e-05f * fSlow0)))));
  349. float fSlow80 = (0.0010025f + (fSlow9 + (fSlow21 + fSlow68)));
  350. float fSlow81 = (fConst1 * fSlow80);
  351. float fSlow82 = (fSlow81 + (fConst2 * (fSlow79 - fSlow77)));
  352. float fSlow83 = (fConst1 * fSlow76);
  353. float fSlow84 = (fSlow81 + (fConst2 * (fSlow83 - fSlow79)));
  354. float fSlow85 = (fConst1 * (0 - fSlow80));
  355. float fSlow86 = (fSlow85 + (fConst2 * (fSlow79 + fSlow77)));
  356. float fSlow87 = (fSlow85 - (fConst2 * (fSlow79 + fSlow83)));
  357. float fSlow88 = ((fSlow31 == 22) / fSlow74);
  358. float fSlow89 = (3.059375000000001e-07f * fSlow0);
  359. float fSlow90 = (1.5468750000000003e-06f + ((1.2718750000000003e-05f * fSlow2) + (fSlow0 * (((3.0593750000000007e-06f * fSlow2) - 8.696875000000003e-07f) - fSlow89))));
  360. float fSlow91 = ((2.646875e-10f * fSlow2) - (2.6468750000000002e-11f * fSlow0));
  361. float fSlow92 = (7.5625e-10f * fSlow2);
  362. float fSlow93 = (7.562500000000001e-11f + (fSlow92 + (fSlow0 * (fSlow91 - 4.915625000000001e-11f))));
  363. float fSlow94 = (fConst1 * fSlow93);
  364. float fSlow95 = (0.005562500000000001f * fSlow2);
  365. float fSlow96 = (fConst1 * (0.005018750000000001f + (fSlow8 + fSlow95)));
  366. float fSlow97 = ((fSlow96 + (fConst2 * (fSlow94 - fSlow90))) - 1);
  367. float fSlow98 = (fConst3 * fSlow93);
  368. float fSlow99 = ((fConst2 * (fSlow90 + fSlow98)) - (3 + fSlow96));
  369. float fSlow100 = ((fSlow96 + (fConst2 * (fSlow90 - fSlow98))) - 3);
  370. float fSlow101 = (0 - (1 + (fSlow96 + (fConst2 * (fSlow90 + fSlow94)))));
  371. float fSlow102 = (1.0f / fSlow101);
  372. float fSlow103 = ((fSlow0 * (2.6468750000000002e-11f + fSlow91)) + (fSlow17 * ((7.562500000000001e-11f - (7.562500000000001e-11f * fSlow0)) + fSlow92)));
  373. float fSlow104 = (fConst3 * fSlow103);
  374. float fSlow105 = (6.1875e-08f + (((2.75e-07f * fSlow17) + (fSlow0 * (3.403125000000001e-07f - fSlow89))) + (fSlow2 * (6.1875e-07f + (3.0593750000000007e-06f * fSlow0)))));
  375. float fSlow106 = (0.00055625f + (fSlow22 + fSlow95));
  376. float fSlow107 = (fConst1 * fSlow106);
  377. float fSlow108 = (fSlow107 + (fConst2 * (fSlow105 - fSlow104)));
  378. float fSlow109 = (fConst1 * fSlow103);
  379. float fSlow110 = (fSlow107 + (fConst2 * (fSlow109 - fSlow105)));
  380. float fSlow111 = (fConst1 * (0 - fSlow106));
  381. float fSlow112 = (fSlow111 + (fConst2 * (fSlow105 + fSlow104)));
  382. float fSlow113 = (fSlow111 - (fConst2 * (fSlow105 + fSlow109)));
  383. float fSlow114 = ((fSlow31 == 21) / fSlow101);
  384. float fSlow115 = (2.2193400000000003e-07f * fSlow0);
  385. float fSlow116 = (2.7073879999999998e-06f + ((4.9553415999999996e-05f * fSlow2) + (fSlow0 * (((4.882548000000001e-06f * fSlow2) - 1.964318e-06f) - fSlow115))));
  386. float fSlow117 = ((3.4212992000000004e-10f * fSlow2) - (1.5551360000000004e-11f * fSlow0));
  387. float fSlow118 = (2.3521432000000003e-09f * fSlow2);
  388. float fSlow119 = (1.0691560000000001e-10f + (fSlow118 + (fSlow0 * (fSlow117 - 9.136424e-11f))));
  389. float fSlow120 = (fConst1 * fSlow119);
  390. float fSlow121 = (0.0103884f * fSlow2);
  391. float fSlow122 = (fConst1 * (0.009920600000000002f + (fSlow68 + fSlow121)));
  392. float fSlow123 = ((fSlow122 + (fConst2 * (fSlow120 - fSlow116))) - 1);
  393. float fSlow124 = (fConst3 * fSlow119);
  394. float fSlow125 = ((fConst2 * (fSlow116 + fSlow124)) - (3 + fSlow122));
  395. float fSlow126 = ((fSlow122 + (fConst2 * (fSlow116 - fSlow124))) - 3);
  396. float fSlow127 = (0 - (1 + (fSlow122 + (fConst2 * (fSlow116 + fSlow120)))));
  397. float fSlow128 = (1.0f / fSlow127);
  398. float fSlow129 = ((fSlow0 * (1.5551360000000004e-11f + fSlow117)) + (fSlow17 * ((1.0691560000000001e-10f - (1.0691560000000001e-10f * fSlow0)) + fSlow118)));
  399. float fSlow130 = (fConst3 * fSlow129);
  400. float fSlow131 = (4.3428e-08f + (((4.5496e-07f * fSlow17) + (fSlow0 * (2.4468200000000005e-07f - fSlow115))) + (fSlow2 * (9.55416e-07f + (4.882548000000001e-06f * fSlow0)))));
  401. float fSlow132 = (0.00047220000000000004f + (fSlow121 + (fSlow68 + (4.84e-05f * fSlow17))));
  402. float fSlow133 = (fConst1 * fSlow132);
  403. float fSlow134 = (fSlow133 + (fConst2 * (fSlow131 - fSlow130)));
  404. float fSlow135 = (fConst1 * fSlow129);
  405. float fSlow136 = (fSlow133 + (fConst2 * (fSlow135 - fSlow131)));
  406. float fSlow137 = (fConst1 * (0 - fSlow132));
  407. float fSlow138 = (fSlow137 + (fConst2 * (fSlow131 + fSlow130)));
  408. float fSlow139 = (fSlow137 - (fConst2 * (fSlow131 + fSlow135)));
  409. float fSlow140 = ((fSlow31 == 20) / fSlow127);
  410. float fSlow141 = (2.3926056000000006e-07f * fSlow0);
  411. float fSlow142 = (1.0875480000000001e-05f * fSlow2);
  412. float fSlow143 = (1.1144196800000003e-06f + ((3.659304000000001e-05f * fSlow2) + (fSlow0 * ((fSlow142 - 4.347578400000001e-07f) - fSlow141))));
  413. float fSlow144 = ((1.4413132800000006e-09f * fSlow2) - (3.1708892160000014e-11f * fSlow0));
  414. float fSlow145 = (3.403100800000001e-09f * fSlow2);
  415. float fSlow146 = (7.486821760000003e-11f + (fSlow145 + (fSlow0 * (fSlow144 - 4.315932544000001e-11f))));
  416. float fSlow147 = (fConst1 * fSlow146);
  417. float fSlow148 = (0.00048400000000000006f * fSlow0);
  418. float fSlow149 = (0.022470000000000004f * fSlow2);
  419. float fSlow150 = (fSlow149 + fSlow148);
  420. float fSlow151 = (fConst1 * (0.00358974f + fSlow150));
  421. float fSlow152 = ((fSlow151 + (fConst2 * (fSlow147 - fSlow143))) - 1);
  422. float fSlow153 = (fConst3 * fSlow146);
  423. float fSlow154 = ((fConst2 * (fSlow143 + fSlow153)) - (3 + fSlow151));
  424. float fSlow155 = ((fSlow151 + (fConst2 * (fSlow143 - fSlow153))) - 3);
  425. float fSlow156 = (0 - (1 + (fSlow151 + (fConst2 * (fSlow143 + fSlow147)))));
  426. float fSlow157 = (1.0f / fSlow156);
  427. float fSlow158 = ((fSlow0 * (3.1708892160000014e-11f + fSlow144)) + (fSlow17 * ((7.486821760000003e-11f - (7.486821760000003e-11f * fSlow0)) + fSlow145)));
  428. float fSlow159 = (fConst3 * fSlow158);
  429. float fSlow160 = (1.0875480000000001e-05f * fSlow0);
  430. float fSlow161 = (fSlow0 * (2.893061600000001e-07f - fSlow141));
  431. float fSlow162 = (8.098288000000002e-08f + (((3.0937280000000007e-07f * fSlow17) + fSlow161) + (fSlow2 * (3.6810400000000007e-06f + fSlow160))));
  432. float fSlow163 = (0.00049434f + (fSlow149 + (fSlow148 + (0.0001034f * fSlow17))));
  433. float fSlow164 = (fConst1 * fSlow163);
  434. float fSlow165 = (fSlow164 + (fConst2 * (fSlow162 - fSlow159)));
  435. float fSlow166 = (fConst1 * fSlow158);
  436. float fSlow167 = (fSlow164 + (fConst2 * (fSlow166 - fSlow162)));
  437. float fSlow168 = (fConst1 * (0 - fSlow163));
  438. float fSlow169 = (fSlow168 + (fConst2 * (fSlow162 + fSlow159)));
  439. float fSlow170 = (fSlow168 - (fConst2 * (fSlow162 + fSlow166)));
  440. float fSlow171 = ((fSlow31 == 19) / fSlow156);
  441. float fSlow172 = (7.790052600000002e-07f * fSlow0);
  442. float fSlow173 = (1.4106061200000003e-06f + ((3.7475640000000014e-05f * fSlow2) + (fSlow0 * (((2.3606220000000006e-05f * fSlow2) - 3.2220474e-07f) - fSlow172))));
  443. float fSlow174 = ((1.5406083e-09f * fSlow2) - (5.08400739e-11f * fSlow0));
  444. float fSlow175 = (1.9775250000000004e-09f * fSlow2);
  445. float fSlow176 = (6.5258325e-11f + (fSlow175 + (fSlow0 * (fSlow174 - 1.4418251099999996e-11f))));
  446. float fSlow177 = (fConst1 * fSlow176);
  447. float fSlow178 = (0.001551f * fSlow0);
  448. float fSlow179 = (0.015220000000000001f * fSlow2);
  449. float fSlow180 = (fConst1 * (0.0037192600000000003f + (fSlow179 + fSlow178)));
  450. float fSlow181 = ((fSlow180 + (fConst2 * (fSlow177 - fSlow173))) - 1);
  451. float fSlow182 = (fConst3 * fSlow176);
  452. float fSlow183 = ((fConst2 * (fSlow173 + fSlow182)) - (3 + fSlow180));
  453. float fSlow184 = ((fSlow180 + (fConst2 * (fSlow173 - fSlow182))) - 3);
  454. float fSlow185 = (0 - (1 + (fSlow180 + (fConst2 * (fSlow173 + fSlow177)))));
  455. float fSlow186 = (1.0f / fSlow185);
  456. float fSlow187 = ((fSlow0 * (5.08400739e-11f + fSlow174)) + (fSlow17 * ((6.5258325e-11f - (6.5258325e-11f * fSlow0)) + fSlow175)));
  457. float fSlow188 = (fConst3 * fSlow187);
  458. float fSlow189 = (5.018112e-08f + (((1.7391e-07f * fSlow17) + (fSlow0 * (8.643102600000002e-07f - fSlow172))) + (fSlow2 * (1.5206400000000001e-06f + (2.3606220000000006e-05f * fSlow0)))));
  459. float fSlow190 = (0.0005022600000000001f + (fSlow179 + (fSlow178 + (5.4999999999999995e-05f * fSlow17))));
  460. float fSlow191 = (fConst1 * fSlow190);
  461. float fSlow192 = (fSlow191 + (fConst2 * (fSlow189 - fSlow188)));
  462. float fSlow193 = (fConst1 * fSlow187);
  463. float fSlow194 = (fSlow191 + (fConst2 * (fSlow193 - fSlow189)));
  464. float fSlow195 = (fConst1 * (0 - fSlow190));
  465. float fSlow196 = (fSlow195 + (fConst2 * (fSlow189 + fSlow188)));
  466. float fSlow197 = (fSlow195 - (fConst2 * (fSlow189 + fSlow193)));
  467. float fSlow198 = ((fSlow31 == 18) / fSlow185);
  468. float fSlow199 = (4.7047000000000006e-07f * fSlow0);
  469. float fSlow200 = (5.107200000000001e-06f + ((0.00011849250000000002f * fSlow2) + (fSlow0 * (((1.1761750000000001e-05f * fSlow2) - 4.217780000000001e-06f) - fSlow199))));
  470. float fSlow201 = ((4.1125e-10f * fSlow2) - (1.645e-11f * fSlow0));
  471. float fSlow202 = (2.9375000000000002e-09f * fSlow2);
  472. float fSlow203 = (1.175e-10f + (fSlow202 + (fSlow0 * (fSlow201 - 1.0105e-10f))));
  473. float fSlow204 = (fConst1 * fSlow203);
  474. float fSlow205 = (0.025025000000000002f * fSlow2);
  475. float fSlow206 = (fConst1 * (0.015726f + (fSlow68 + fSlow205)));
  476. float fSlow207 = ((fSlow206 + (fConst2 * (fSlow204 - fSlow200))) - 1);
  477. float fSlow208 = (fConst3 * fSlow203);
  478. float fSlow209 = ((fConst2 * (fSlow200 + fSlow208)) - (3 + fSlow206));
  479. float fSlow210 = ((fSlow206 + (fConst2 * (fSlow200 - fSlow208))) - 3);
  480. float fSlow211 = (0 - (1 + (fSlow206 + (fConst2 * (fSlow200 + fSlow204)))));
  481. float fSlow212 = (1.0f / fSlow211);
  482. float fSlow213 = ((fSlow0 * (1.645e-11f + fSlow201)) + (fSlow17 * ((1.175e-10f - (1.175e-10f * fSlow0)) + fSlow202)));
  483. float fSlow214 = (fConst3 * fSlow213);
  484. float fSlow215 = (3.9700000000000005e-08f + (((3.675000000000001e-07f * fSlow17) + (fSlow0 * (4.8222e-07f - fSlow199))) + (fSlow2 * (9.925e-07f + (1.1761750000000001e-05f * fSlow0)))));
  485. float fSlow216 = (0.001001f + (fSlow205 + (fSlow51 + fSlow68)));
  486. float fSlow217 = (fConst1 * fSlow216);
  487. float fSlow218 = (fSlow217 + (fConst2 * (fSlow215 - fSlow214)));
  488. float fSlow219 = (fConst1 * fSlow213);
  489. float fSlow220 = (fSlow217 + (fConst2 * (fSlow219 - fSlow215)));
  490. float fSlow221 = (fConst1 * (0 - fSlow216));
  491. float fSlow222 = (fSlow221 + (fConst2 * (fSlow215 + fSlow214)));
  492. float fSlow223 = (fSlow221 - (fConst2 * (fSlow215 + fSlow219)));
  493. float fSlow224 = ((fSlow31 == 17) / fSlow211);
  494. float fSlow225 = (3.0896250000000005e-07f * fSlow0);
  495. float fSlow226 = (6.338090000000001e-07f + ((1.8734760000000003e-05f * fSlow2) + (fSlow0 * (((1.2358500000000002e-05f * fSlow2) - 1.361249999999999e-08f) - fSlow225))));
  496. float fSlow227 = ((1.6037340000000005e-09f * fSlow2) - (4.0093350000000015e-11f * fSlow0));
  497. float fSlow228 = (1.8198400000000004e-09f * fSlow2);
  498. float fSlow229 = (4.5496000000000015e-11f + (fSlow228 + (fSlow0 * (fSlow227 - 5.40265e-12f))));
  499. float fSlow230 = (fConst1 * fSlow229);
  500. float fSlow231 = (fConst1 * (0.00208725f + (fSlow8 + fSlow149)));
  501. float fSlow232 = ((fSlow231 + (fConst2 * (fSlow230 - fSlow226))) - 1);
  502. float fSlow233 = (fConst3 * fSlow229);
  503. float fSlow234 = ((fConst2 * (fSlow226 + fSlow233)) - (3 + fSlow231));
  504. float fSlow235 = ((fSlow231 + (fConst2 * (fSlow226 - fSlow233))) - 3);
  505. float fSlow236 = (0 - (1 + (fSlow231 + (fConst2 * (fSlow226 + fSlow230)))));
  506. float fSlow237 = (1.0f / fSlow236);
  507. float fSlow238 = ((fSlow0 * (4.0093350000000015e-11f + fSlow227)) + (fSlow17 * ((4.5496000000000015e-11f - (4.5496000000000015e-11f * fSlow0)) + fSlow228)));
  508. float fSlow239 = (fConst3 * fSlow238);
  509. float fSlow240 = (8.1169e-08f + (((1.6544000000000003e-07f * fSlow17) + (fSlow0 * (3.735875000000001e-07f - fSlow225))) + (fSlow2 * (3.24676e-06f + (1.2358500000000002e-05f * fSlow0)))));
  510. float fSlow241 = (0.00011750000000000001f * fSlow17);
  511. float fSlow242 = (0.0005617500000000001f + (fSlow149 + (fSlow8 + fSlow241)));
  512. float fSlow243 = (fConst1 * fSlow242);
  513. float fSlow244 = (fSlow243 + (fConst2 * (fSlow240 - fSlow239)));
  514. float fSlow245 = (fConst1 * fSlow238);
  515. float fSlow246 = (fSlow243 + (fConst2 * (fSlow245 - fSlow240)));
  516. float fSlow247 = (fConst1 * (0 - fSlow242));
  517. float fSlow248 = (fSlow247 + (fConst2 * (fSlow240 + fSlow239)));
  518. float fSlow249 = (fSlow247 - (fConst2 * (fSlow240 + fSlow245)));
  519. float fSlow250 = ((fSlow31 == 16) / fSlow236);
  520. float fSlow251 = (2.7256800000000006e-07f * fSlow0);
  521. float fSlow252 = (1.4234760000000002e-06f + ((2.851440000000001e-05f * fSlow2) + (fSlow0 * (((6.8142000000000025e-06f * fSlow2) - 7.876920000000001e-07f) - fSlow251))));
  522. float fSlow253 = ((4.724676000000001e-10f * fSlow2) - (1.8898704000000002e-11f * fSlow0));
  523. float fSlow254 = (1.6641900000000002e-09f * fSlow2);
  524. float fSlow255 = (6.656760000000001e-11f + (fSlow254 + (fSlow0 * (fSlow253 - 4.7668896000000004e-11f))));
  525. float fSlow256 = (fConst1 * fSlow255);
  526. float fSlow257 = (0.0008200000000000001f * fSlow0);
  527. float fSlow258 = (0.00831f * fSlow2);
  528. float fSlow259 = (fConst1 * (0.005107400000000001f + (fSlow258 + fSlow257)));
  529. float fSlow260 = ((fSlow259 + (fConst2 * (fSlow256 - fSlow252))) - 1);
  530. float fSlow261 = (fConst3 * fSlow255);
  531. float fSlow262 = ((fConst2 * (fSlow252 + fSlow261)) - (3 + fSlow259));
  532. float fSlow263 = ((fSlow259 + (fConst2 * (fSlow252 - fSlow261))) - 3);
  533. float fSlow264 = (0 - (1 + (fSlow259 + (fConst2 * (fSlow252 + fSlow256)))));
  534. float fSlow265 = (1.0f / fSlow264);
  535. float fSlow266 = ((fSlow0 * (1.8898704000000002e-11f + fSlow253)) + (fSlow17 * ((6.656760000000001e-11f - (6.656760000000001e-11f * fSlow0)) + fSlow254)));
  536. float fSlow267 = (fConst3 * fSlow266);
  537. float fSlow268 = (3.1116000000000005e-08f + (((2.829e-07f * fSlow17) + (fSlow0 * (3.2176800000000005e-07f - fSlow251))) + (fSlow2 * (7.779000000000002e-07f + (6.8142000000000025e-06f * fSlow0)))));
  538. float fSlow269 = (0.00033240000000000006f + (fSlow258 + (fSlow257 + (6e-05f * fSlow17))));
  539. float fSlow270 = (fConst1 * fSlow269);
  540. float fSlow271 = (fSlow270 + (fConst2 * (fSlow268 - fSlow267)));
  541. float fSlow272 = (fConst1 * fSlow266);
  542. float fSlow273 = (fSlow270 + (fConst2 * (fSlow272 - fSlow268)));
  543. float fSlow274 = (fConst1 * (0 - fSlow269));
  544. float fSlow275 = (fSlow274 + (fConst2 * (fSlow268 + fSlow267)));
  545. float fSlow276 = (fSlow274 - (fConst2 * (fSlow268 + fSlow272)));
  546. float fSlow277 = ((fSlow31 == 15) / fSlow264);
  547. float fSlow278 = (4.0108000000000004e-07f * fSlow0);
  548. float fSlow279 = (5.050300000000001e-06f + ((0.00010263250000000001f * fSlow2) + (fSlow0 * (((1.0027e-05f * fSlow2) - 3.5719200000000006e-06f) - fSlow278))));
  549. float fSlow280 = ((9.45e-10f * fSlow2) - (3.78e-11f * fSlow0));
  550. float fSlow281 = (6.75e-09f * fSlow2);
  551. float fSlow282 = (2.7e-10f + (fSlow281 + (fSlow0 * (fSlow280 - 2.3219999999999998e-10f))));
  552. float fSlow283 = (fConst1 * fSlow282);
  553. float fSlow284 = (0.0004f * fSlow0);
  554. float fSlow285 = (0.025067500000000003f * fSlow2);
  555. float fSlow286 = (fConst1 * (0.0150702f + (fSlow285 + fSlow284)));
  556. float fSlow287 = ((fSlow286 + (fConst2 * (fSlow283 - fSlow279))) - 1);
  557. float fSlow288 = (fConst3 * fSlow282);
  558. float fSlow289 = ((fConst2 * (fSlow279 + fSlow288)) - (3 + fSlow286));
  559. float fSlow290 = ((fSlow286 + (fConst2 * (fSlow279 - fSlow288))) - 3);
  560. float fSlow291 = (0 - (1 + (fSlow286 + (fConst2 * (fSlow279 + fSlow283)))));
  561. float fSlow292 = (1.0f / fSlow291);
  562. float fSlow293 = ((fSlow0 * (3.78e-11f + fSlow280)) + (fSlow17 * ((2.7e-10f - (2.7e-10f * fSlow0)) + fSlow281)));
  563. float fSlow294 = (fConst3 * fSlow293);
  564. float fSlow295 = (1.0530000000000001e-07f + (((9.45e-07f * fSlow17) + (fSlow0 * (4.2808000000000006e-07f - fSlow278))) + (fSlow2 * (2.6324999999999998e-06f + (1.0027e-05f * fSlow0)))));
  565. float fSlow296 = (6.75e-05f * fSlow17);
  566. float fSlow297 = (0.0010027f + (fSlow285 + (fSlow284 + fSlow296)));
  567. float fSlow298 = (fConst1 * fSlow297);
  568. float fSlow299 = (fSlow298 + (fConst2 * (fSlow295 - fSlow294)));
  569. float fSlow300 = (fConst1 * fSlow293);
  570. float fSlow301 = (fSlow298 + (fConst2 * (fSlow300 - fSlow295)));
  571. float fSlow302 = (fConst1 * (0 - fSlow297));
  572. float fSlow303 = (fSlow302 + (fConst2 * (fSlow295 + fSlow294)));
  573. float fSlow304 = (fSlow302 - (fConst2 * (fSlow295 + fSlow300)));
  574. float fSlow305 = ((fSlow31 == 14) / fSlow291);
  575. float fSlow306 = (1.95976e-07f * fSlow0);
  576. float fSlow307 = (9.060568000000001e-07f + ((8.801210000000002e-06f * fSlow2) + (fSlow0 * (((2.4497000000000004e-06f * fSlow2) - 4.3256399999999996e-07f) - fSlow306))));
  577. float fSlow308 = ((2.0778120000000008e-10f * fSlow2) - (1.6622496000000003e-11f * fSlow0));
  578. float fSlow309 = (5.553900000000002e-10f * fSlow2);
  579. float fSlow310 = (4.4431200000000016e-11f + (fSlow309 + (fSlow0 * (fSlow308 - 2.7808704000000013e-11f))));
  580. float fSlow311 = (fConst1 * fSlow310);
  581. float fSlow312 = (0.00044f * fSlow0);
  582. float fSlow313 = (0.0055675f * fSlow2);
  583. float fSlow314 = (fConst1 * (0.0035049f + (fSlow313 + fSlow312)));
  584. float fSlow315 = ((fSlow314 + (fConst2 * (fSlow311 - fSlow307))) - 1);
  585. float fSlow316 = (fConst3 * fSlow310);
  586. float fSlow317 = ((fConst2 * (fSlow307 + fSlow316)) - (3 + fSlow314));
  587. float fSlow318 = ((fSlow314 + (fConst2 * (fSlow307 - fSlow316))) - 3);
  588. float fSlow319 = (0 - (1 + (fSlow314 + (fConst2 * (fSlow307 + fSlow311)))));
  589. float fSlow320 = (1.0f / fSlow319);
  590. float fSlow321 = ((fSlow0 * (1.6622496000000003e-11f + fSlow308)) + (fSlow17 * ((4.4431200000000016e-11f - (4.4431200000000016e-11f * fSlow0)) + fSlow309)));
  591. float fSlow322 = (fConst3 * fSlow321);
  592. float fSlow323 = (4.585680000000001e-08f + (((2.0196000000000004e-07f * fSlow17) + (fSlow0 * (2.2567600000000002e-07f - fSlow306))) + (fSlow2 * (5.732100000000001e-07f + (2.4497000000000004e-06f * fSlow0)))));
  593. float fSlow324 = (0.00044540000000000004f + (fSlow313 + (fSlow296 + fSlow312)));
  594. float fSlow325 = (fConst1 * fSlow324);
  595. float fSlow326 = (fSlow325 + (fConst2 * (fSlow323 - fSlow322)));
  596. float fSlow327 = (fConst1 * fSlow321);
  597. float fSlow328 = (fSlow325 + (fConst2 * (fSlow327 - fSlow323)));
  598. float fSlow329 = (fConst1 * (0 - fSlow324));
  599. float fSlow330 = (fSlow329 + (fConst2 * (fSlow323 + fSlow322)));
  600. float fSlow331 = (fSlow329 - (fConst2 * (fSlow323 + fSlow327)));
  601. float fSlow332 = ((fSlow31 == 13) / fSlow319);
  602. float fSlow333 = (4.9434000000000004e-08f * fSlow0);
  603. float fSlow334 = (7.748796000000001e-07f + ((2.8889960000000004e-05f * fSlow2) + (fSlow0 * (((4.943400000000001e-06f * fSlow2) - 1.2634599999999999e-07f) - fSlow333))));
  604. float fSlow335 = ((1.2443156000000004e-09f * fSlow2) - (1.2443156000000002e-11f * fSlow0));
  605. float fSlow336 = (5.345780000000001e-09f * fSlow2);
  606. float fSlow337 = (5.345780000000001e-11f + (fSlow336 + (fSlow0 * (fSlow335 - 4.101464400000001e-11f))));
  607. float fSlow338 = (fConst1 * fSlow337);
  608. float fSlow339 = (0.00022f * fSlow0);
  609. float fSlow340 = (fConst1 * (0.0025277f + (fSlow149 + fSlow339)));
  610. float fSlow341 = ((fSlow340 + (fConst2 * (fSlow338 - fSlow334))) - 1);
  611. float fSlow342 = (fConst3 * fSlow337);
  612. float fSlow343 = ((fConst2 * (fSlow334 + fSlow342)) - (3 + fSlow340));
  613. float fSlow344 = ((fSlow340 + (fConst2 * (fSlow334 - fSlow342))) - 3);
  614. float fSlow345 = (0 - (1 + (fSlow340 + (fConst2 * (fSlow334 + fSlow338)))));
  615. float fSlow346 = (1.0f / fSlow345);
  616. float fSlow347 = ((fSlow0 * (1.2443156000000002e-11f + fSlow335)) + (fSlow17 * ((5.345780000000001e-11f - (5.345780000000001e-11f * fSlow0)) + fSlow336)));
  617. float fSlow348 = (fConst3 * fSlow347);
  618. float fSlow349 = (6.141960000000001e-08f + (((4.859800000000001e-07f * fSlow17) + (fSlow0 * (1.0113400000000001e-07f - fSlow333))) + (fSlow2 * (6.141960000000001e-06f + (4.943400000000001e-06f * fSlow0)))));
  619. float fSlow350 = (0.00022470000000000001f + (fSlow149 + (fSlow339 + (0.00023500000000000002f * fSlow17))));
  620. float fSlow351 = (fConst1 * fSlow350);
  621. float fSlow352 = (fSlow351 + (fConst2 * (fSlow349 - fSlow348)));
  622. float fSlow353 = (fConst1 * fSlow347);
  623. float fSlow354 = (fSlow351 + (fConst2 * (fSlow353 - fSlow349)));
  624. float fSlow355 = (fConst1 * (0 - fSlow350));
  625. float fSlow356 = (fSlow355 + (fConst2 * (fSlow349 + fSlow348)));
  626. float fSlow357 = (fSlow355 - (fConst2 * (fSlow349 + fSlow353)));
  627. float fSlow358 = ((fSlow31 == 12) / fSlow345);
  628. float fSlow359 = (2.5587500000000006e-07f * fSlow0);
  629. float fSlow360 = (7.717400000000001e-07f + ((2.2033600000000005e-05f * fSlow2) + (fSlow0 * (((1.0235000000000001e-05f * fSlow2) - 1.5537499999999997e-07f) - fSlow359))));
  630. float fSlow361 = ((1.3959000000000001e-09f * fSlow2) - (3.48975e-11f * fSlow0));
  631. float fSlow362 = (2.2090000000000005e-09f * fSlow2);
  632. float fSlow363 = (5.522500000000001e-11f + (fSlow362 + (fSlow0 * (fSlow361 - 2.0327500000000007e-11f))));
  633. float fSlow364 = (fConst1 * fSlow363);
  634. float fSlow365 = (0.0005f * fSlow0);
  635. float fSlow366 = (0.020470000000000002f * fSlow2);
  636. float fSlow367 = (fConst1 * (0.0025092499999999998f + (fSlow366 + fSlow365)));
  637. float fSlow368 = ((fSlow367 + (fConst2 * (fSlow364 - fSlow360))) - 1);
  638. float fSlow369 = (fConst3 * fSlow363);
  639. float fSlow370 = ((fConst2 * (fSlow360 + fSlow369)) - (3 + fSlow367));
  640. float fSlow371 = ((fSlow367 + (fConst2 * (fSlow360 - fSlow369))) - 3);
  641. float fSlow372 = (0 - (1 + (fSlow367 + (fConst2 * (fSlow360 + fSlow364)))));
  642. float fSlow373 = (1.0f / fSlow372);
  643. float fSlow374 = ((fSlow0 * (3.48975e-11f + fSlow361)) + (fSlow17 * ((5.522500000000001e-11f - (5.522500000000001e-11f * fSlow0)) + fSlow362)));
  644. float fSlow375 = (fConst3 * fSlow374);
  645. float fSlow376 = (8.084000000000001e-08f + (((2.2090000000000003e-07f * fSlow17) + (fSlow0 * (3.146250000000001e-07f - fSlow359))) + (fSlow2 * (3.2336000000000007e-06f + (1.0235000000000001e-05f * fSlow0)))));
  646. float fSlow377 = (0.00051175f + (fSlow366 + (fSlow241 + fSlow365)));
  647. float fSlow378 = (fConst1 * fSlow377);
  648. float fSlow379 = (fSlow378 + (fConst2 * (fSlow376 - fSlow375)));
  649. float fSlow380 = (fConst1 * fSlow374);
  650. float fSlow381 = (fSlow378 + (fConst2 * (fSlow380 - fSlow376)));
  651. float fSlow382 = (fConst1 * (0 - fSlow377));
  652. float fSlow383 = (fSlow382 + (fConst2 * (fSlow376 + fSlow375)));
  653. float fSlow384 = (fSlow382 - (fConst2 * (fSlow376 + fSlow380)));
  654. float fSlow385 = ((fSlow31 == 11) / fSlow372);
  655. float fSlow386 = (0.00022854915600000004f * fSlow0);
  656. float fSlow387 = (0.00010871476000000002f + ((0.00010719478000000002f * fSlow2) + (fSlow0 * ((0.00012621831200000002f + (0.00022854915600000004f * fSlow2)) - fSlow386))));
  657. float fSlow388 = ((3.421299200000001e-08f * fSlow2) - (3.421299200000001e-08f * fSlow0));
  658. float fSlow389 = (1.0f + (fSlow2 + (93531720.34763868f * (fSlow0 * (2.3521432000000005e-08f + fSlow388)))));
  659. float fSlow390 = (fConst4 * fSlow389);
  660. float fSlow391 = (fConst1 * (0.036906800000000003f + ((0.022103400000000002f * fSlow2) + (0.01034f * fSlow0))));
  661. float fSlow392 = ((fSlow391 + (fConst2 * (fSlow390 - fSlow387))) - 1);
  662. float fSlow393 = (fConst5 * fSlow389);
  663. float fSlow394 = ((fConst2 * (fSlow387 + fSlow393)) - (3 + fSlow391));
  664. float fSlow395 = ((fSlow391 + (fConst2 * (fSlow387 - fSlow393))) - 3);
  665. float fSlow396 = ((fConst2 * (0 - (fSlow387 + fSlow390))) - (1 + fSlow391));
  666. float fSlow397 = (1.0f / fSlow396);
  667. float fSlow398 = ((fSlow0 * (3.421299200000001e-08f + fSlow388)) + (fSlow17 * ((1.0691560000000003e-08f - (1.0691560000000003e-08f * fSlow0)) + (1.0691560000000003e-08f * fSlow2))));
  668. float fSlow399 = (fConst3 * fSlow398);
  669. float fSlow400 = (3.7947800000000004e-06f + (((1.5199800000000001e-06f * fSlow17) + (fSlow0 * (0.00022961831200000004f - fSlow386))) + (fSlow2 * (3.7947800000000004e-06f + fSlow386))));
  670. float fSlow401 = (1.0f + (fSlow2 + ((0.0046780133373146215f * fSlow17) + (0.4678013337314621f * fSlow0))));
  671. float fSlow402 = (fConst6 * fSlow401);
  672. float fSlow403 = (fSlow402 + (fConst2 * (fSlow400 - fSlow399)));
  673. float fSlow404 = (fConst1 * fSlow398);
  674. float fSlow405 = (fSlow402 + (fConst2 * (fSlow404 - fSlow400)));
  675. float fSlow406 = (fConst1 * (0 - (0.022103400000000002f * fSlow401)));
  676. float fSlow407 = (fSlow406 + (fConst2 * (fSlow400 + fSlow399)));
  677. float fSlow408 = (fSlow406 - (fConst2 * (fSlow400 + fSlow404)));
  678. float fSlow409 = ((fSlow31 == 10) / fSlow396);
  679. float fSlow410 = (4.851e-08f * fSlow0);
  680. float fSlow411 = (7.172000000000001e-07f + ((4.972000000000001e-05f * fSlow2) + (fSlow0 * (((4.8510000000000015e-06f * fSlow2) - 4.2449000000000006e-07f) - fSlow410))));
  681. float fSlow412 = ((2.6620000000000007e-10f * fSlow2) - (2.662e-12f * fSlow0));
  682. float fSlow413 = (2.4200000000000003e-09f * fSlow2);
  683. float fSlow414 = (2.4200000000000004e-11f + (fSlow413 + (fSlow0 * (fSlow412 - 2.1538000000000003e-11f))));
  684. float fSlow415 = (fConst1 * fSlow414);
  685. float fSlow416 = (0.022050000000000004f * fSlow2);
  686. float fSlow417 = (fConst1 * (0.0046705f + (fSlow339 + fSlow416)));
  687. float fSlow418 = ((fSlow417 + (fConst2 * (fSlow415 - fSlow411))) - 1);
  688. float fSlow419 = (fConst3 * fSlow414);
  689. float fSlow420 = ((fConst2 * (fSlow411 + fSlow419)) - (3 + fSlow417));
  690. float fSlow421 = ((fSlow417 + (fConst2 * (fSlow411 - fSlow419))) - 3);
  691. float fSlow422 = (0 - (1 + (fSlow417 + (fConst2 * (fSlow411 + fSlow415)))));
  692. float fSlow423 = (1.0f / fSlow422);
  693. float fSlow424 = ((fSlow0 * (2.662e-12f + fSlow412)) + (fSlow17 * ((2.4200000000000004e-11f - (2.4200000000000004e-11f * fSlow0)) + fSlow413)));
  694. float fSlow425 = (fConst3 * fSlow424);
  695. float fSlow426 = (1.32e-08f + (((2.2000000000000004e-07f * fSlow17) + (fSlow0 * (5.951000000000001e-08f - fSlow410))) + (fSlow2 * (1.32e-06f + (4.8510000000000015e-06f * fSlow0)))));
  696. float fSlow427 = (0.00022050000000000002f + (fSlow416 + (fSlow339 + (5e-05f * fSlow17))));
  697. float fSlow428 = (fConst1 * fSlow427);
  698. float fSlow429 = (fSlow428 + (fConst2 * (fSlow426 - fSlow425)));
  699. float fSlow430 = (fConst1 * fSlow424);
  700. float fSlow431 = (fSlow428 + (fConst2 * (fSlow430 - fSlow426)));
  701. float fSlow432 = (fConst1 * (0 - fSlow427));
  702. float fSlow433 = (fSlow432 + (fConst2 * (fSlow426 + fSlow425)));
  703. float fSlow434 = (fSlow432 - (fConst2 * (fSlow426 + fSlow430)));
  704. float fSlow435 = ((fSlow31 == 9) / fSlow422);
  705. float fSlow436 = (1.38796875e-06f * fSlow0);
  706. float fSlow437 = (3.5279375000000002e-06f + ((3.1989375e-05f * fSlow2) + (fSlow0 * (((1.38796875e-05f * fSlow2) - 1.6311937500000001e-06f) - fSlow436))));
  707. float fSlow438 = ((1.0561781250000004e-09f * fSlow2) - (1.0561781250000003e-10f * fSlow0));
  708. float fSlow439 = (1.9328750000000005e-09f * fSlow2);
  709. float fSlow440 = (1.9328750000000007e-10f + (fSlow439 + (fSlow0 * (fSlow438 - 8.766968750000004e-11f))));
  710. float fSlow441 = (fConst1 * fSlow440);
  711. float fSlow442 = (0.001175f * fSlow0);
  712. float fSlow443 = (0.011812500000000002f * fSlow2);
  713. float fSlow444 = (fConst1 * (0.0065077500000000005f + (fSlow443 + fSlow442)));
  714. float fSlow445 = ((fSlow444 + (fConst2 * (fSlow441 - fSlow437))) - 1);
  715. float fSlow446 = (fConst3 * fSlow440);
  716. float fSlow447 = ((fConst2 * (fSlow437 + fSlow446)) - (3 + fSlow444));
  717. float fSlow448 = ((fSlow444 + (fConst2 * (fSlow437 - fSlow446))) - 3);
  718. float fSlow449 = (0 - (1 + (fSlow444 + (fConst2 * (fSlow437 + fSlow441)))));
  719. float fSlow450 = (1.0f / fSlow449);
  720. float fSlow451 = ((fSlow0 * (1.0561781250000003e-10f + fSlow438)) + (fSlow17 * ((1.9328750000000007e-10f - (1.9328750000000007e-10f * fSlow0)) + fSlow439)));
  721. float fSlow452 = (fConst3 * fSlow451);
  722. float fSlow453 = (1.0633750000000002e-07f + (((3.2900000000000005e-07f * fSlow17) + (fSlow0 * (1.4614062500000001e-06f - fSlow436))) + (fSlow2 * (1.0633750000000002e-06f + (1.38796875e-05f * fSlow0)))));
  723. float fSlow454 = (fSlow21 + fSlow442);
  724. float fSlow455 = (0.00118125f + (fSlow443 + fSlow454));
  725. float fSlow456 = (fConst1 * fSlow455);
  726. float fSlow457 = (fSlow456 + (fConst2 * (fSlow453 - fSlow452)));
  727. float fSlow458 = (fConst1 * fSlow451);
  728. float fSlow459 = (fSlow456 + (fConst2 * (fSlow458 - fSlow453)));
  729. float fSlow460 = (fConst1 * (0 - fSlow455));
  730. float fSlow461 = (fSlow460 + (fConst2 * (fSlow453 + fSlow452)));
  731. float fSlow462 = (fSlow460 - (fConst2 * (fSlow453 + fSlow458)));
  732. float fSlow463 = ((fSlow31 == 8) / fSlow449);
  733. float fSlow464 = (3.0937500000000006e-07f * fSlow0);
  734. float fSlow465 = (1.2375000000000003e-05f * fSlow2);
  735. float fSlow466 = (6.677000000000001e-07f + ((1.9448000000000004e-05f * fSlow2) + (fSlow0 * ((fSlow465 - 2.1175000000000003e-08f) - fSlow464))));
  736. float fSlow467 = ((1.7121500000000001e-09f * fSlow2) - (4.2803750000000003e-11f * fSlow0));
  737. float fSlow468 = (1.9965000000000003e-09f * fSlow2);
  738. float fSlow469 = (4.991250000000001e-11f + (fSlow468 + (fSlow0 * (fSlow467 - 7.108750000000004e-12f))));
  739. float fSlow470 = (fConst1 * fSlow469);
  740. float fSlow471 = (0.022500000000000003f * fSlow2);
  741. float fSlow472 = (fSlow8 + fSlow471);
  742. float fSlow473 = (fConst1 * (0.0021395000000000003f + fSlow472));
  743. float fSlow474 = ((fSlow473 + (fConst2 * (fSlow470 - fSlow466))) - 1);
  744. float fSlow475 = (fConst3 * fSlow469);
  745. float fSlow476 = ((fConst2 * (fSlow466 + fSlow475)) - (3 + fSlow473));
  746. float fSlow477 = ((fSlow473 + (fConst2 * (fSlow466 - fSlow475))) - 3);
  747. float fSlow478 = (0 - (1 + (fSlow473 + (fConst2 * (fSlow466 + fSlow470)))));
  748. float fSlow479 = (1.0f / fSlow478);
  749. float fSlow480 = ((fSlow0 * (4.2803750000000003e-11f + fSlow467)) + (fSlow17 * ((4.991250000000001e-11f - (4.991250000000001e-11f * fSlow0)) + fSlow468)));
  750. float fSlow481 = (fConst3 * fSlow480);
  751. float fSlow482 = (1.2375000000000003e-05f * fSlow0);
  752. float fSlow483 = (fSlow0 * (3.781250000000001e-07f - fSlow464));
  753. float fSlow484 = (8.690000000000002e-08f + (((1.815e-07f * fSlow17) + fSlow483) + (fSlow2 * (3.4760000000000007e-06f + fSlow482))));
  754. float fSlow485 = (0.0005625000000000001f + (fSlow471 + (fSlow8 + (0.000125f * fSlow17))));
  755. float fSlow486 = (fConst1 * fSlow485);
  756. float fSlow487 = (fSlow486 + (fConst2 * (fSlow484 - fSlow481)));
  757. float fSlow488 = (fConst1 * fSlow480);
  758. float fSlow489 = (fSlow486 + (fConst2 * (fSlow488 - fSlow484)));
  759. float fSlow490 = (fConst1 * (0 - fSlow485));
  760. float fSlow491 = (fSlow490 + (fConst2 * (fSlow484 + fSlow481)));
  761. float fSlow492 = (fSlow490 - (fConst2 * (fSlow484 + fSlow488)));
  762. float fSlow493 = ((fSlow31 == 7) / fSlow478);
  763. float fSlow494 = (3.0621250000000006e-07f * fSlow0);
  764. float fSlow495 = (5.442360000000002e-07f + ((1.784904e-05f * fSlow2) + (fSlow0 * (((1.2248500000000003e-05f * fSlow2) - 5.596250000000005e-08f) - fSlow494))));
  765. float fSlow496 = ((9.245610000000004e-10f * fSlow2) - (2.3114025000000008e-11f * fSlow0));
  766. float fSlow497 = (1.0781100000000005e-09f * fSlow2);
  767. float fSlow498 = (2.695275000000001e-11f + (fSlow497 + (fSlow0 * (fSlow496 - 3.8387250000000005e-12f))));
  768. float fSlow499 = (fConst1 * fSlow498);
  769. float fSlow500 = (0.02227f * fSlow2);
  770. float fSlow501 = (fConst1 * (0.00207625f + (fSlow8 + fSlow500)));
  771. float fSlow502 = ((fSlow501 + (fConst2 * (fSlow499 - fSlow495))) - 1);
  772. float fSlow503 = (fConst3 * fSlow498);
  773. float fSlow504 = ((fConst2 * (fSlow495 + fSlow503)) - (3 + fSlow501));
  774. float fSlow505 = ((fSlow501 + (fConst2 * (fSlow495 - fSlow503))) - 3);
  775. float fSlow506 = (0 - (1 + (fSlow501 + (fConst2 * (fSlow495 + fSlow499)))));
  776. float fSlow507 = (1.0f / fSlow506);
  777. float fSlow508 = ((fSlow0 * (2.3114025000000008e-11f + fSlow496)) + (fSlow17 * ((2.695275000000001e-11f - (2.695275000000001e-11f * fSlow0)) + fSlow497)));
  778. float fSlow509 = (fConst3 * fSlow508);
  779. float fSlow510 = (4.6926e-08f + (((9.801000000000002e-08f * fSlow17) + (fSlow0 * (3.433375000000001e-07f - fSlow494))) + (fSlow2 * (1.8770400000000002e-06f + (1.2248500000000003e-05f * fSlow0)))));
  780. float fSlow511 = (0.0005567500000000001f + (fSlow500 + (fSlow8 + fSlow296)));
  781. float fSlow512 = (fConst1 * fSlow511);
  782. float fSlow513 = (fSlow512 + (fConst2 * (fSlow510 - fSlow509)));
  783. float fSlow514 = (fConst1 * fSlow508);
  784. float fSlow515 = (fSlow512 + (fConst2 * (fSlow514 - fSlow510)));
  785. float fSlow516 = (fConst1 * (0 - fSlow511));
  786. float fSlow517 = (fSlow516 + (fConst2 * (fSlow510 + fSlow509)));
  787. float fSlow518 = (fSlow516 - (fConst2 * (fSlow510 + fSlow514)));
  788. float fSlow519 = ((fSlow31 == 6) / fSlow506);
  789. float fSlow520 = (1.08515e-06f + ((3.108600000000001e-05f * fSlow2) + (fSlow0 * ((fSlow465 - 2.99475e-07f) - fSlow464))));
  790. float fSlow521 = ((1.8513000000000002e-09f * fSlow2) - (4.628250000000001e-11f * fSlow0));
  791. float fSlow522 = (3.3880000000000003e-09f * fSlow2);
  792. float fSlow523 = (8.470000000000002e-11f + (fSlow522 + (fSlow0 * (fSlow521 - 3.8417500000000006e-11f))));
  793. float fSlow524 = (fConst1 * fSlow523);
  794. float fSlow525 = (fConst1 * (fSlow472 + 0.0031515000000000002f));
  795. float fSlow526 = ((fSlow525 + (fConst2 * (fSlow524 - fSlow520))) - 1);
  796. float fSlow527 = (fConst3 * fSlow523);
  797. float fSlow528 = ((fConst2 * (fSlow520 + fSlow527)) - (3 + fSlow525));
  798. float fSlow529 = ((fSlow525 + (fConst2 * (fSlow520 - fSlow527))) - 3);
  799. float fSlow530 = (0 - (1 + (fSlow525 + (fConst2 * (fSlow520 + fSlow524)))));
  800. float fSlow531 = (1.0f / fSlow530);
  801. float fSlow532 = ((fSlow0 * (4.628250000000001e-11f + fSlow521)) + (fSlow17 * ((8.470000000000002e-11f - (8.470000000000002e-11f * fSlow0)) + fSlow522)));
  802. float fSlow533 = (fConst3 * fSlow532);
  803. float fSlow534 = (9.955000000000001e-08f + ((fSlow483 + (3.08e-07f * fSlow17)) + (fSlow2 * (fSlow482 + 3.982e-06f))));
  804. float fSlow535 = (fSlow486 + (fConst2 * (fSlow534 - fSlow533)));
  805. float fSlow536 = (fConst1 * fSlow532);
  806. float fSlow537 = (fSlow486 + (fConst2 * (fSlow536 - fSlow534)));
  807. float fSlow538 = (fSlow490 + (fConst2 * (fSlow534 + fSlow533)));
  808. float fSlow539 = (fSlow490 - (fConst2 * (fSlow534 + fSlow536)));
  809. float fSlow540 = ((fSlow31 == 5) / fSlow530);
  810. float fSlow541 = (5.665800800000001e-07f + ((1.892924e-05f * fSlow2) + (fSlow0 * ((fSlow142 - 6.207784000000001e-08f) - fSlow141))));
  811. float fSlow542 = ((1.2661536800000005e-09f * fSlow2) - (2.7855380960000008e-11f * fSlow0));
  812. float fSlow543 = (1.6515048000000004e-09f * fSlow2);
  813. float fSlow544 = (3.6333105600000014e-11f + (fSlow543 + (fSlow0 * (fSlow542 - 8.477724640000006e-12f))));
  814. float fSlow545 = (fConst1 * fSlow544);
  815. float fSlow546 = (fConst1 * (fSlow150 + 0.0020497400000000004f));
  816. float fSlow547 = ((fSlow546 + (fConst2 * (fSlow545 - fSlow541))) - 1);
  817. float fSlow548 = (fConst3 * fSlow544);
  818. float fSlow549 = ((fConst2 * (fSlow541 + fSlow548)) - (3 + fSlow546));
  819. float fSlow550 = ((fSlow546 + (fConst2 * (fSlow541 - fSlow548))) - 3);
  820. float fSlow551 = (0 - (1 + (fSlow546 + (fConst2 * (fSlow541 + fSlow545)))));
  821. float fSlow552 = (1.0f / fSlow551);
  822. float fSlow553 = ((fSlow0 * (2.7855380960000008e-11f + fSlow542)) + (fSlow17 * ((3.6333105600000014e-11f - (3.6333105600000014e-11f * fSlow0)) + fSlow543)));
  823. float fSlow554 = (fConst3 * fSlow553);
  824. float fSlow555 = (6.505928000000001e-08f + ((fSlow161 + (1.5013680000000003e-07f * fSlow17)) + (fSlow2 * (fSlow160 + 2.95724e-06f))));
  825. float fSlow556 = (fSlow164 + (fConst2 * (fSlow555 - fSlow554)));
  826. float fSlow557 = (fConst1 * fSlow553);
  827. float fSlow558 = (fSlow164 + (fConst2 * (fSlow557 - fSlow555)));
  828. float fSlow559 = (fSlow168 + (fConst2 * (fSlow555 + fSlow554)));
  829. float fSlow560 = (fSlow168 - (fConst2 * (fSlow555 + fSlow557)));
  830. float fSlow561 = ((fSlow31 == 4) / fSlow551);
  831. float fSlow562 = (1.0855872000000003e-07f * fSlow0);
  832. float fSlow563 = (3.222390000000001e-06f + (fSlow62 + (fSlow0 * (((5.6541000000000015e-06f * fSlow2) - 2.1333412800000006e-06f) - fSlow562))));
  833. float fSlow564 = (4.935e-10f * fSlow2);
  834. float fSlow565 = (fSlow564 - (9.4752e-12f * fSlow0));
  835. float fSlow566 = (1.41e-10f + (fSlow65 + (fSlow0 * (fSlow565 - 1.315248e-10f))));
  836. float fSlow567 = (fConst1 * fSlow566);
  837. float fSlow568 = (0.0002256f * fSlow0);
  838. float fSlow569 = (fConst1 * (0.015243699999999999f + (fSlow9 + fSlow568)));
  839. float fSlow570 = ((fSlow569 + (fConst2 * (fSlow567 - fSlow563))) - 1);
  840. float fSlow571 = (fConst3 * fSlow566);
  841. float fSlow572 = ((fConst2 * (fSlow563 + fSlow571)) - (3 + fSlow569));
  842. float fSlow573 = ((fSlow569 + (fConst2 * (fSlow563 - fSlow571))) - 3);
  843. float fSlow574 = (0 - (1 + (fSlow569 + (fConst2 * (fSlow563 + fSlow567)))));
  844. float fSlow575 = (1.0f / fSlow574);
  845. float fSlow576 = (1.41e-10f - (1.41e-10f * fSlow0));
  846. float fSlow577 = ((fSlow0 * (9.4752e-12f + fSlow565)) + (fSlow17 * (fSlow65 + fSlow576)));
  847. float fSlow578 = (fConst3 * fSlow577);
  848. float fSlow579 = (4.764000000000001e-08f + ((fSlow78 + (fSlow0 * (1.2265872000000003e-07f - fSlow562))) + (fSlow2 * (2.48125e-06f + (5.6541000000000015e-06f * fSlow0)))));
  849. float fSlow580 = (0.00048120000000000004f + (fSlow9 + (fSlow21 + fSlow568)));
  850. float fSlow581 = (fConst1 * fSlow580);
  851. float fSlow582 = (fSlow581 + (fConst2 * (fSlow579 - fSlow578)));
  852. float fSlow583 = (fConst1 * fSlow577);
  853. float fSlow584 = (fSlow581 + (fConst2 * (fSlow583 - fSlow579)));
  854. float fSlow585 = (fConst1 * (0 - fSlow580));
  855. float fSlow586 = (fSlow585 + (fConst2 * (fSlow579 + fSlow578)));
  856. float fSlow587 = (fSlow585 - (fConst2 * (fSlow579 + fSlow583)));
  857. float fSlow588 = ((fSlow31 == 3) / fSlow574);
  858. float fSlow589 = (4.7056400000000006e-07f * fSlow0);
  859. float fSlow590 = (5.188640000000001e-06f + ((0.00011869100000000002f * fSlow2) + (fSlow0 * (((1.1764100000000001e-05f * fSlow2) - 4.215336e-06f) - fSlow589))));
  860. float fSlow591 = (fSlow564 - (1.974e-11f * fSlow0));
  861. float fSlow592 = (3.525e-09f * fSlow2);
  862. float fSlow593 = (1.41e-10f + (fSlow592 + (fSlow0 * (fSlow591 - 1.2126e-10f))));
  863. float fSlow594 = (fConst1 * fSlow593);
  864. float fSlow595 = (0.02503f * fSlow2);
  865. float fSlow596 = (fConst1 * (0.0157312f + (fSlow68 + fSlow595)));
  866. float fSlow597 = ((fSlow596 + (fConst2 * (fSlow594 - fSlow590))) - 1);
  867. float fSlow598 = (fConst3 * fSlow593);
  868. float fSlow599 = ((fConst2 * (fSlow590 + fSlow598)) - (3 + fSlow596));
  869. float fSlow600 = ((fSlow596 + (fConst2 * (fSlow590 - fSlow598))) - 3);
  870. float fSlow601 = (0 - (1 + (fSlow596 + (fConst2 * (fSlow590 + fSlow594)))));
  871. float fSlow602 = (1.0f / fSlow601);
  872. float fSlow603 = ((fSlow0 * (1.974e-11f + fSlow591)) + (fSlow17 * (fSlow576 + fSlow592)));
  873. float fSlow604 = (fConst3 * fSlow603);
  874. float fSlow605 = (4.764000000000001e-08f + (((4.410000000000001e-07f * fSlow17) + (fSlow0 * (4.846640000000001e-07f - fSlow589))) + (fSlow2 * (1.1910000000000001e-06f + (1.1764100000000001e-05f * fSlow0)))));
  875. float fSlow606 = (0.0010012f + (fSlow595 + (fSlow68 + (3e-05f * fSlow17))));
  876. float fSlow607 = (fConst1 * fSlow606);
  877. float fSlow608 = (fSlow607 + (fConst2 * (fSlow605 - fSlow604)));
  878. float fSlow609 = (fConst1 * fSlow603);
  879. float fSlow610 = (fSlow607 + (fConst2 * (fSlow609 - fSlow605)));
  880. float fSlow611 = (fConst1 * (0 - fSlow606));
  881. float fSlow612 = (fSlow611 + (fConst2 * (fSlow605 + fSlow604)));
  882. float fSlow613 = (fSlow611 - (fConst2 * (fSlow605 + fSlow609)));
  883. float fSlow614 = ((fSlow31 == 2) / fSlow601);
  884. float fSlow615 = (2.9448437500000003e-06f * fSlow0);
  885. float fSlow616 = (1.2916875000000002e-05f + (fSlow62 + (fSlow0 * (((2.9448437500000007e-05f * fSlow2) - 8.731718750000001e-06f) - fSlow615))));
  886. float fSlow617 = ((2.5703125000000004e-09f * fSlow2) - (2.5703125000000003e-10f * fSlow0));
  887. float fSlow618 = (7.343750000000001e-10f + (fSlow65 + (fSlow0 * (fSlow617 - 4.773437500000001e-10f))));
  888. float fSlow619 = (fConst1 * fSlow618);
  889. float fSlow620 = (fConst1 * (0.01726875f + (fSlow9 + fSlow442)));
  890. float fSlow621 = ((fSlow620 + (fConst2 * (fSlow619 - fSlow616))) - 1);
  891. float fSlow622 = (fConst3 * fSlow618);
  892. float fSlow623 = ((fConst2 * (fSlow616 + fSlow622)) - (3 + fSlow620));
  893. float fSlow624 = ((fSlow620 + (fConst2 * (fSlow616 - fSlow622))) - 3);
  894. float fSlow625 = (0 - (1 + (fSlow620 + (fConst2 * (fSlow616 + fSlow619)))));
  895. float fSlow626 = (1.0f / fSlow625);
  896. float fSlow627 = ((fSlow0 * (2.5703125000000003e-10f + fSlow617)) + (fSlow17 * (fSlow65 + (7.343750000000001e-10f - (7.343750000000001e-10f * fSlow0)))));
  897. float fSlow628 = (fConst3 * fSlow627);
  898. float fSlow629 = (2.48125e-07f + ((fSlow78 + (fSlow0 * (3.0182812500000004e-06f - fSlow615))) + (fSlow2 * (2.48125e-06f + (2.9448437500000007e-05f * fSlow0)))));
  899. float fSlow630 = (0.0025062500000000002f + (fSlow9 + fSlow454));
  900. float fSlow631 = (fConst1 * fSlow630);
  901. float fSlow632 = (fSlow631 + (fConst2 * (fSlow629 - fSlow628)));
  902. float fSlow633 = (fConst1 * fSlow627);
  903. float fSlow634 = (fSlow631 + (fConst2 * (fSlow633 - fSlow629)));
  904. float fSlow635 = (fConst1 * (0 - fSlow630));
  905. float fSlow636 = (fSlow635 + (fConst2 * (fSlow629 + fSlow628)));
  906. float fSlow637 = (fSlow635 - (fConst2 * (fSlow629 + fSlow633)));
  907. float fSlow638 = ((fSlow31 == 1) / fSlow625);
  908. float fSlow639 = (2.5312500000000006e-07f * fSlow0);
  909. float fSlow640 = (7.4525e-07f + ((2.4210000000000004e-05f * fSlow2) + (fSlow0 * (((1.0125e-05f * fSlow2) - 2.75625e-07f) - fSlow639))));
  910. float fSlow641 = ((7.650000000000002e-10f * fSlow2) - (1.9125000000000002e-11f * fSlow0));
  911. float fSlow642 = (1.4000000000000001e-09f * fSlow2);
  912. float fSlow643 = (3.500000000000001e-11f + (fSlow642 + (fSlow0 * (fSlow641 - 1.5875000000000007e-11f))));
  913. float fSlow644 = (fConst1 * fSlow643);
  914. float fSlow645 = (0.02025f * fSlow2);
  915. float fSlow646 = (fConst1 * (0.0028087500000000005f + (fSlow365 + fSlow645)));
  916. float fSlow647 = ((fSlow646 + (fConst2 * (fSlow644 - fSlow640))) - 1);
  917. float fSlow648 = (fConst3 * fSlow643);
  918. float fSlow649 = ((fConst2 * (fSlow640 + fSlow648)) - (3 + fSlow646));
  919. float fSlow650 = ((fSlow646 + (fConst2 * (fSlow640 - fSlow648))) - 3);
  920. float fSlow651 = (0 - (1 + (fSlow646 + (fConst2 * (fSlow640 + fSlow644)))));
  921. float fSlow652 = (1.0f / fSlow651);
  922. float fSlow653 = ((fSlow0 * (1.9125000000000002e-11f + fSlow641)) + (fSlow17 * ((3.500000000000001e-11f - (3.500000000000001e-11f * fSlow0)) + fSlow642)));
  923. float fSlow654 = (fConst3 * fSlow653);
  924. float fSlow655 = (4.525e-08f + (((1.4e-07f * fSlow17) + (fSlow0 * (2.8437500000000003e-07f - fSlow639))) + (fSlow2 * (1.8100000000000002e-06f + (1.0125e-05f * fSlow0)))));
  925. float fSlow656 = (0.00050625f + (fSlow645 + (fSlow21 + fSlow365)));
  926. float fSlow657 = (fConst1 * fSlow656);
  927. float fSlow658 = (fSlow657 + (fConst2 * (fSlow655 - fSlow654)));
  928. float fSlow659 = (fConst1 * fSlow653);
  929. float fSlow660 = (fSlow657 + (fConst2 * (fSlow659 - fSlow655)));
  930. float fSlow661 = (fConst1 * (0 - fSlow656));
  931. float fSlow662 = (fSlow661 + (fConst2 * (fSlow655 + fSlow654)));
  932. float fSlow663 = (fSlow661 - (fConst2 * (fSlow655 + fSlow659)));
  933. float fSlow664 = ((fSlow31 == 0) / fSlow651);
  934. float tubeout = 0.f;
  935. for (uint32_t i = 0; i < frames; ++i) {
  936. //Step 1: read input sample as voltage for the source
  937. float in = sanitize_denormal(inputs[0][i]);
  938. // protect against overflowing circuit
  939. in = fabs(in) < DANGER ? in : 0.f;
  940. Vi.e = in*from_dB(tubedrive);
  941. //Step 2: propagate waves up to the triode and push values into triode element
  942. I1.waveUp();
  943. I3.waveUp();
  944. P2.waveUp();
  945. v.G.WD = sanitize_denormal(I1.WU);
  946. v.K.WD = sanitize_denormal(I3.WU);
  947. v.P.WD = sanitize_denormal(P2.WU);
  948. v.vg = v.G.WD;
  949. v.vk = v.K.WD;
  950. v.vp = v.P.WD;
  951. v.G.PortRes = sanitize_denormal(I1.PortRes);
  952. v.K.PortRes = sanitize_denormal(I3.PortRes);
  953. v.P.PortRes = sanitize_denormal(P2.PortRes);
  954. //Step 3: compute wave reflections inside the triode
  955. T vg0, vg1, vp0, vp1;
  956. vg0 = -10.0;
  957. vg1 = 10.0;
  958. v.vg = sanitize_denormal(v.zeroffg(vg0,vg1,TOLERANCE));
  959. //v.vg = v.secantfg(&vg0,&vg1);
  960. vp0 = e;
  961. vp1 = 0.0;
  962. v.vp = sanitize_denormal(v.zeroffp(vp0,vp1,TOLERANCE));
  963. //v.vp = v.secantfp(&vp0,&vp1);
  964. v.vk = sanitize_denormal(v.ffk());
  965. v.G.WU = sanitize_denormal(2.0*v.vg-v.G.WD);
  966. v.K.WU = sanitize_denormal(2.0*v.vk-v.K.WD);
  967. v.P.WU = sanitize_denormal(2.0*v.vp-v.P.WD);
  968. outputs[0][i] = in;
  969. tubeout = -Ro.Voltage()/e; //invert signal and rescale
  970. tubeout = sanitize_denormal(tubeout);
  971. P2.setWD(v.P.WU);
  972. I1.setWD(v.G.WU);
  973. I3.setWD(v.K.WU);
  974. //Tone Stack sim
  975. fRec0[0] = ((float)tubeout - (fSlow16 * (((fSlow14 * fRec0[2]) + (fSlow13 * fRec0[1])) + (fSlow11 * fRec0[3]))));
  976. fRec1[0] = ((float)tubeout - (fSlow47 * (((fSlow45 * fRec1[2]) + (fSlow44 * fRec1[1])) + (fSlow42 * fRec1[3]))));
  977. fRec2[0] = ((float)tubeout - (fSlow75 * (((fSlow73 * fRec2[2]) + (fSlow72 * fRec2[1])) + (fSlow70 * fRec2[3]))));
  978. fRec3[0] = ((float)tubeout - (fSlow102 * (((fSlow100 * fRec3[2]) + (fSlow99 * fRec3[1])) + (fSlow97 * fRec3[3]))));
  979. fRec4[0] = ((float)tubeout - (fSlow128 * (((fSlow126 * fRec4[2]) + (fSlow125 * fRec4[1])) + (fSlow123 * fRec4[3]))));
  980. fRec5[0] = ((float)tubeout - (fSlow157 * (((fSlow155 * fRec5[2]) + (fSlow154 * fRec5[1])) + (fSlow152 * fRec5[3]))));
  981. fRec6[0] = ((float)tubeout - (fSlow186 * (((fSlow184 * fRec6[2]) + (fSlow183 * fRec6[1])) + (fSlow181 * fRec6[3]))));
  982. fRec7[0] = ((float)tubeout - (fSlow212 * (((fSlow210 * fRec7[2]) + (fSlow209 * fRec7[1])) + (fSlow207 * fRec7[3]))));
  983. fRec8[0] = ((float)tubeout - (fSlow237 * (((fSlow235 * fRec8[2]) + (fSlow234 * fRec8[1])) + (fSlow232 * fRec8[3]))));
  984. fRec9[0] = ((float)tubeout - (fSlow265 * (((fSlow263 * fRec9[2]) + (fSlow262 * fRec9[1])) + (fSlow260 * fRec9[3]))));
  985. fRec10[0] = ((float)tubeout - (fSlow292 * (((fSlow290 * fRec10[2]) + (fSlow289 * fRec10[1])) + (fSlow287 * fRec10[3]))));
  986. fRec11[0] = ((float)tubeout - (fSlow320 * (((fSlow318 * fRec11[2]) + (fSlow317 * fRec11[1])) + (fSlow315 * fRec11[3]))));
  987. fRec12[0] = ((float)tubeout - (fSlow346 * (((fSlow344 * fRec12[2]) + (fSlow343 * fRec12[1])) + (fSlow341 * fRec12[3]))));
  988. fRec13[0] = ((float)tubeout - (fSlow373 * (((fSlow371 * fRec13[2]) + (fSlow370 * fRec13[1])) + (fSlow368 * fRec13[3]))));
  989. fRec14[0] = ((float)tubeout - (fSlow397 * (((fSlow395 * fRec14[2]) + (fSlow394 * fRec14[1])) + (fSlow392 * fRec14[3]))));
  990. fRec15[0] = ((float)tubeout - (fSlow423 * (((fSlow421 * fRec15[2]) + (fSlow420 * fRec15[1])) + (fSlow418 * fRec15[3]))));
  991. fRec16[0] = ((float)tubeout - (fSlow450 * (((fSlow448 * fRec16[2]) + (fSlow447 * fRec16[1])) + (fSlow445 * fRec16[3]))));
  992. fRec17[0] = ((float)tubeout - (fSlow479 * (((fSlow477 * fRec17[2]) + (fSlow476 * fRec17[1])) + (fSlow474 * fRec17[3]))));
  993. fRec18[0] = ((float)tubeout - (fSlow507 * (((fSlow505 * fRec18[2]) + (fSlow504 * fRec18[1])) + (fSlow502 * fRec18[3]))));
  994. fRec19[0] = ((float)tubeout - (fSlow531 * (((fSlow529 * fRec19[2]) + (fSlow528 * fRec19[1])) + (fSlow526 * fRec19[3]))));
  995. fRec20[0] = ((float)tubeout - (fSlow552 * (((fSlow550 * fRec20[2]) + (fSlow549 * fRec20[1])) + (fSlow547 * fRec20[3]))));
  996. fRec21[0] = ((float)tubeout - (fSlow575 * (((fSlow573 * fRec21[2]) + (fSlow572 * fRec21[1])) + (fSlow570 * fRec21[3]))));
  997. fRec22[0] = ((float)tubeout - (fSlow602 * (((fSlow600 * fRec22[2]) + (fSlow599 * fRec22[1])) + (fSlow597 * fRec22[3]))));
  998. fRec23[0] = ((float)tubeout - (fSlow626 * (((fSlow624 * fRec23[2]) + (fSlow623 * fRec23[1])) + (fSlow621 * fRec23[3]))));
  999. fRec24[0] = ((float)tubeout - (fSlow652 * (((fSlow650 * fRec24[2]) + (fSlow649 * fRec24[1])) + (fSlow647 * fRec24[3]))));
  1000. outputs[0][i] = (FAUSTFLOAT)((fSlow664 * ((fSlow663 * fRec24[0]) + ((fSlow662 * fRec24[1]) + ((fSlow660 * fRec24[3]) + (fSlow658 * fRec24[2]))))) + ((fSlow638 * ((fSlow637 * fRec23[0]) + ((fSlow636 * fRec23[1]) + ((fSlow634 * fRec23[3]) + (fSlow632 * fRec23[2]))))) + ((fSlow614 * ((fSlow613 * fRec22[0]) + ((fSlow612 * fRec22[1]) + ((fSlow610 * fRec22[3]) + (fSlow608 * fRec22[2]))))) + ((fSlow588 * ((fSlow587 * fRec21[0]) + ((fSlow586 * fRec21[1]) + ((fSlow584 * fRec21[3]) + (fSlow582 * fRec21[2]))))) + ((fSlow561 * ((fSlow560 * fRec20[0]) + ((fSlow559 * fRec20[1]) + ((fSlow558 * fRec20[3]) + (fSlow556 * fRec20[2]))))) + ((fSlow540 * ((fSlow539 * fRec19[0]) + ((fSlow538 * fRec19[1]) + ((fSlow537 * fRec19[3]) + (fSlow535 * fRec19[2]))))) + ((fSlow519 * ((fSlow518 * fRec18[0]) + ((fSlow517 * fRec18[1]) + ((fSlow515 * fRec18[3]) + (fSlow513 * fRec18[2]))))) + ((fSlow493 * ((fSlow492 * fRec17[0]) + ((fSlow491 * fRec17[1]) + ((fSlow489 * fRec17[3]) + (fSlow487 * fRec17[2]))))) + ((fSlow463 * ((fSlow462 * fRec16[0]) + ((fSlow461 * fRec16[1]) + ((fSlow459 * fRec16[3]) + (fSlow457 * fRec16[2]))))) + ((fSlow435 * ((fSlow434 * fRec15[0]) + ((fSlow433 * fRec15[1]) + ((fSlow431 * fRec15[3]) + (fSlow429 * fRec15[2]))))) + ((fSlow409 * ((fSlow408 * fRec14[0]) + ((fSlow407 * fRec14[1]) + ((fSlow405 * fRec14[3]) + (fSlow403 * fRec14[2]))))) + ((fSlow385 * ((fSlow384 * fRec13[0]) + ((fSlow383 * fRec13[1]) + ((fSlow381 * fRec13[3]) + (fSlow379 * fRec13[2]))))) + ((fSlow358 * ((fSlow357 * fRec12[0]) + ((fSlow356 * fRec12[1]) + ((fSlow354 * fRec12[3]) + (fSlow352 * fRec12[2]))))) + ((fSlow332 * ((fSlow331 * fRec11[0]) + ((fSlow330 * fRec11[1]) + ((fSlow328 * fRec11[3]) + (fSlow326 * fRec11[2]))))) + ((fSlow305 * ((fSlow304 * fRec10[0]) + ((fSlow303 * fRec10[1]) + ((fSlow301 * fRec10[3]) + (fSlow299 * fRec10[2]))))) + ((fSlow277 * ((fSlow276 * fRec9[0]) + ((fSlow275 * fRec9[1]) + ((fSlow273 * fRec9[3]) + (fSlow271 * fRec9[2]))))) + ((fSlow250 * ((fSlow249 * fRec8[0]) + ((fSlow248 * fRec8[1]) + ((fSlow246 * fRec8[3]) + (fSlow244 * fRec8[2]))))) + ((fSlow224 * ((fSlow223 * fRec7[0]) + ((fSlow222 * fRec7[1]) + ((fSlow220 * fRec7[3]) + (fSlow218 * fRec7[2]))))) + ((fSlow198 * ((fSlow197 * fRec6[0]) + ((fSlow196 * fRec6[1]) + ((fSlow194 * fRec6[3]) + (fSlow192 * fRec6[2]))))) + ((fSlow171 * ((fSlow170 * fRec5[0]) + ((fSlow169 * fRec5[1]) + ((fSlow167 * fRec5[3]) + (fSlow165 * fRec5[2]))))) + ((fSlow140 * ((fSlow139 * fRec4[0]) + ((fSlow138 * fRec4[1]) + ((fSlow136 * fRec4[3]) + (fSlow134 * fRec4[2]))))) + ((fSlow114 * ((fSlow113 * fRec3[0]) + ((fSlow112 * fRec3[1]) + ((fSlow110 * fRec3[3]) + (fSlow108 * fRec3[2]))))) + ((fSlow88 * ((fSlow87 * fRec2[0]) + ((fSlow86 * fRec2[1]) + ((fSlow84 * fRec2[3]) + (fSlow82 * fRec2[2]))))) + ((fSlow60 * ((fSlow59 * fRec1[0]) + ((fSlow58 * fRec1[1]) + ((fSlow56 * fRec1[3]) + (fSlow54 * fRec1[2]))))) + (fSlow32 * ((fSlow30 * fRec0[0]) + ((fSlow29 * fRec0[1]) + ((fSlow27 * fRec0[3]) + (fSlow25 * fRec0[2])))))))))))))))))))))))))))))* from_dB(mastergain);
  1001. outputs[0][i] = sanitize_denormal(outputs[0][i]);
  1002. // post processing
  1003. for (int i=3; i>0; i--) fRec24[i] = sanitize_denormal(fRec24[i-1]);
  1004. for (int i=3; i>0; i--) fRec23[i] = sanitize_denormal(fRec23[i-1]);
  1005. for (int i=3; i>0; i--) fRec22[i] = sanitize_denormal(fRec22[i-1]);
  1006. for (int i=3; i>0; i--) fRec21[i] = sanitize_denormal(fRec21[i-1]);
  1007. for (int i=3; i>0; i--) fRec20[i] = sanitize_denormal(fRec20[i-1]);
  1008. for (int i=3; i>0; i--) fRec19[i] = sanitize_denormal(fRec19[i-1]);
  1009. for (int i=3; i>0; i--) fRec18[i] = sanitize_denormal(fRec18[i-1]);
  1010. for (int i=3; i>0; i--) fRec17[i] = sanitize_denormal(fRec17[i-1]);
  1011. for (int i=3; i>0; i--) fRec16[i] = sanitize_denormal(fRec16[i-1]);
  1012. for (int i=3; i>0; i--) fRec15[i] = sanitize_denormal(fRec15[i-1]);
  1013. for (int i=3; i>0; i--) fRec14[i] = sanitize_denormal(fRec14[i-1]);
  1014. for (int i=3; i>0; i--) fRec13[i] = sanitize_denormal(fRec13[i-1]);
  1015. for (int i=3; i>0; i--) fRec12[i] = sanitize_denormal(fRec12[i-1]);
  1016. for (int i=3; i>0; i--) fRec11[i] = sanitize_denormal(fRec11[i-1]);
  1017. for (int i=3; i>0; i--) fRec10[i] = sanitize_denormal(fRec10[i-1]);
  1018. for (int i=3; i>0; i--) fRec9[i] = sanitize_denormal(fRec9[i-1]);
  1019. for (int i=3; i>0; i--) fRec8[i] = sanitize_denormal(fRec8[i-1]);
  1020. for (int i=3; i>0; i--) fRec7[i] = sanitize_denormal(fRec7[i-1]);
  1021. for (int i=3; i>0; i--) fRec6[i] = sanitize_denormal(fRec6[i-1]);
  1022. for (int i=3; i>0; i--) fRec5[i] = sanitize_denormal(fRec5[i-1]);
  1023. for (int i=3; i>0; i--) fRec4[i] = sanitize_denormal(fRec4[i-1]);
  1024. for (int i=3; i>0; i--) fRec3[i] = sanitize_denormal(fRec3[i-1]);
  1025. for (int i=3; i>0; i--) fRec2[i] = sanitize_denormal(fRec2[i-1]);
  1026. for (int i=3; i>0; i--) fRec1[i] = sanitize_denormal(fRec1[i-1]);
  1027. for (int i=3; i>0; i--) fRec0[i] = sanitize_denormal(fRec0[i-1]);
  1028. }
  1029. }
  1030. // -----------------------------------------------------------------------
  1031. Plugin* createPlugin()
  1032. {
  1033. return new ZamTubePlugin();
  1034. }
  1035. // -----------------------------------------------------------------------
  1036. END_NAMESPACE_DISTRHO