Branch data Line data Source code
1 : : /*
2 : : * hic0_full.core.cpp - device implementations for hic0_full module
3 : : *
4 : : * This is free software; you can redistribute it and/or modify
5 : : * it under the terms of the GNU General Public License as published by
6 : : * the Free Software Foundation; either version 2, or (at your option)
7 : : * any later version.
8 : : *
9 : : */
10 : :
11 : : #if HAVE_CONFIG_H
12 : : #include <config.h>
13 : : #endif
14 : :
15 : : #include "hic0_full.analogfunction.h"
16 : : #include "component.h"
17 : : #include "device.h"
18 : : #include "hic0_full.core.h"
19 : :
20 : : #ifndef CIR_hic0_full
21 : : #define CIR_hic0_full -1
22 : : #endif
23 : :
24 : : // external nodes
25 : : #define c 0
26 : : #define b 1
27 : : #define e 2
28 : : #define s 3
29 : : #define tnode 4
30 : : // internal nodes
31 : : #define ci 5
32 : : #define bi 6
33 : : #define ei 7
34 : :
35 : : // useful macro definitions
36 : : #define NP(node) real (getV (node))
37 : : #define BP(pnode,nnode) (NP(pnode) - NP(nnode))
38 : : #define _load_static_residual2(pnode,nnode,current)\
39 : : _rhs[pnode] -= current;\
40 : : _rhs[nnode] += current;
41 : : #define _load_static_augmented_residual2(pnode,nnode,current)\
42 : : _rhs[pnode] -= current;\
43 : : _rhs[nnode] += current;
44 : : #define _load_static_residual1(node,current)\
45 : : _rhs[node] -= current;
46 : : #define _load_static_augmented_residual1(node,current)\
47 : : _rhs[node] -= current;
48 : : #define _load_static_jacobian4(pnode,nnode,vpnode,vnnode,conductance)\
49 : : _jstat[pnode][vpnode] += conductance;\
50 : : _jstat[nnode][vnnode] += conductance;\
51 : : _jstat[pnode][vnnode] -= conductance;\
52 : : _jstat[nnode][vpnode] -= conductance;\
53 : : if (doHB) {\
54 : : _ghs[pnode] += conductance * BP(vpnode,vnnode);\
55 : : _ghs[nnode] -= conductance * BP(vpnode,vnnode);\
56 : : } else {\
57 : : _rhs[pnode] += conductance * BP(vpnode,vnnode);\
58 : : _rhs[nnode] -= conductance * BP(vpnode,vnnode);\
59 : : }
60 : : #define _load_static_jacobian2p(node,vpnode,vnnode,conductance)\
61 : : _jstat[node][vpnode] += conductance;\
62 : : _jstat[node][vnnode] -= conductance;\
63 : : if (doHB) {\
64 : : _ghs[node] += conductance * BP(vpnode,vnnode);\
65 : : } else {\
66 : : _rhs[node] += conductance * BP(vpnode,vnnode);\
67 : : }
68 : : #define _load_static_jacobian2s(pnode,nnode,node,conductance)\
69 : : _jstat[pnode][node] += conductance;\
70 : : _jstat[nnode][node] -= conductance;\
71 : : if (doHB) {\
72 : : _ghs[pnode] += conductance * NP(node);\
73 : : _ghs[nnode] -= conductance * NP(node);\
74 : : } else {\
75 : : _rhs[pnode] += conductance * NP(node);\
76 : : _rhs[nnode] -= conductance * NP(node);\
77 : : }
78 : : #define _load_static_jacobian1(node,vnode,conductance)\
79 : : _jstat[node][vnode] += conductance;\
80 : : if (doHB) {\
81 : : _ghs[node] += conductance * NP(vnode);\
82 : : } else {\
83 : : _rhs[node] += conductance * NP(vnode);\
84 : : }
85 : : #define _load_dynamic_residual2(pnode,nnode,charge)\
86 : : if (doTR) _charges[pnode][nnode] += charge;\
87 : : if (doHB) {\
88 : : _qhs[pnode] -= charge;\
89 : : _qhs[nnode] += charge;\
90 : : }
91 : : #define _load_dynamic_residual1(node,charge)\
92 : : if (doTR) _charges[node][node] += charge;\
93 : : if (doHB) {\
94 : : _qhs[node] -= charge;\
95 : : }
96 : : #define _load_dynamic_jacobian4(pnode,nnode,vpnode,vnnode,capacitance)\
97 : : if (doAC) {\
98 : : _jdyna[pnode][vpnode] += capacitance;\
99 : : _jdyna[nnode][vnnode] += capacitance;\
100 : : _jdyna[pnode][vnnode] -= capacitance;\
101 : : _jdyna[nnode][vpnode] -= capacitance;\
102 : : }\
103 : : if (doTR) {\
104 : : _caps[pnode][nnode][vpnode][vnnode] += capacitance;\
105 : : }\
106 : : if (doHB) {\
107 : : _chs[pnode] += capacitance * BP(vpnode,vnnode);\
108 : : _chs[nnode] -= capacitance * BP(vpnode,vnnode);\
109 : : }
110 : : #define _load_dynamic_jacobian2s(pnode,nnode,vnode,capacitance)\
111 : : if (doAC) {\
112 : : _jdyna[pnode][vnode] += capacitance;\
113 : : _jdyna[nnode][vnode] -= capacitance;\
114 : : }\
115 : : if (doTR) {\
116 : : _caps[pnode][nnode][vnode][vnode] += capacitance;\
117 : : }\
118 : : if (doHB) {\
119 : : _chs[pnode] += capacitance * NP(vnode);\
120 : : _chs[nnode] -= capacitance * NP(vnode);\
121 : : }
122 : : #define _load_dynamic_jacobian2p(node,vpnode,vnnode,capacitance)\
123 : : if (doAC) {\
124 : : _jdyna[node][vpnode] += capacitance;\
125 : : _jdyna[node][vnnode] -= capacitance;\
126 : : }\
127 : : if (doTR) {\
128 : : _caps[node][node][vpnode][vnnode] += capacitance;\
129 : : }\
130 : : if (doHB) {\
131 : : _chs[node] += capacitance * BP(vpnode,vnnode);\
132 : : }
133 : : #define _load_dynamic_jacobian1(node,vnode,capacitance)\
134 : : if (doAC) {\
135 : : _jdyna[node][vnode] += capacitance;\
136 : : }\
137 : : if (doTR) {\
138 : : _caps[node][node][vnode][vnode] += capacitance;\
139 : : }\
140 : : if (doHB) {\
141 : : _chs[node] += capacitance * NP(vnode);\
142 : : }
143 : :
144 : : #define _save_whitenoise1(n1,pwr,type)\
145 : : _white_pwr[n1][n1] += pwr;
146 : : #define _save_whitenoise2(n1,n2,pwr,type)\
147 : : _white_pwr[n1][n2] += pwr;
148 : : #define _save_flickernoise1(n1,pwr,exp,type)\
149 : : _flicker_pwr[n1][n1] += pwr;\
150 : : _flicker_exp[n1][n1] += exp;
151 : : #define _save_flickernoise2(n1,n2,pwr,exp,type)\
152 : : _flicker_pwr[n1][n2] += pwr;\
153 : : _flicker_exp[n1][n2] += exp;
154 : : #define _load_whitenoise2(n1,n2,pwr)\
155 : : cy (n1,n2) -= pwr/kB/T0; cy (n2,n1) -= pwr/kB/T0;\
156 : : cy (n1,n1) += pwr/kB/T0; cy (n2,n2) += pwr/kB/T0;
157 : : #define _load_whitenoise1(n1,pwr)\
158 : : cy (n1,n1) += pwr/kB/T0;
159 : : #define _load_flickernoise2(n1,n2,pwr,exp)\
160 : : cy (n1,n2) -= pwr*pow(_freq,-exp)/kB/T0;\
161 : : cy (n2,n1) -= pwr*pow(_freq,-exp)/kB/T0;\
162 : : cy (n1,n1) += pwr*pow(_freq,-exp)/kB/T0;\
163 : : cy (n2,n2) += pwr*pow(_freq,-exp)/kB/T0;
164 : : #define _load_flickernoise1(n1,pwr,exp)\
165 : : cy (n1,n1) += pwr*pow(_freq,-exp)/kB/T0;
166 : :
167 : : // derivative helper macros
168 : : // transcendental LRM p. 59
169 : : #define m00_cos(v00,x) v00 = cos(x);
170 : : #define m10_cos(v10,v00,x) v10 = (-sin(x));
171 : : #define m00_sin(v00,x) v00 = sin(x);
172 : : #define m10_sin(v10,v00,x) v10 = (cos(x));
173 : : #define m00_tan(v00,x) v00 = tan(x);
174 : : #define m10_tan(v10,v00,x) v10 = (1.0/cos(x)/cos(x));
175 : : #define m00_cosh(v00,x) v00 = cosh(x);
176 : : #define m10_cosh(v10,v00,x) v10 = (sinh(x));
177 : : #define m00_sinh(v00,x) v00 = sinh(x);
178 : : #define m10_sinh(v10,v00,x) v10 = (cosh(x));
179 : : #define m00_tanh(v00,x) v00 = tanh(x);
180 : : #define m10_tanh(v10,v00,x) v10 = (1.0/cosh(x)/cosh(x));
181 : : #define m00_acos(v00,x) v00 = acos(x);
182 : : #define m10_acos(v10,v00,x) v10 = (-1.0/sqrt(1-x*x));
183 : : #define m00_asin(v00,x) v00 = asin(x);
184 : : #define m10_asin(v10,v00,x) v10 = (+1.0/sqrt(1-x*x));
185 : : #define m00_atan(v00,x) v00 = atan(x);
186 : : #define m10_atan(v10,v00,x) v10 = (+1.0/(1+x*x));
187 : : #define m00_hypot(v00,x,y) v00 = sqrt((x)*(x)+(y)*(y));
188 : : #define m10_hypot(v10,v00,x,y) v10 = (x)/(v00);
189 : : #define m11_hypot(v11,v00,x,y) v11 = (y)/(v00);
190 : : #define m00_atan2(v00,x,y) v00 = atan2(x,y);
191 : : // TODO atan2 derivatives ?
192 : : #define m00_acosh(v00,x) v00 = acosh(x);
193 : : #define m10_acosh(v10,v00,x) v10 = (1.0/(sqrt(x-1)*sqrt(x+1)));
194 : : #define m00_asinh(v00,x) v00 = asinh(x);
195 : : #define m10_asinh(v10,v00,x) v10 = (1.0/(sqrt(x*x+1)));
196 : : #define m00_atanh(v00,x) v00 = atanh(x);
197 : : #define m10_atanh(v10,v00,x) v10 = (1.0/(1-x*x));
198 : :
199 : :
200 : : // standard functions LRM p.58
201 : : #define m00_logE(v00,x) v00 = log(x);
202 : : #define m10_logE(v10,v00,x) v10 = (1.0/x);
203 : : #define m00_log10(v00,x) v00 = log10(x);
204 : : #define m10_log10(v10,v00,x) v10 = (1.0/x/M_LN10);
205 : : #define m00_exp(v00,x) v00 = exp(x);
206 : : #define m10_exp(v10,v00,x) v10 = v00;
207 : : #define m00_sqrt(v00,x) v00 = sqrt(x);
208 : : #define m10_sqrt(v10,v00,x) v10 = (0.5/v00);
209 : : #define m00_min(v00,x,y) v00 = ((x)<(y))?(x):(y);
210 : : #define m10_min(v10,v00,x,y) v10 = ((x)<(y))?1.0:0.0;
211 : : #define m11_min(v11,v00,x,y) v11 = ((x)<(y))?0.0:1.0;
212 : : #define m00_max(v00,x,y) v00 = ((x)>(y))?(x):(y);
213 : : #define m10_max(v10,v00,x,y) v10 = ((x)>(y))?1.0:0.0;
214 : : #define m11_max(v11,v00,x,y) v11 = ((x)>(y))?0.0:1.0;
215 : : #define m00_pow(v00,x,y) v00 = pow(x,y);
216 : : #define m10_pow(v10,v00,x,y) v10 = (x==0.0)?0.0:(v00)*(y)/(x);
217 : : #define m11_pow(v11,v00,x,y) v11 = (x==0.0)?0.0:(log(x)*(v00));
218 : : #define m00_abs(v00,x) v00 = ((x)<(0)?(-(x)):(x));
219 : : #define m10_abs(v10,v00,x) v10 = (((x)>=0)?(+1.0):(-1.0));
220 : : #define m00_floor(v00,x) v00 = floor(x);
221 : : #define m10_floor(v10,v00,x) v10 = 1.0;
222 : :
223 : : #define m00_ceil(v00,x) v00 = ceil(x);
224 : : // TODO ceil derivative, needed?
225 : :
226 : : // analog operator, LRM p.61
227 : : #define m00_limexp(v00,x) v00 = ((x)<80.0?exp(x):exp(80.0)*(x-79.0));
228 : : #define m10_limexp(v10,v00,x) v10 = ((x)<80.0?(v00):exp(80.0));
229 : :
230 : : // analog kernel parameter system functions, LRM p.215
231 : : #define m00_vt(x) (kBoverQ*(x))
232 : : #define m10_vt(x) (kBoverQ)
233 : :
234 : : // extra functions (?)
235 : : #define m00_div(v00,v10,x,y) double v10=1/(y); double v00=(x)*v10;
236 : : #define m10_div(v10,v00,vv,x,y)
237 : : #define m11_div(v11,v00,vv,x,y) double v11 = -v00*vv;
238 : : #define m00_mult(v00,v10,v11,x,y) double v10=(x); double v11=(y); double v00=v10*v11;
239 : : #define m00_add(v00,x,y) double v00=(x)+(y);
240 : :
241 : : // second derivatives
242 : : #define m20_logE(v00) (-1.0/v00/v00)
243 : : #define m20_exp(v00) exp(v00)
244 : : #define m20_limexp(v00) ((v00)<80.0?exp(v00):0.0)
245 : : #define m20_sqrt(v00) (-0.25/(v00)/sqrt(v00))
246 : : #define m20_abs(v00) 0.0
247 : : #define m20_pow(x,y) ((y)*((y)-1.0)*pow(x,y)/(x)/(x))
248 : :
249 : :
250 : : // simulator specific definitions
251 : : #define _modelname "hic0_full"
252 : : #define _instancename getName()
253 : : #define _circuit_temp (getPropertyDouble("Temp")+273.15)
254 : : #define _param_given(p) (isPropertyGiven(p)?1:0)
255 : :
256 : :
257 : : // $vt and $vt() functions
258 : : #define _vt_nom (kBoverQ*_circuit_temp)
259 : :
260 : : using namespace qucs::device;
261 : : using qucs::matrix;
262 : :
263 : : /* Device constructor. */
264 : 0 : hic0_full::hic0_full() : circuit (8)
265 : : {
266 : 0 : type = CIR_hic0_full;
267 : 0 : }
268 : :
269 : : /* Initialization of model. */
270 : 0 : void hic0_full::initModel (void)
271 : : {
272 : : // create internal nodes
273 : 0 : setInternalNode (ci, "ci");
274 : 0 : setInternalNode (bi, "bi");
275 : 0 : setInternalNode (ei, "ei");
276 : :
277 : : // get device model parameters
278 : 0 : loadVariables ();
279 : : // evaluate global model equations
280 : 0 : initializeModel ();
281 : : // evaluate initial step equations
282 : 0 : initialStep ();
283 : : // evaluate global instance equations
284 : 0 : initializeInstance ();
285 : 0 : }
286 : :
287 : : /* Initialization of DC analysis. */
288 : 0 : void hic0_full::initDC (void)
289 : : {
290 : 0 : allocMatrixMNA ();
291 : 0 : initModel ();
292 : 0 : pol = 1;
293 : 0 : restartDC ();
294 : 0 : doAC = 1;
295 : 0 : doTR = 0;
296 : 0 : doHB = 0;
297 : 0 : }
298 : :
299 : : /* Run when DC is restarted (fallback algorithms). */
300 : 0 : void hic0_full::restartDC (void)
301 : : {
302 : 0 : }
303 : :
304 : : /* Initialize Verilog-AMS code. */
305 : 0 : void hic0_full::initVerilog (void)
306 : : {
307 : : // initialization of noise variables
308 : 0 : _white_pwr[ci][ei] = 0.0;
309 : 0 : _white_pwr[b][bi] = 0.0;
310 : 0 : _white_pwr[ci][c] = 0.0;
311 : 0 : _white_pwr[ei][e] = 0.0;
312 : 0 : _white_pwr[bi][ei] = 0.0;
313 : 0 : _flicker_pwr[bi][ei] = 0.0;
314 : 0 : _flicker_exp[bi][ei] = 0.0;
315 : :
316 : : int i1, i2, i3, i4;
317 : :
318 : : // zero charges
319 [ # # ]: 0 : for (i1 = 0; i1 < 8; i1++) {
320 [ # # ]: 0 : for (i2 = 0; i2 < 8; i2++) {
321 : 0 : _charges[i1][i2] = 0.0;
322 : : } }
323 : :
324 : : // zero capacitances
325 [ # # ]: 0 : for (i1 = 0; i1 < 8; i1++) {
326 [ # # ]: 0 : for (i2 = 0; i2 < 8; i2++) {
327 [ # # ]: 0 : for (i3 = 0; i3 < 8; i3++) {
328 [ # # ]: 0 : for (i4 = 0; i4 < 8; i4++) {
329 : 0 : _caps[i1][i2][i3][i4] = 0.0;
330 : : } } } }
331 : :
332 : : // zero right hand side, static and dynamic jacobian
333 [ # # ]: 0 : for (i1 = 0; i1 < 8; i1++) {
334 : 0 : _rhs[i1] = 0.0;
335 : 0 : _qhs[i1] = 0.0;
336 : 0 : _chs[i1] = 0.0;
337 : 0 : _ghs[i1] = 0.0;
338 [ # # ]: 0 : for (i2 = 0; i2 < 8; i2++) {
339 : 0 : _jstat[i1][i2] = 0.0;
340 : 0 : _jdyna[i1][i2] = 0.0;
341 : : }
342 : : }
343 : 0 : }
344 : :
345 : : /* Load device model input parameters. */
346 : 0 : void hic0_full::loadVariables (void)
347 : : {
348 : 0 : is = getPropertyDouble ("is");
349 : 0 : mcf = getPropertyDouble ("mcf");
350 : 0 : mcr = getPropertyDouble ("mcr");
351 : 0 : vef = getPropertyDouble ("vef");
352 : 0 : iqf = getPropertyDouble ("iqf");
353 : 0 : iqr = getPropertyDouble ("iqr");
354 : 0 : iqfh = getPropertyDouble ("iqfh");
355 : 0 : tfh = getPropertyDouble ("tfh");
356 : 0 : ibes = getPropertyDouble ("ibes");
357 : 0 : mbe = getPropertyDouble ("mbe");
358 : 0 : ires = getPropertyDouble ("ires");
359 : 0 : mre = getPropertyDouble ("mre");
360 : 0 : ibcs = getPropertyDouble ("ibcs");
361 : 0 : mbc = getPropertyDouble ("mbc");
362 : 0 : cje0 = getPropertyDouble ("cje0");
363 : 0 : vde = getPropertyDouble ("vde");
364 : 0 : ze = getPropertyDouble ("ze");
365 : 0 : aje = getPropertyDouble ("aje");
366 : 0 : t0 = getPropertyDouble ("t0");
367 : 0 : dt0h = getPropertyDouble ("dt0h");
368 : 0 : tbvl = getPropertyDouble ("tbvl");
369 : 0 : tef0 = getPropertyDouble ("tef0");
370 : 0 : gte = getPropertyDouble ("gte");
371 : 0 : thcs = getPropertyDouble ("thcs");
372 : 0 : ahc = getPropertyDouble ("ahc");
373 : 0 : tr = getPropertyDouble ("tr");
374 : 0 : rci0 = getPropertyDouble ("rci0");
375 : 0 : vlim = getPropertyDouble ("vlim");
376 : 0 : vpt = getPropertyDouble ("vpt");
377 : 0 : vces = getPropertyDouble ("vces");
378 : 0 : cjci0 = getPropertyDouble ("cjci0");
379 : 0 : vdci = getPropertyDouble ("vdci");
380 : 0 : zci = getPropertyDouble ("zci");
381 : 0 : vptci = getPropertyDouble ("vptci");
382 : 0 : cjcx0 = getPropertyDouble ("cjcx0");
383 : 0 : vdcx = getPropertyDouble ("vdcx");
384 : 0 : zcx = getPropertyDouble ("zcx");
385 : 0 : vptcx = getPropertyDouble ("vptcx");
386 : 0 : fbc = getPropertyDouble ("fbc");
387 : 0 : rbi0 = getPropertyDouble ("rbi0");
388 : 0 : vr0e = getPropertyDouble ("vr0e");
389 : 0 : vr0c = getPropertyDouble ("vr0c");
390 : 0 : fgeo = getPropertyDouble ("fgeo");
391 : 0 : rbx = getPropertyDouble ("rbx");
392 : 0 : rcx = getPropertyDouble ("rcx");
393 : 0 : re = getPropertyDouble ("re");
394 : 0 : itss = getPropertyDouble ("itss");
395 : 0 : msf = getPropertyDouble ("msf");
396 : 0 : iscs = getPropertyDouble ("iscs");
397 : 0 : msc = getPropertyDouble ("msc");
398 : 0 : cjs0 = getPropertyDouble ("cjs0");
399 : 0 : vds = getPropertyDouble ("vds");
400 : 0 : zs = getPropertyDouble ("zs");
401 : 0 : vpts = getPropertyDouble ("vpts");
402 : 0 : cbcpar = getPropertyDouble ("cbcpar");
403 : 0 : cbepar = getPropertyDouble ("cbepar");
404 : 0 : eavl = getPropertyDouble ("eavl");
405 : 0 : kavl = getPropertyDouble ("kavl");
406 : 0 : kf = getPropertyDouble ("kf");
407 : 0 : af = getPropertyDouble ("af");
408 : 0 : vgb = getPropertyDouble ("vgb");
409 : 0 : vge = getPropertyDouble ("vge");
410 : 0 : vgc = getPropertyDouble ("vgc");
411 : 0 : vgs = getPropertyDouble ("vgs");
412 : 0 : f1vg = getPropertyDouble ("f1vg");
413 : 0 : f2vg = getPropertyDouble ("f2vg");
414 : 0 : alt0 = getPropertyDouble ("alt0");
415 : 0 : kt0 = getPropertyDouble ("kt0");
416 : 0 : zetact = getPropertyDouble ("zetact");
417 : 0 : zetabet = getPropertyDouble ("zetabet");
418 : 0 : zetaci = getPropertyDouble ("zetaci");
419 : 0 : alvs = getPropertyDouble ("alvs");
420 : 0 : alces = getPropertyDouble ("alces");
421 : 0 : zetarbi = getPropertyDouble ("zetarbi");
422 : 0 : zetarbx = getPropertyDouble ("zetarbx");
423 : 0 : zetarcx = getPropertyDouble ("zetarcx");
424 : 0 : zetare = getPropertyDouble ("zetare");
425 : 0 : alkav = getPropertyDouble ("alkav");
426 : 0 : aleav = getPropertyDouble ("aleav");
427 : 0 : flsh = getPropertyInteger ("flsh");
428 : 0 : rth = getPropertyDouble ("rth");
429 : 0 : cth = getPropertyDouble ("cth");
430 : 0 : npn = getPropertyInteger ("npn");
431 : 0 : pnp = getPropertyInteger ("pnp");
432 : 0 : tnom = getPropertyDouble ("tnom");
433 : 0 : dt = getPropertyDouble ("dt");
434 : 0 : }
435 : :
436 : : /* #define's for translated code */
437 : : #undef _DDT
438 : : #define _DDT(q) q
439 : : #define _DYNAMIC
440 : : #define _DERIVATE
441 : : #define _DDX
442 : : #define _DERIVATEFORDDX
443 : :
444 : : /* Evaluate Verilog-AMS equations in model initialization. */
445 : 0 : void hic0_full::initializeModel (void)
446 : : {
447 : : {
448 [ # # ]: 0 : if
449 : 0 : _param_given("npn")
450 : : {
451 : 0 : HICUMtype=(+1);
452 : : }
453 : : else
454 : : {
455 [ # # ]: 0 : if
456 : 0 : _param_given("pnp")
457 : : {
458 : 0 : HICUMtype=(-1);
459 : : }
460 : : else
461 : : {
462 : 0 : HICUMtype=(+1);
463 : : }
464 : : }
465 : : }
466 : 0 : }
467 : :
468 : : /* Evaluate Verilog-AMS equations in instance initialization. */
469 : 0 : void hic0_full::initializeInstance (void)
470 : : {
471 : 0 : }
472 : :
473 : : /* Evaluate Verilog-AMS equations in initial step. */
474 : 0 : void hic0_full::initialStep (void)
475 : : {
476 : 0 : }
477 : :
478 : : /* Evaluate Verilog-AMS equations in final step. */
479 : 0 : void hic0_full::finalStep (void)
480 : : {
481 : 0 : }
482 : :
483 : : /* Evaluate Verilog-AMS equations in analog block. */
484 : 0 : void hic0_full::calcVerilog (void)
485 : : {
486 : :
487 : : /* ----------------- evaluate verilog analog equations -------------------- */
488 : : double flicker_Pwr;
489 : : #if defined(_DERIVATE)
490 : : double flicker_Pwr_Vtnode_GND;
491 : : double flicker_Pwr_Vbi_ei;
492 : : #endif
493 : : double twoq;
494 : : double fourkt;
495 : : #if defined(_DERIVATE)
496 : : double fourkt_Vtnode_GND;
497 : : #endif
498 : : #if defined(_DYNAMIC)
499 : : double Qbiei;
500 : : #if defined(_DERIVATE)
501 : : double Qbiei_Vtnode_GND;
502 : : double Qbiei_Vbi_ei;
503 : : double Qbiei_Vbi_ci;
504 : : double Qbiei_Vb_ci;
505 : : double Qbiei_Vci_ei;
506 : : #endif
507 : : #endif
508 : : #if defined(_DYNAMIC)
509 : : double Qbici;
510 : : #if defined(_DERIVATE)
511 : : double Qbici_Vbi_ci;
512 : : double Qbici_Vtnode_GND;
513 : : double Qbici_Vb_ci;
514 : : double Qbici_Vbi_ei;
515 : : double Qbici_Vci_ei;
516 : : #endif
517 : : #endif
518 : : #if defined(_DYNAMIC)
519 : : double Qbe;
520 : : #if defined(_DERIVATE)
521 : : double Qbe_Vb_e;
522 : : #endif
523 : : #endif
524 : : #if defined(_DYNAMIC)
525 : : double Qbci;
526 : : #if defined(_DERIVATE)
527 : : double Qbci_Vb_ci;
528 : : #endif
529 : : #endif
530 : : #if defined(_DERIVATE)
531 : : double Ibici_Vtnode_GND;
532 : : double Ibici_Vbi_ci;
533 : : double Ibici_Vbi_ei;
534 : : double Ibici_Vb_ci;
535 : : double Ibici_Vci_ei;
536 : : #endif
537 : : double pterm;
538 : : #if defined(_DERIVATE)
539 : : double pterm_Vci_c;
540 : : double pterm_Vei_e;
541 : : double pterm_Vb_bi;
542 : : double pterm_Vs_ci;
543 : : double pterm_Vtnode_GND;
544 : : double pterm_Vbi_ei;
545 : : double pterm_Vbi_ci;
546 : : double pterm_Vb_ci;
547 : : double pterm_Vci_ei;
548 : : #endif
549 : : #if defined(_DYNAMIC)
550 : : double qjs;
551 : : #if defined(_DERIVATE)
552 : : double qjs_Vci_ei;
553 : : double qjs_Vbi_ei;
554 : : double qjs_Vs_ci;
555 : : double qjs_Vbi_ci;
556 : : double qjs_Vtnode_GND;
557 : : double qjs_Vb_ci;
558 : : #endif
559 : : #endif
560 : : #if defined(_DERIVATE)
561 : : double ijsc_Vtnode_GND;
562 : : double ijsc_Vs_ci;
563 : : double ijsc_Vbi_ci;
564 : : double ijsc_Vbi_ei;
565 : : #endif
566 : : double HSI_Tsu;
567 : : #if defined(_DERIVATE)
568 : : double HSI_Tsu_Vtnode_GND;
569 : : double HSI_Tsu_Vb_ci;
570 : : double HSI_Tsu_Vs_ci;
571 : : #endif
572 : : double HSb;
573 : : #if defined(_DERIVATE)
574 : : double HSb_Vs_ci;
575 : : double HSb_Vtnode_GND;
576 : : #endif
577 : : double HSa;
578 : : #if defined(_DERIVATE)
579 : : double HSa_Vb_ci;
580 : : double HSa_Vtnode_GND;
581 : : #endif
582 : : double HSUM;
583 : : #if defined(_DERIVATE)
584 : : double HSUM_Vtnode_GND;
585 : : #endif
586 : : double rb;
587 : : #if defined(_DERIVATE)
588 : : double rb_Vtnode_GND;
589 : : double rb_Vbi_ei;
590 : : double rb_Vbi_ci;
591 : : double rb_Vb_ci;
592 : : double rb_Vci_ei;
593 : : #endif
594 : : double eta;
595 : : #if defined(_DERIVATE)
596 : : double eta_Vtnode_GND;
597 : : double eta_Vbi_ei;
598 : : double eta_Vbi_ci;
599 : : double eta_Vb_ci;
600 : : double eta_Vci_ei;
601 : : #endif
602 : : double rbi;
603 : : #if defined(_DERIVATE)
604 : : double rbi_Vtnode_GND;
605 : : double rbi_Vbi_ei;
606 : : double rbi_Vbi_ci;
607 : : double rbi_Vb_ci;
608 : : double rbi_Vci_ei;
609 : : #endif
610 : : double fQz;
611 : : #if defined(_DERIVATE)
612 : : double fQz_Vtnode_GND;
613 : : double fQz_Vbi_ei;
614 : : double fQz_Vbi_ci;
615 : : double fQz_Vb_ci;
616 : : double fQz_Vci_ei;
617 : : #endif
618 : : double Qz_nom;
619 : : #if defined(_DERIVATE)
620 : : double Qz_nom_Vtnode_GND;
621 : : double Qz_nom_Vbi_ei;
622 : : double Qz_nom_Vbi_ci;
623 : : double Qz_nom_Vb_ci;
624 : : double Qz_nom_Vci_ei;
625 : : #endif
626 : : double qje;
627 : : #if defined(_DERIVATE)
628 : : double qje_Vtnode_GND;
629 : : double qje_Vbi_ei;
630 : : double qje_Vbi_ci;
631 : : double qje_Vb_ci;
632 : : #endif
633 : : double lncc;
634 : : #if defined(_DERIVATE)
635 : : double lncc_Vtnode_GND;
636 : : double lncc_Vbi_ci;
637 : : double lncc_Vb_ci;
638 : : #endif
639 : : #if defined(_DERIVATE)
640 : : double iavl_Vtnode_GND;
641 : : double iavl_Vbi_ei;
642 : : double iavl_Vbi_ci;
643 : : double iavl_Vb_ci;
644 : : double iavl_Vci_ei;
645 : : #endif
646 : : double a_iavl;
647 : : #if defined(_DERIVATE)
648 : : double a_iavl_Vtnode_GND;
649 : : double a_iavl_Vbi_ci;
650 : : double a_iavl_Vb_ci;
651 : : #endif
652 : : double v_bord;
653 : : #if defined(_DERIVATE)
654 : : double v_bord_Vtnode_GND;
655 : : #endif
656 : : double ibi;
657 : : #if defined(_DERIVATE)
658 : : double ibi_Vtnode_GND;
659 : : double ibi_Vbi_ei;
660 : : double ibi_Vbi_ci;
661 : : #endif
662 : : #if defined(_DERIVATE)
663 : : double ijbc_Vtnode_GND;
664 : : double ijbc_Vbi_ci;
665 : : double ijbc_Vbi_ei;
666 : : #endif
667 : : #if defined(_DERIVATE)
668 : : double ijbe_Vtnode_GND;
669 : : double ijbe_Vbi_ei;
670 : : #endif
671 : : double ire;
672 : : #if defined(_DERIVATE)
673 : : double ire_Vtnode_GND;
674 : : double ire_Vbi_ei;
675 : : #endif
676 : : double ibe;
677 : : #if defined(_DERIVATE)
678 : : double ibe_Vtnode_GND;
679 : : double ibe_Vbi_ei;
680 : : #endif
681 : : double le;
682 : : #if defined(_DERIVATE)
683 : : double le_Vs_ci;
684 : : double le_Vbi_ci;
685 : : double le_Vbi_ei;
686 : : double le_Vtnode_GND;
687 : : #endif
688 : : double DIOY;
689 : : #if defined(_DERIVATE)
690 : : double DIOY_Vs_ci;
691 : : double DIOY_Vbi_ci;
692 : : double DIOY_Vbi_ei;
693 : : double DIOY_Vtnode_GND;
694 : : #endif
695 : : #if defined(_DYNAMIC)
696 : : double qr;
697 : : #if defined(_DERIVATE)
698 : : double qr_Vtnode_GND;
699 : : double qr_Vbi_ci;
700 : : double qr_Vb_ci;
701 : : double qr_Vbi_ei;
702 : : double qr_Vci_ei;
703 : : #endif
704 : : #endif
705 : : double tf;
706 : : #if defined(_DYNAMIC)
707 : : double qf;
708 : : #if defined(_DERIVATE)
709 : : double qf_Vtnode_GND;
710 : : double qf_Vbi_ci;
711 : : double qf_Vb_ci;
712 : : double qf_Vbi_ei;
713 : : double qf_Vci_ei;
714 : : #endif
715 : : #endif
716 : : #if defined(_DYNAMIC)
717 : : double dqef;
718 : : #if defined(_DERIVATE)
719 : : double dqef_Vtnode_GND;
720 : : double dqef_Vbi_ei;
721 : : double dqef_Vbi_ci;
722 : : double dqef_Vb_ci;
723 : : double dqef_Vci_ei;
724 : : #endif
725 : : #endif
726 : : #if defined(_DYNAMIC)
727 : : double dtef;
728 : : #if defined(_DERIVATE)
729 : : double dtef_Vtnode_GND;
730 : : double dtef_Vbi_ei;
731 : : double dtef_Vbi_ci;
732 : : double dtef_Vb_ci;
733 : : double dtef_Vci_ei;
734 : : #endif
735 : : #endif
736 : : double dtfh;
737 : : #if defined(_DYNAMIC)
738 : : double dqfh;
739 : : #if defined(_DERIVATE)
740 : : double dqfh_Vtnode_GND;
741 : : double dqfh_Vci_ei;
742 : : double dqfh_Vbi_ei;
743 : : double dqfh_Vbi_ci;
744 : : double dqfh_Vb_ci;
745 : : #endif
746 : : #endif
747 : : #if defined(_DYNAMIC)
748 : : double tww;
749 : : #if defined(_DERIVATE)
750 : : double tww_Vtnode_GND;
751 : : double tww_Vci_ei;
752 : : double tww_Vbi_ei;
753 : : double tww_Vbi_ci;
754 : : double tww_Vb_ci;
755 : : #endif
756 : : #endif
757 : : #if defined(_DYNAMIC)
758 : : double w;
759 : : #if defined(_DERIVATE)
760 : : double w_Vci_ei;
761 : : double w_Vbi_ei;
762 : : double w_Vbi_ci;
763 : : double w_Vb_ci;
764 : : double w_Vtnode_GND;
765 : : #endif
766 : : #endif
767 : : #if defined(_DYNAMIC)
768 : : double s3;
769 : : #if defined(_DERIVATE)
770 : : double s3_Vci_ei;
771 : : double s3_Vbi_ei;
772 : : double s3_Vbi_ci;
773 : : double s3_Vb_ci;
774 : : double s3_Vtnode_GND;
775 : : #endif
776 : : #endif
777 : : #if defined(_DYNAMIC)
778 : : double qf0;
779 : : #if defined(_DERIVATE)
780 : : double qf0_Vtnode_GND;
781 : : double qf0_Vbi_ci;
782 : : double qf0_Vb_ci;
783 : : double qf0_Vbi_ei;
784 : : double qf0_Vci_ei;
785 : : #endif
786 : : #endif
787 : : #if defined(_DERIVATE)
788 : : double it_Vtnode_GND;
789 : : double it_Vbi_ei;
790 : : double it_Vbi_ci;
791 : : double it_Vb_ci;
792 : : double it_Vci_ei;
793 : : #endif
794 : : double itr;
795 : : #if defined(_DERIVATE)
796 : : double itr_Vtnode_GND;
797 : : double itr_Vbi_ci;
798 : : double itr_Vb_ci;
799 : : double itr_Vbi_ei;
800 : : double itr_Vci_ei;
801 : : #endif
802 : : double itf;
803 : : #if defined(_DERIVATE)
804 : : double itf_Vtnode_GND;
805 : : double itf_Vbi_ei;
806 : : double itf_Vbi_ci;
807 : : double itf_Vb_ci;
808 : : double itf_Vci_ei;
809 : : #endif
810 : : double facl;
811 : : #if defined(_DERIVATE)
812 : : double facl_Vtnode_GND;
813 : : double facl_Vci_ei;
814 : : double facl_Vbi_ei;
815 : : double facl_Vbi_ci;
816 : : double facl_Vb_ci;
817 : : #endif
818 : : double d_qfh;
819 : : #if defined(_DERIVATE)
820 : : double d_qfh_Vtnode_GND;
821 : : double d_qfh_Vci_ei;
822 : : double d_qfh_Vbi_ei;
823 : : double d_qfh_Vbi_ci;
824 : : double d_qfh_Vb_ci;
825 : : #endif
826 : : double wl;
827 : : #if defined(_DERIVATE)
828 : : double wl_Vtnode_GND;
829 : : double wl_Vci_ei;
830 : : double wl_Vbi_ei;
831 : : double wl_Vbi_ci;
832 : : double wl_Vb_ci;
833 : : #endif
834 : : double s3l;
835 : : #if defined(_DERIVATE)
836 : : double s3l_Vtnode_GND;
837 : : double s3l_Vci_ei;
838 : : double s3l_Vbi_ei;
839 : : double s3l_Vbi_ci;
840 : : double s3l_Vb_ci;
841 : : #endif
842 : : double al;
843 : : #if defined(_DERIVATE)
844 : : double al_Vtnode_GND;
845 : : double al_Vci_ei;
846 : : double al_Vbi_ei;
847 : : double al_Vbi_ci;
848 : : double al_Vb_ci;
849 : : #endif
850 : : double itrl;
851 : : #if defined(_DERIVATE)
852 : : double itrl_Vtnode_GND;
853 : : double itrl_Vbi_ci;
854 : : double itrl_Vb_ci;
855 : : double itrl_Vbi_ei;
856 : : #endif
857 : : double itfl;
858 : : #if defined(_DERIVATE)
859 : : double itfl_Vtnode_GND;
860 : : double itfl_Vbi_ei;
861 : : double itfl_Vbi_ci;
862 : : double itfl_Vb_ci;
863 : : #endif
864 : : double qpt;
865 : : #if defined(_DERIVATE)
866 : : double qpt_Vbi_ci;
867 : : double qpt_Vtnode_GND;
868 : : double qpt_Vb_ci;
869 : : double qpt_Vbi_ei;
870 : : #endif
871 : : double qm;
872 : : #if defined(_DERIVATE)
873 : : double qm_Vtnode_GND;
874 : : double qm_Vbi_ei;
875 : : double qm_Vbi_ci;
876 : : #endif
877 : : double itri;
878 : : #if defined(_DERIVATE)
879 : : double itri_Vtnode_GND;
880 : : double itri_Vbi_ci;
881 : : #endif
882 : : double le2;
883 : : #if defined(_DERIVATE)
884 : : double le2_Vbi_ci;
885 : : double le2_Vtnode_GND;
886 : : #endif
887 : : double arg2;
888 : : #if defined(_DERIVATE)
889 : : double arg2_Vbi_ci;
890 : : double arg2_Vtnode_GND;
891 : : #endif
892 : : double itfi;
893 : : #if defined(_DERIVATE)
894 : : double itfi_Vtnode_GND;
895 : : double itfi_Vbi_ei;
896 : : #endif
897 : : double le1;
898 : : #if defined(_DERIVATE)
899 : : double le1_Vbi_ei;
900 : : double le1_Vtnode_GND;
901 : : #endif
902 : : double arg1;
903 : : #if defined(_DERIVATE)
904 : : double arg1_Vbi_ei;
905 : : double arg1_Vtnode_GND;
906 : : #endif
907 : : double ickr;
908 : : double ickf;
909 : : #if defined(_DYNAMIC)
910 : : double tf0;
911 : : #if defined(_DERIVATE)
912 : : double tf0_Vtnode_GND;
913 : : double tf0_Vbi_ci;
914 : : double tf0_Vb_ci;
915 : : #endif
916 : : #endif
917 : : double qj_2;
918 : : #if defined(_DERIVATE)
919 : : double qj_2_Vbi_ci;
920 : : double qj_2_Vtnode_GND;
921 : : double qj_2_Vb_ci;
922 : : #endif
923 : : double cc;
924 : : #if defined(_DERIVATE)
925 : : double cc_Vtnode_GND;
926 : : double cc_Vbi_ci;
927 : : double cc_Vb_ci;
928 : : #endif
929 : : double ick;
930 : : #if defined(_DERIVATE)
931 : : double ick_Vtnode_GND;
932 : : double ick_Vci_ei;
933 : : #endif
934 : : double vceff;
935 : : #if defined(_DERIVATE)
936 : : double vceff_Vtnode_GND;
937 : : double vceff_Vci_ei;
938 : : #endif
939 : : double uvc;
940 : : #if defined(_DERIVATE)
941 : : double uvc_Vci_ei;
942 : : double uvc_Vtnode_GND;
943 : : #endif
944 : : double vc;
945 : : #if defined(_DERIVATE)
946 : : double vc_Vci_ei;
947 : : double vc_Vtnode_GND;
948 : : #endif
949 : : #if defined(_DERIVATEFORDDX)
950 : : double qjei_Vtnode_GND;
951 : : double qjei_Vbi_ei;
952 : : double qjei_Vbi_ci;
953 : : double qjei_Vb_ci;
954 : : #if defined(_DERIVATE)
955 : : double qjei_Vbi_ci_Vtnode_GND;
956 : : double qjei_Vbi_ci_Vbi_ei;
957 : : double qjei_Vbi_ci_Vbi_ci;
958 : : double qjei_Vbi_ci_Vb_ci;
959 : : double qjei_Vbi_ei_Vtnode_GND;
960 : : double qjei_Vbi_ei_Vbi_ei;
961 : : double qjei_Vbi_ei_Vbi_ci;
962 : : double qjei_Vbi_ei_Vb_ci;
963 : : #endif
964 : : #endif
965 : : double cjcii;
966 : : #if defined(_DERIVATE)
967 : : double cjcii_Vtnode_GND;
968 : : double cjcii_Vbi_ci;
969 : : double cjcii_Vb_ci;
970 : : #endif
971 : : double dvj;
972 : : #if defined(_DERIVATE)
973 : : double dvj_Vbi_ci;
974 : : double dvj_Vtnode_GND;
975 : : double dvj_Vb_ci;
976 : : #endif
977 : : #if defined(_DYNAMIC)
978 : : double qjcii;
979 : : #if defined(_DERIVATE)
980 : : double qjcii_Vbi_ci;
981 : : double qjcii_Vtnode_GND;
982 : : double qjcii_Vb_ci;
983 : : #endif
984 : : #endif
985 : : #if defined(_DERIVATE)
986 : : double qjci_Vbi_ci;
987 : : double qjci_Vtnode_GND;
988 : : double qjci_Vb_ci;
989 : : #endif
990 : : double cjcx0_t_ii;
991 : : #if defined(_DERIVATE)
992 : : double cjcx0_t_ii_Vtnode_GND;
993 : : #endif
994 : : double y;
995 : : #if defined(_DERIVATEFORDDX)
996 : : double y_Vci_ei;
997 : : double y_Vs_ci;
998 : : double y_Vbi_ei;
999 : : double y_Vbi_ci;
1000 : : double y_Vtnode_GND;
1001 : : double y_Vb_ci;
1002 : : #if defined(_DERIVATE)
1003 : : double y_Vbi_ci_Vci_ei;
1004 : : double y_Vbi_ci_Vs_ci;
1005 : : double y_Vbi_ci_Vbi_ei;
1006 : : double y_Vbi_ci_Vbi_ci;
1007 : : double y_Vbi_ci_Vtnode_GND;
1008 : : double y_Vbi_ci_Vb_ci;
1009 : : double y_Vbi_ei_Vci_ei;
1010 : : double y_Vbi_ei_Vs_ci;
1011 : : double y_Vbi_ei_Vbi_ei;
1012 : : double y_Vbi_ei_Vbi_ci;
1013 : : double y_Vbi_ei_Vtnode_GND;
1014 : : double y_Vbi_ei_Vb_ci;
1015 : : #endif
1016 : : #endif
1017 : : double x;
1018 : : #if defined(_DERIVATE)
1019 : : double x_Vtnode_GND;
1020 : : double x_Vci_ei;
1021 : : #endif
1022 : : double v_j;
1023 : : #if defined(_DERIVATEFORDDX)
1024 : : double v_j_Vs_ci;
1025 : : double v_j_Vbi_ei;
1026 : : double v_j_Vbi_ci;
1027 : : double v_j_Vtnode_GND;
1028 : : double v_j_Vb_ci;
1029 : : #if defined(_DERIVATE)
1030 : : double v_j_Vbi_ci_Vs_ci;
1031 : : double v_j_Vbi_ci_Vbi_ei;
1032 : : double v_j_Vbi_ci_Vbi_ci;
1033 : : double v_j_Vbi_ci_Vtnode_GND;
1034 : : double v_j_Vbi_ci_Vb_ci;
1035 : : double v_j_Vbi_ei_Vs_ci;
1036 : : double v_j_Vbi_ei_Vbi_ei;
1037 : : double v_j_Vbi_ei_Vbi_ci;
1038 : : double v_j_Vbi_ei_Vtnode_GND;
1039 : : double v_j_Vbi_ei_Vb_ci;
1040 : : #endif
1041 : : #endif
1042 : : double xvf2;
1043 : : #if defined(_DERIVATEFORDDX)
1044 : : double xvf2_Vs_ci;
1045 : : double xvf2_Vbi_ei;
1046 : : double xvf2_Vbi_ci;
1047 : : double xvf2_Vtnode_GND;
1048 : : double xvf2_Vb_ci;
1049 : : #if defined(_DERIVATE)
1050 : : double xvf2_Vbi_ci_Vs_ci;
1051 : : double xvf2_Vbi_ci_Vbi_ei;
1052 : : double xvf2_Vbi_ci_Vbi_ci;
1053 : : double xvf2_Vbi_ci_Vtnode_GND;
1054 : : double xvf2_Vbi_ci_Vb_ci;
1055 : : double xvf2_Vbi_ei_Vs_ci;
1056 : : double xvf2_Vbi_ei_Vbi_ei;
1057 : : double xvf2_Vbi_ei_Vbi_ci;
1058 : : double xvf2_Vbi_ei_Vtnode_GND;
1059 : : double xvf2_Vbi_ei_Vb_ci;
1060 : : #endif
1061 : : #endif
1062 : : double xvf;
1063 : : #if defined(_DERIVATEFORDDX)
1064 : : double xvf_Vs_ci;
1065 : : double xvf_Vbi_ei;
1066 : : double xvf_Vbi_ci;
1067 : : double xvf_Vtnode_GND;
1068 : : double xvf_Vb_ci;
1069 : : #if defined(_DERIVATE)
1070 : : double xvf_Vbi_ci_Vs_ci;
1071 : : double xvf_Vbi_ci_Vbi_ei;
1072 : : double xvf_Vbi_ci_Vbi_ci;
1073 : : double xvf_Vbi_ci_Vtnode_GND;
1074 : : double xvf_Vbi_ci_Vb_ci;
1075 : : double xvf_Vbi_ei_Vs_ci;
1076 : : double xvf_Vbi_ei_Vbi_ei;
1077 : : double xvf_Vbi_ei_Vbi_ci;
1078 : : double xvf_Vbi_ei_Vtnode_GND;
1079 : : double xvf_Vbi_ei_Vb_ci;
1080 : : #endif
1081 : : #endif
1082 : : #if defined(_DYNAMIC)
1083 : : double qjcx;
1084 : : #if defined(_DERIVATE)
1085 : : double qjcx_Vbi_ci;
1086 : : double qjcx_Vtnode_GND;
1087 : : double qjcx_Vb_ci;
1088 : : #endif
1089 : : #endif
1090 : : double qj3;
1091 : : #if defined(_DERIVATE)
1092 : : double qj3_Vci_ei;
1093 : : double qj3_Vbi_ei;
1094 : : double qj3_Vs_ci;
1095 : : double qj3_Vbi_ci;
1096 : : double qj3_Vtnode_GND;
1097 : : double qj3_Vb_ci;
1098 : : #endif
1099 : : double qj2;
1100 : : #if defined(_DERIVATE)
1101 : : double qj2_Vci_ei;
1102 : : double qj2_Vbi_ei;
1103 : : double qj2_Vs_ci;
1104 : : double qj2_Vbi_ci;
1105 : : double qj2_Vtnode_GND;
1106 : : double qj2_Vb_ci;
1107 : : #endif
1108 : : double qj1;
1109 : : #if defined(_DERIVATE)
1110 : : double qj1_Vci_ei;
1111 : : double qj1_Vbi_ei;
1112 : : double qj1_Vs_ci;
1113 : : double qj1_Vbi_ci;
1114 : : double qj1_Vtnode_GND;
1115 : : double qj1_Vb_ci;
1116 : : #endif
1117 : : double vdj2;
1118 : : #if defined(_DERIVATE)
1119 : : double vdj2_Vci_ei;
1120 : : double vdj2_Vbi_ei;
1121 : : double vdj2_Vs_ci;
1122 : : double vdj2_Vbi_ci;
1123 : : double vdj2_Vtnode_GND;
1124 : : double vdj2_Vb_ci;
1125 : : #endif
1126 : : double vdj1;
1127 : : #if defined(_DERIVATE)
1128 : : double vdj1_Vci_ei;
1129 : : double vdj1_Vbi_ei;
1130 : : double vdj1_Vs_ci;
1131 : : double vdj1_Vbi_ci;
1132 : : double vdj1_Vtnode_GND;
1133 : : double vdj1_Vb_ci;
1134 : : #endif
1135 : : double ezr;
1136 : : double ez;
1137 : : double vj4;
1138 : : #if defined(_DERIVATE)
1139 : : double vj4_Vs_ci;
1140 : : double vj4_Vci_ei;
1141 : : double vj4_Vbi_ei;
1142 : : double vj4_Vbi_ci;
1143 : : double vj4_Vb_ci;
1144 : : double vj4_Vtnode_GND;
1145 : : #endif
1146 : : double vj2;
1147 : : #if defined(_DERIVATE)
1148 : : double vj2_Vci_ei;
1149 : : double vj2_Vbi_ei;
1150 : : double vj2_Vs_ci;
1151 : : double vj2_Vbi_ci;
1152 : : double vj2_Vtnode_GND;
1153 : : double vj2_Vb_ci;
1154 : : #endif
1155 : : double vr;
1156 : : #if defined(_DERIVATE)
1157 : : double vr_Vci_ei;
1158 : : double vr_Vbi_ei;
1159 : : double vr_Vs_ci;
1160 : : double vr_Vbi_ci;
1161 : : double vr_Vtnode_GND;
1162 : : double vr_Vb_ci;
1163 : : #endif
1164 : : double vj1;
1165 : : #if defined(_DERIVATE)
1166 : : double vj1_Vci_ei;
1167 : : double vj1_Vbi_ei;
1168 : : double vj1_Vs_ci;
1169 : : double vj1_Vbi_ci;
1170 : : double vj1_Vtnode_GND;
1171 : : double vj1_Vb_ci;
1172 : : #endif
1173 : : double ee1;
1174 : : #if defined(_DERIVATE)
1175 : : double ee1_Vs_ci;
1176 : : double ee1_Vci_ei;
1177 : : double ee1_Vbi_ei;
1178 : : double ee1_Vbi_ci;
1179 : : double ee1_Vtnode_GND;
1180 : : double ee1_Vb_ci;
1181 : : #endif
1182 : : double ex1;
1183 : : #if defined(_DERIVATE)
1184 : : double ex1_Vs_ci;
1185 : : double ex1_Vci_ei;
1186 : : double ex1_Vbi_ei;
1187 : : double ex1_Vbi_ci;
1188 : : double ex1_Vtnode_GND;
1189 : : double ex1_Vb_ci;
1190 : : #endif
1191 : : double ve;
1192 : : #if defined(_DERIVATE)
1193 : : double ve_Vs_ci;
1194 : : double ve_Vci_ei;
1195 : : double ve_Vbi_ei;
1196 : : double ve_Vbi_ci;
1197 : : double ve_Vtnode_GND;
1198 : : double ve_Vb_ci;
1199 : : #endif
1200 : : double a;
1201 : : #if defined(_DERIVATE)
1202 : : double a_Vci_ei;
1203 : : double a_Vbi_ei;
1204 : : double a_Vbi_ci;
1205 : : double a_Vb_ci;
1206 : : double a_Vtnode_GND;
1207 : : #endif
1208 : : double cr;
1209 : : #if defined(_DERIVATE)
1210 : : double cr_Vtnode_GND;
1211 : : #endif
1212 : : double cmax;
1213 : : #if defined(_DERIVATE)
1214 : : double cmax_Vtnode_GND;
1215 : : #endif
1216 : : double vf;
1217 : : #if defined(_DERIVATE)
1218 : : double vf_Vtnode_GND;
1219 : : #endif
1220 : : double vp;
1221 : : #if defined(_DERIVATE)
1222 : : double vp_Vtnode_GND;
1223 : : #endif
1224 : : double zr;
1225 : : double cjcx0_t_i;
1226 : : #if defined(_DERIVATE)
1227 : : double cjcx0_t_i_Vtnode_GND;
1228 : : #endif
1229 : : #if defined(_DYNAMIC)
1230 : : double qjcxi;
1231 : : #if defined(_DERIVATE)
1232 : : double qjcxi_Vbi_ci;
1233 : : double qjcxi_Vtnode_GND;
1234 : : double qjcxi_Vb_ci;
1235 : : #endif
1236 : : #endif
1237 : : double cjci0_t_ii;
1238 : : #if defined(_DERIVATE)
1239 : : double cjci0_t_ii_Vtnode_GND;
1240 : : #endif
1241 : : double kavl_t;
1242 : : #if defined(_DERIVATE)
1243 : : double kavl_t_Vtnode_GND;
1244 : : #endif
1245 : : double eavl_t;
1246 : : #if defined(_DERIVATE)
1247 : : double eavl_t_Vtnode_GND;
1248 : : #endif
1249 : : double re_t;
1250 : : #if defined(_DERIVATE)
1251 : : double re_t_Vtnode_GND;
1252 : : #endif
1253 : : double rbi0_t;
1254 : : #if defined(_DERIVATE)
1255 : : double rbi0_t_Vtnode_GND;
1256 : : #endif
1257 : : double rcx_t;
1258 : : #if defined(_DERIVATE)
1259 : : double rcx_t_Vtnode_GND;
1260 : : #endif
1261 : : double rbx_t;
1262 : : #if defined(_DERIVATE)
1263 : : double rbx_t_Vtnode_GND;
1264 : : #endif
1265 : : #if defined(_DYNAMIC)
1266 : : double tef0_t;
1267 : : #if defined(_DERIVATE)
1268 : : double tef0_t_Vtnode_GND;
1269 : : #endif
1270 : : #endif
1271 : : #if defined(_DYNAMIC)
1272 : : double dvg;
1273 : : #endif
1274 : : #if defined(_DYNAMIC)
1275 : : double zetatef;
1276 : : #endif
1277 : : #if defined(_DYNAMIC)
1278 : : double thcs_t;
1279 : : #if defined(_DERIVATE)
1280 : : double thcs_t_Vtnode_GND;
1281 : : #endif
1282 : : #endif
1283 : : #if defined(_DYNAMIC)
1284 : : double t0_t;
1285 : : #if defined(_DERIVATE)
1286 : : double t0_t_Vtnode_GND;
1287 : : #endif
1288 : : #endif
1289 : : double vces_t;
1290 : : #if defined(_DERIVATE)
1291 : : double vces_t_Vtnode_GND;
1292 : : #endif
1293 : : double vlim_t;
1294 : : #if defined(_DERIVATE)
1295 : : double vlim_t_Vtnode_GND;
1296 : : #endif
1297 : : double rci0_t;
1298 : : #if defined(_DERIVATE)
1299 : : double rci0_t_Vtnode_GND;
1300 : : #endif
1301 : : #if defined(_DYNAMIC)
1302 : : double cjs0_t;
1303 : : #if defined(_DERIVATE)
1304 : : double cjs0_t_Vtnode_GND;
1305 : : #endif
1306 : : #endif
1307 : : #if defined(_DYNAMIC)
1308 : : double vds_t;
1309 : : #if defined(_DERIVATE)
1310 : : double vds_t_Vtnode_GND;
1311 : : #endif
1312 : : #endif
1313 : : double cjcx0_t;
1314 : : #if defined(_DERIVATE)
1315 : : double cjcx0_t_Vtnode_GND;
1316 : : #endif
1317 : : double vdcx_t;
1318 : : #if defined(_DERIVATE)
1319 : : double vdcx_t_Vtnode_GND;
1320 : : #endif
1321 : : double cjci0_t;
1322 : : #if defined(_DERIVATE)
1323 : : double cjci0_t_Vtnode_GND;
1324 : : #endif
1325 : : double vdci_t;
1326 : : #if defined(_DERIVATE)
1327 : : double vdci_t_Vtnode_GND;
1328 : : #endif
1329 : : double aje_t;
1330 : : #if defined(_DERIVATE)
1331 : : double aje_t_Vtnode_GND;
1332 : : #endif
1333 : : double cje0_t;
1334 : : #if defined(_DERIVATE)
1335 : : double cje0_t_Vtnode_GND;
1336 : : #endif
1337 : : double vde_t;
1338 : : #if defined(_DERIVATE)
1339 : : double vde_t_Vtnode_GND;
1340 : : #endif
1341 : : double vdjt;
1342 : : #if defined(_DERIVATE)
1343 : : double vdjt_Vtnode_GND;
1344 : : #endif
1345 : : double vdj0;
1346 : : double arg;
1347 : : double iscs_t;
1348 : : #if defined(_DERIVATE)
1349 : : double iscs_t_Vtnode_GND;
1350 : : #endif
1351 : : double itss_t;
1352 : : #if defined(_DERIVATE)
1353 : : double itss_t_Vtnode_GND;
1354 : : #endif
1355 : : double ibcs_t;
1356 : : #if defined(_DERIVATE)
1357 : : double ibcs_t_Vtnode_GND;
1358 : : #endif
1359 : : double ires_t;
1360 : : #if defined(_DERIVATE)
1361 : : double ires_t_Vtnode_GND;
1362 : : #endif
1363 : : double ibes_t;
1364 : : #if defined(_DERIVATE)
1365 : : double ibes_t_Vtnode_GND;
1366 : : #endif
1367 : : double is_t;
1368 : : #if defined(_DERIVATE)
1369 : : double is_t_Vtnode_GND;
1370 : : #endif
1371 : : double zetasct;
1372 : : double zetabci;
1373 : : double mg;
1374 : : #if defined(_DYNAMIC)
1375 : : double vgsc;
1376 : : #endif
1377 : : double vgbc;
1378 : : double vgbe;
1379 : : double avs;
1380 : : double k2;
1381 : : double k1;
1382 : : double ln_qtt0;
1383 : : #if defined(_DERIVATE)
1384 : : double ln_qtt0_Vtnode_GND;
1385 : : #endif
1386 : : double qtt0;
1387 : : #if defined(_DERIVATE)
1388 : : double qtt0_Vtnode_GND;
1389 : : #endif
1390 : : double dT;
1391 : : #if defined(_DERIVATE)
1392 : : double dT_Vtnode_GND;
1393 : : #endif
1394 : : double VT;
1395 : : #if defined(_DERIVATE)
1396 : : double VT_Vtnode_GND;
1397 : : #endif
1398 : : double VT0;
1399 : : double Tdev;
1400 : : #if defined(_DERIVATE)
1401 : : double Tdev_Vtnode_GND;
1402 : : #endif
1403 : : double Tamb;
1404 : : double Tnom;
1405 : : double Vrth;
1406 : : #if defined(_DERIVATE)
1407 : : double Vrth_Vtnode_GND;
1408 : : #endif
1409 : : #if defined(_DYNAMIC)
1410 : : double Vbe;
1411 : : #if defined(_DERIVATE)
1412 : : double Vbe_Vb_e;
1413 : : #endif
1414 : : #endif
1415 : : double Vbbi;
1416 : : #if defined(_DERIVATE)
1417 : : double Vbbi_Vb_bi;
1418 : : #endif
1419 : : double Vcic;
1420 : : #if defined(_DERIVATE)
1421 : : double Vcic_Vci_c;
1422 : : #endif
1423 : : double Veie;
1424 : : #if defined(_DERIVATE)
1425 : : double Veie_Vei_e;
1426 : : #endif
1427 : : double Vsci;
1428 : : #if defined(_DERIVATE)
1429 : : double Vsci_Vs_ci;
1430 : : #endif
1431 : : double Vciei;
1432 : : #if defined(_DERIVATE)
1433 : : double Vciei_Vci_ei;
1434 : : #endif
1435 : : double Vbiei;
1436 : : #if defined(_DERIVATEFORDDX)
1437 : : double Vbiei_Vbi_ei;
1438 : : #if defined(_DERIVATE)
1439 : : double Vbiei_Vbi_ei_Vbi_ei;
1440 : : #endif
1441 : : #endif
1442 : : double Vbici;
1443 : : #if defined(_DERIVATEFORDDX)
1444 : : double Vbici_Vbi_ci;
1445 : : #if defined(_DERIVATE)
1446 : : double Vbici_Vbi_ci_Vbi_ci;
1447 : : #endif
1448 : : #endif
1449 : : double Vbci;
1450 : : #if defined(_DERIVATE)
1451 : : double Vbci_Vb_ci;
1452 : : #endif
1453 : : #if defined(_DERIVATE)
1454 : 0 : Vbci_Vb_ci=(HICUMtype);
1455 : : #endif
1456 [ # # ]: 0 : Vbci=(HICUMtype*BP(b,ci));
1457 : : #if defined(_DERIVATEFORDDX)
1458 : 0 : Vbici_Vbi_ci=(HICUMtype);
1459 : : #if defined(_DERIVATE)
1460 [ # # ]: 0 : Vbici_Vbi_ci_Vbi_ci=(+0.0*BP(bi,ci)+0.0*1.0+0.0*1.0+HICUMtype*0.0);
1461 : : #endif
1462 : : #endif
1463 [ # # ]: 0 : Vbici=(HICUMtype*BP(bi,ci));
1464 : : #if defined(_DERIVATEFORDDX)
1465 : 0 : Vbiei_Vbi_ei=(HICUMtype);
1466 : : #if defined(_DERIVATE)
1467 [ # # ]: 0 : Vbiei_Vbi_ei_Vbi_ei=(+0.0*BP(bi,ei)+0.0*1.0+0.0*1.0+HICUMtype*0.0);
1468 : : #endif
1469 : : #endif
1470 [ # # ]: 0 : Vbiei=(HICUMtype*BP(bi,ei));
1471 : : #if defined(_DERIVATE)
1472 : 0 : Vciei_Vci_ei=(HICUMtype);
1473 : : #endif
1474 [ # # ]: 0 : Vciei=(HICUMtype*BP(ci,ei));
1475 : : #if defined(_DERIVATE)
1476 : 0 : Vsci_Vs_ci=(HICUMtype);
1477 : : #endif
1478 [ # # ]: 0 : Vsci=(HICUMtype*BP(s,ci));
1479 : : #if defined(_DERIVATE)
1480 : 0 : Veie_Vei_e=1.0;
1481 : : #endif
1482 [ # # ]: 0 : Veie=BP(ei,e);
1483 : : #if defined(_DERIVATE)
1484 : 0 : Vcic_Vci_c=1.0;
1485 : : #endif
1486 [ # # ]: 0 : Vcic=BP(ci,c);
1487 : : #if defined(_DERIVATE)
1488 : 0 : Vbbi_Vb_bi=1.0;
1489 : : #endif
1490 [ # # ]: 0 : Vbbi=BP(b,bi);
1491 : : #if defined(_DYNAMIC)
1492 : : #if defined(_DERIVATE)
1493 : 0 : Vbe_Vb_e=(HICUMtype);
1494 : : #endif
1495 [ # # ]: 0 : Vbe=(HICUMtype*BP(b,e));
1496 : : #endif
1497 : : #if defined(_DERIVATE)
1498 : 0 : Vrth_Vtnode_GND=1.0;
1499 : : #endif
1500 : 0 : Vrth=NP(tnode);
1501 : 0 : Tnom=(tnom+273.15);
1502 : 0 : Tamb=_circuit_temp;
1503 : : #if defined(_DERIVATE)
1504 : 0 : Tdev_Vtnode_GND=Vrth_Vtnode_GND;
1505 : : #endif
1506 : 0 : Tdev=((Tamb+dt)+Vrth);
1507 [ # # ]: 0 : if
1508 : : (Tdev<((-100.0)+273.15))
1509 : : {
1510 : : #if defined(_DERIVATE)
1511 : 0 : Tdev_Vtnode_GND=0.0;
1512 : : #endif
1513 : 0 : Tdev=((-100.0)+273.15);
1514 : : }
1515 : : else
1516 : : {
1517 [ # # ]: 0 : if
1518 : : (Tdev>(326.85+273.15))
1519 : : {
1520 : : #if defined(_DERIVATE)
1521 : 0 : Tdev_Vtnode_GND=0.0;
1522 : : #endif
1523 : 0 : Tdev=(326.85+273.15);
1524 : : }
1525 : : }
1526 : 0 : VT0=((1.3806503e-23*Tnom)/1.602176462e-19);
1527 : : #if defined(_DERIVATE)
1528 : 0 : VT_Vtnode_GND=((1.3806503e-23*Tdev_Vtnode_GND)/1.602176462e-19);
1529 : : #endif
1530 : 0 : VT=((1.3806503e-23*Tdev)/1.602176462e-19);
1531 : : #if defined(_DERIVATE)
1532 : 0 : dT_Vtnode_GND=Tdev_Vtnode_GND;
1533 : : #endif
1534 : 0 : dT=(Tdev-Tnom);
1535 : : #if defined(_DERIVATE)
1536 : 0 : qtt0_Vtnode_GND=(Tdev_Vtnode_GND/Tnom);
1537 : : #endif
1538 : 0 : qtt0=(Tdev/Tnom);
1539 : : {
1540 : 0 : double m00_logE(d00_logE0,qtt0)
1541 : : #if defined(_DERIVATE)
1542 : 0 : double m10_logE(d10_logE0,d00_logE0,qtt0)
1543 : : #endif
1544 : : #if defined(_DERIVATE)
1545 : 0 : ln_qtt0_Vtnode_GND=qtt0_Vtnode_GND*d10_logE0;
1546 : : #endif
1547 : 0 : ln_qtt0=d00_logE0;
1548 : : }
1549 : : #if defined(_DYNAMIC)
1550 : 0 : k1=(f1vg*Tnom);
1551 : : #endif
1552 : : #if defined(_DYNAMIC)
1553 : : {
1554 : 0 : double m00_logE(d00_logE0,Tnom)
1555 : 0 : k2=((f2vg*Tnom)+(k1*d00_logE0));
1556 : : }
1557 : : #endif
1558 : 0 : avs=(alvs*Tnom);
1559 : 0 : vgbe=((vgb+vge)/2);
1560 : 0 : vgbc=((vgb+vgc)/2);
1561 : : #if defined(_DYNAMIC)
1562 : 0 : vgsc=((vgs+vgc)/2);
1563 : : #endif
1564 : 0 : mg=(3-((1.602176462e-19*f1vg)/1.3806503e-23));
1565 : 0 : zetabci=((mg+1)-zetaci);
1566 : 0 : zetasct=(mg-1.5);
1567 : : {
1568 : 0 : double m00_exp(d00_exp0,((zetact*ln_qtt0)+((vgb/VT)*(qtt0-1))))
1569 : : #if defined(_DERIVATE)
1570 : : #define d10_exp0 d00_exp0
1571 : : #endif
1572 : : #if defined(_DERIVATE)
1573 : 0 : is_t_Vtnode_GND=(is*((zetact*ln_qtt0_Vtnode_GND)+(((-vgb*VT_Vtnode_GND/VT/VT)*(qtt0-1))+((vgb/VT)*qtt0_Vtnode_GND)))*d10_exp0);
1574 : : #endif
1575 : 0 : is_t=(is*d00_exp0);
1576 : : }
1577 : : {
1578 : 0 : double m00_exp(d00_exp0,((zetabet*ln_qtt0)+((vge/VT)*(qtt0-1))))
1579 : : #if defined(_DERIVATE)
1580 : : #define d10_exp0 d00_exp0
1581 : : #endif
1582 : : #if defined(_DERIVATE)
1583 : 0 : ibes_t_Vtnode_GND=(ibes*((zetabet*ln_qtt0_Vtnode_GND)+(((-vge*VT_Vtnode_GND/VT/VT)*(qtt0-1))+((vge/VT)*qtt0_Vtnode_GND)))*d10_exp0);
1584 : : #endif
1585 : 0 : ibes_t=(ibes*d00_exp0);
1586 : : }
1587 : : {
1588 : 0 : double m00_exp(d00_exp0,(((0.5*mg)*ln_qtt0)+(((0.5*vgbe)/VT)*(qtt0-1))))
1589 : : #if defined(_DERIVATE)
1590 : : #define d10_exp0 d00_exp0
1591 : : #endif
1592 : : #if defined(_DERIVATE)
1593 : 0 : ires_t_Vtnode_GND=(ires*(((0.5*mg)*ln_qtt0_Vtnode_GND)+(((-(0.5*vgbe)*VT_Vtnode_GND/VT/VT)*(qtt0-1))+(((0.5*vgbe)/VT)*qtt0_Vtnode_GND)))*d10_exp0);
1594 : : #endif
1595 : 0 : ires_t=(ires*d00_exp0);
1596 : : }
1597 : : {
1598 : 0 : double m00_exp(d00_exp0,((zetabci*ln_qtt0)+((vgc/VT)*(qtt0-1))))
1599 : : #if defined(_DERIVATE)
1600 : : #define d10_exp0 d00_exp0
1601 : : #endif
1602 : : #if defined(_DERIVATE)
1603 : 0 : ibcs_t_Vtnode_GND=(ibcs*((zetabci*ln_qtt0_Vtnode_GND)+(((-vgc*VT_Vtnode_GND/VT/VT)*(qtt0-1))+((vgc/VT)*qtt0_Vtnode_GND)))*d10_exp0);
1604 : : #endif
1605 : 0 : ibcs_t=(ibcs*d00_exp0);
1606 : : }
1607 : : {
1608 : 0 : double m00_exp(d00_exp0,((zetasct*ln_qtt0)+((vgc/VT)*(qtt0-1))))
1609 : : #if defined(_DERIVATE)
1610 : : #define d10_exp0 d00_exp0
1611 : : #endif
1612 : : #if defined(_DERIVATE)
1613 : 0 : itss_t_Vtnode_GND=(itss*((zetasct*ln_qtt0_Vtnode_GND)+(((-vgc*VT_Vtnode_GND/VT/VT)*(qtt0-1))+((vgc/VT)*qtt0_Vtnode_GND)))*d10_exp0);
1614 : : #endif
1615 : 0 : itss_t=(itss*d00_exp0);
1616 : : }
1617 : : {
1618 : 0 : double m00_exp(d00_exp0,((zetasct*ln_qtt0)+((vgs/VT)*(qtt0-1))))
1619 : : #if defined(_DERIVATE)
1620 : : #define d10_exp0 d00_exp0
1621 : : #endif
1622 : : #if defined(_DERIVATE)
1623 : 0 : iscs_t_Vtnode_GND=(iscs*((zetasct*ln_qtt0_Vtnode_GND)+(((-vgs*VT_Vtnode_GND/VT/VT)*(qtt0-1))+((vgs/VT)*qtt0_Vtnode_GND)))*d10_exp0);
1624 : : #endif
1625 : 0 : iscs_t=(iscs*d00_exp0);
1626 : : }
1627 : 0 : arg=((0.5*vde)/VT0);
1628 : : {
1629 : 0 : double m00_exp(d00_exp0,arg)
1630 : 0 : double m00_exp(d00_exp1,(-arg))
1631 : 0 : double m00_logE(d00_logE2,(d00_exp0-d00_exp1))
1632 : 0 : vdj0=((2*VT0)*d00_logE2);
1633 : : }
1634 : : #if defined(_DERIVATE)
1635 : 0 : vdjt_Vtnode_GND=(((vdj0*qtt0_Vtnode_GND)+(vgbe*(-qtt0_Vtnode_GND)))-(((mg*VT_Vtnode_GND)*ln_qtt0)+((mg*VT)*ln_qtt0_Vtnode_GND)));
1636 : : #endif
1637 : 0 : vdjt=(((vdj0*qtt0)+(vgbe*(1-qtt0)))-((mg*VT)*ln_qtt0));
1638 : : {
1639 : 0 : double m00_exp(d00_exp0,((-vdjt)/VT))
1640 : 0 : double m00_sqrt(d00_sqrt1,(1+(4*d00_exp0)))
1641 : 0 : double m00_logE(d00_logE2,(0.5*(1+d00_sqrt1)))
1642 : : #if defined(_DERIVATE)
1643 : : #define d10_exp0 d00_exp0
1644 : 0 : double m10_sqrt(d10_sqrt1,d00_sqrt1,(1+(4*d00_exp0)))
1645 : 0 : double m10_logE(d10_logE2,d00_logE2,(0.5*(1+d00_sqrt1)))
1646 : : #endif
1647 : : #if defined(_DERIVATE)
1648 : 0 : vde_t_Vtnode_GND=(vdjt_Vtnode_GND+(((2*VT_Vtnode_GND)*d00_logE2)+((2*VT)*(0.5*(4*(((-vdjt_Vtnode_GND)*VT-(-vdjt)*VT_Vtnode_GND)/VT/VT)*d10_exp0)*d10_sqrt1)*d10_logE2)));
1649 : : #endif
1650 : 0 : vde_t=(vdjt+((2*VT)*d00_logE2));
1651 : : }
1652 : : {
1653 : 0 : double m00_logE(d00_logE0,(vde/vde_t))
1654 : 0 : double m00_exp(d00_exp1,(ze*d00_logE0))
1655 : : #if defined(_DERIVATE)
1656 : 0 : double m10_logE(d10_logE0,d00_logE0,(vde/vde_t))
1657 : : #define d10_exp1 d00_exp1
1658 : : #endif
1659 : : #if defined(_DERIVATE)
1660 : 0 : cje0_t_Vtnode_GND=(cje0*(ze*(-vde*vde_t_Vtnode_GND/vde_t/vde_t)*d10_logE0)*d10_exp1);
1661 : : #endif
1662 : 0 : cje0_t=(cje0*d00_exp1);
1663 : : }
1664 : : #if defined(_DERIVATE)
1665 : 0 : aje_t_Vtnode_GND=((aje*vde_t_Vtnode_GND)/vde);
1666 : : #endif
1667 : 0 : aje_t=((aje*vde_t)/vde);
1668 : 0 : arg=((0.5*vdci)/VT0);
1669 : : {
1670 : 0 : double m00_exp(d00_exp0,arg)
1671 : 0 : double m00_exp(d00_exp1,(-arg))
1672 : 0 : double m00_logE(d00_logE2,(d00_exp0-d00_exp1))
1673 : 0 : vdj0=((2*VT0)*d00_logE2);
1674 : : }
1675 : : #if defined(_DERIVATE)
1676 : 0 : vdjt_Vtnode_GND=(((vdj0*qtt0_Vtnode_GND)+(vgbc*(-qtt0_Vtnode_GND)))-(((mg*VT_Vtnode_GND)*ln_qtt0)+((mg*VT)*ln_qtt0_Vtnode_GND)));
1677 : : #endif
1678 : 0 : vdjt=(((vdj0*qtt0)+(vgbc*(1-qtt0)))-((mg*VT)*ln_qtt0));
1679 : : {
1680 : 0 : double m00_exp(d00_exp0,((-vdjt)/VT))
1681 : 0 : double m00_sqrt(d00_sqrt1,(1+(4*d00_exp0)))
1682 : 0 : double m00_logE(d00_logE2,(0.5*(1+d00_sqrt1)))
1683 : : #if defined(_DERIVATE)
1684 : : #define d10_exp0 d00_exp0
1685 : 0 : double m10_sqrt(d10_sqrt1,d00_sqrt1,(1+(4*d00_exp0)))
1686 : 0 : double m10_logE(d10_logE2,d00_logE2,(0.5*(1+d00_sqrt1)))
1687 : : #endif
1688 : : #if defined(_DERIVATE)
1689 : 0 : vdci_t_Vtnode_GND=(vdjt_Vtnode_GND+(((2*VT_Vtnode_GND)*d00_logE2)+((2*VT)*(0.5*(4*(((-vdjt_Vtnode_GND)*VT-(-vdjt)*VT_Vtnode_GND)/VT/VT)*d10_exp0)*d10_sqrt1)*d10_logE2)));
1690 : : #endif
1691 : 0 : vdci_t=(vdjt+((2*VT)*d00_logE2));
1692 : : }
1693 : : {
1694 : 0 : double m00_logE(d00_logE0,(vdci/vdci_t))
1695 : 0 : double m00_exp(d00_exp1,(zci*d00_logE0))
1696 : : #if defined(_DERIVATE)
1697 : 0 : double m10_logE(d10_logE0,d00_logE0,(vdci/vdci_t))
1698 : : #define d10_exp1 d00_exp1
1699 : : #endif
1700 : : #if defined(_DERIVATE)
1701 : 0 : cjci0_t_Vtnode_GND=(cjci0*(zci*(-vdci*vdci_t_Vtnode_GND/vdci_t/vdci_t)*d10_logE0)*d10_exp1);
1702 : : #endif
1703 : 0 : cjci0_t=(cjci0*d00_exp1);
1704 : : }
1705 : 0 : arg=((0.5*vdcx)/VT0);
1706 : : {
1707 : 0 : double m00_exp(d00_exp0,arg)
1708 : 0 : double m00_exp(d00_exp1,(-arg))
1709 : 0 : double m00_logE(d00_logE2,(d00_exp0-d00_exp1))
1710 : 0 : vdj0=((2*VT0)*d00_logE2);
1711 : : }
1712 : : #if defined(_DERIVATE)
1713 : 0 : vdjt_Vtnode_GND=(((vdj0*qtt0_Vtnode_GND)+(vgbc*(-qtt0_Vtnode_GND)))-(((mg*VT_Vtnode_GND)*ln_qtt0)+((mg*VT)*ln_qtt0_Vtnode_GND)));
1714 : : #endif
1715 : 0 : vdjt=(((vdj0*qtt0)+(vgbc*(1-qtt0)))-((mg*VT)*ln_qtt0));
1716 : : {
1717 : 0 : double m00_exp(d00_exp0,((-vdjt)/VT))
1718 : 0 : double m00_sqrt(d00_sqrt1,(1+(4*d00_exp0)))
1719 : 0 : double m00_logE(d00_logE2,(0.5*(1+d00_sqrt1)))
1720 : : #if defined(_DERIVATE)
1721 : : #define d10_exp0 d00_exp0
1722 : 0 : double m10_sqrt(d10_sqrt1,d00_sqrt1,(1+(4*d00_exp0)))
1723 : 0 : double m10_logE(d10_logE2,d00_logE2,(0.5*(1+d00_sqrt1)))
1724 : : #endif
1725 : : #if defined(_DERIVATE)
1726 : 0 : vdcx_t_Vtnode_GND=(vdjt_Vtnode_GND+(((2*VT_Vtnode_GND)*d00_logE2)+((2*VT)*(0.5*(4*(((-vdjt_Vtnode_GND)*VT-(-vdjt)*VT_Vtnode_GND)/VT/VT)*d10_exp0)*d10_sqrt1)*d10_logE2)));
1727 : : #endif
1728 : 0 : vdcx_t=(vdjt+((2*VT)*d00_logE2));
1729 : : }
1730 : : {
1731 : 0 : double m00_logE(d00_logE0,(vdcx/vdcx_t))
1732 : 0 : double m00_exp(d00_exp1,(zcx*d00_logE0))
1733 : : #if defined(_DERIVATE)
1734 : 0 : double m10_logE(d10_logE0,d00_logE0,(vdcx/vdcx_t))
1735 : : #define d10_exp1 d00_exp1
1736 : : #endif
1737 : : #if defined(_DERIVATE)
1738 : 0 : cjcx0_t_Vtnode_GND=(cjcx0*(zcx*(-vdcx*vdcx_t_Vtnode_GND/vdcx_t/vdcx_t)*d10_logE0)*d10_exp1);
1739 : : #endif
1740 : 0 : cjcx0_t=(cjcx0*d00_exp1);
1741 : : }
1742 : : #if defined(_DYNAMIC)
1743 : 0 : arg=((0.5*vds)/VT0);
1744 : : #endif
1745 : : #if defined(_DYNAMIC)
1746 : : {
1747 : 0 : double m00_exp(d00_exp0,arg)
1748 : 0 : double m00_exp(d00_exp1,(-arg))
1749 : 0 : double m00_logE(d00_logE2,(d00_exp0-d00_exp1))
1750 : 0 : vdj0=((2*VT0)*d00_logE2);
1751 : : }
1752 : : #endif
1753 : : #if defined(_DYNAMIC)
1754 : : #if defined(_DERIVATE)
1755 : 0 : vdjt_Vtnode_GND=(((vdj0*qtt0_Vtnode_GND)+(vgsc*(-qtt0_Vtnode_GND)))-(((mg*VT_Vtnode_GND)*ln_qtt0)+((mg*VT)*ln_qtt0_Vtnode_GND)));
1756 : : #endif
1757 : 0 : vdjt=(((vdj0*qtt0)+(vgsc*(1-qtt0)))-((mg*VT)*ln_qtt0));
1758 : : #endif
1759 : : #if defined(_DYNAMIC)
1760 : : {
1761 : 0 : double m00_exp(d00_exp0,((-vdjt)/VT))
1762 : 0 : double m00_sqrt(d00_sqrt1,(1+(4*d00_exp0)))
1763 : 0 : double m00_logE(d00_logE2,(0.5*(1+d00_sqrt1)))
1764 : : #if defined(_DERIVATE)
1765 : : #define d10_exp0 d00_exp0
1766 : 0 : double m10_sqrt(d10_sqrt1,d00_sqrt1,(1+(4*d00_exp0)))
1767 : 0 : double m10_logE(d10_logE2,d00_logE2,(0.5*(1+d00_sqrt1)))
1768 : : #endif
1769 : : #if defined(_DERIVATE)
1770 : 0 : vds_t_Vtnode_GND=(vdjt_Vtnode_GND+(((2*VT_Vtnode_GND)*d00_logE2)+((2*VT)*(0.5*(4*(((-vdjt_Vtnode_GND)*VT-(-vdjt)*VT_Vtnode_GND)/VT/VT)*d10_exp0)*d10_sqrt1)*d10_logE2)));
1771 : : #endif
1772 : 0 : vds_t=(vdjt+((2*VT)*d00_logE2));
1773 : : }
1774 : : #endif
1775 : : #if defined(_DYNAMIC)
1776 : : {
1777 : 0 : double m00_logE(d00_logE0,(vds/vds_t))
1778 : 0 : double m00_exp(d00_exp1,(zs*d00_logE0))
1779 : : #if defined(_DERIVATE)
1780 : 0 : double m10_logE(d10_logE0,d00_logE0,(vds/vds_t))
1781 : : #define d10_exp1 d00_exp1
1782 : : #endif
1783 : : #if defined(_DERIVATE)
1784 : 0 : cjs0_t_Vtnode_GND=(cjs0*(zs*(-vds*vds_t_Vtnode_GND/vds_t/vds_t)*d10_logE0)*d10_exp1);
1785 : : #endif
1786 : 0 : cjs0_t=(cjs0*d00_exp1);
1787 : : }
1788 : : #endif
1789 : : {
1790 : 0 : double m00_exp(d00_exp0,(zetaci*ln_qtt0))
1791 : : #if defined(_DERIVATE)
1792 : : #define d10_exp0 d00_exp0
1793 : : #endif
1794 : : #if defined(_DERIVATE)
1795 : 0 : rci0_t_Vtnode_GND=(rci0*(zetaci*ln_qtt0_Vtnode_GND)*d10_exp0);
1796 : : #endif
1797 : 0 : rci0_t=(rci0*d00_exp0);
1798 : : }
1799 : : {
1800 : 0 : double m00_exp(d00_exp0,((zetaci-avs)*ln_qtt0))
1801 : : #if defined(_DERIVATE)
1802 : : #define d10_exp0 d00_exp0
1803 : : #endif
1804 : : #if defined(_DERIVATE)
1805 : 0 : vlim_t_Vtnode_GND=(vlim*((zetaci-avs)*ln_qtt0_Vtnode_GND)*d10_exp0);
1806 : : #endif
1807 : 0 : vlim_t=(vlim*d00_exp0);
1808 : : }
1809 : : #if defined(_DERIVATE)
1810 : 0 : vces_t_Vtnode_GND=(vces*(alces*dT_Vtnode_GND));
1811 : : #endif
1812 : 0 : vces_t=(vces*(1+(alces*dT)));
1813 : : #if defined(_DYNAMIC)
1814 : : #if defined(_DERIVATE)
1815 : 0 : t0_t_Vtnode_GND=(t0*((alt0*dT_Vtnode_GND)+(((kt0*dT_Vtnode_GND)*dT)+((kt0*dT)*dT_Vtnode_GND))));
1816 : : #endif
1817 : 0 : t0_t=(t0*((1+(alt0*dT))+((kt0*dT)*dT)));
1818 : : #endif
1819 : : #if defined(_DYNAMIC)
1820 : : {
1821 : 0 : double m00_exp(d00_exp0,((zetaci-1)*ln_qtt0))
1822 : : #if defined(_DERIVATE)
1823 : : #define d10_exp0 d00_exp0
1824 : : #endif
1825 : : #if defined(_DERIVATE)
1826 : 0 : thcs_t_Vtnode_GND=(thcs*((zetaci-1)*ln_qtt0_Vtnode_GND)*d10_exp0);
1827 : : #endif
1828 : 0 : thcs_t=(thcs*d00_exp0);
1829 : : }
1830 : : #endif
1831 : : #if defined(_DYNAMIC)
1832 : 0 : zetatef=((zetabet-zetact)-0.5);
1833 : : #endif
1834 : : #if defined(_DYNAMIC)
1835 : 0 : dvg=(vgb-vge);
1836 : : #endif
1837 : : #if defined(_DYNAMIC)
1838 : : {
1839 : 0 : double m00_exp(d00_exp0,((zetatef*ln_qtt0)-((dvg/VT)*(qtt0-1))))
1840 : : #if defined(_DERIVATE)
1841 : : #define d10_exp0 d00_exp0
1842 : : #endif
1843 : : #if defined(_DERIVATE)
1844 : 0 : tef0_t_Vtnode_GND=(tef0*((zetatef*ln_qtt0_Vtnode_GND)-(((-dvg*VT_Vtnode_GND/VT/VT)*(qtt0-1))+((dvg/VT)*qtt0_Vtnode_GND)))*d10_exp0);
1845 : : #endif
1846 : 0 : tef0_t=(tef0*d00_exp0);
1847 : : }
1848 : : #endif
1849 : : {
1850 : 0 : double m00_exp(d00_exp0,(zetarbx*ln_qtt0))
1851 : : #if defined(_DERIVATE)
1852 : : #define d10_exp0 d00_exp0
1853 : : #endif
1854 : : #if defined(_DERIVATE)
1855 : 0 : rbx_t_Vtnode_GND=(rbx*(zetarbx*ln_qtt0_Vtnode_GND)*d10_exp0);
1856 : : #endif
1857 : 0 : rbx_t=(rbx*d00_exp0);
1858 : : }
1859 : : {
1860 : 0 : double m00_exp(d00_exp0,(zetarcx*ln_qtt0))
1861 : : #if defined(_DERIVATE)
1862 : : #define d10_exp0 d00_exp0
1863 : : #endif
1864 : : #if defined(_DERIVATE)
1865 : 0 : rcx_t_Vtnode_GND=(rcx*(zetarcx*ln_qtt0_Vtnode_GND)*d10_exp0);
1866 : : #endif
1867 : 0 : rcx_t=(rcx*d00_exp0);
1868 : : }
1869 : : {
1870 : 0 : double m00_exp(d00_exp0,(zetarbi*ln_qtt0))
1871 : : #if defined(_DERIVATE)
1872 : : #define d10_exp0 d00_exp0
1873 : : #endif
1874 : : #if defined(_DERIVATE)
1875 : 0 : rbi0_t_Vtnode_GND=(rbi0*(zetarbi*ln_qtt0_Vtnode_GND)*d10_exp0);
1876 : : #endif
1877 : 0 : rbi0_t=(rbi0*d00_exp0);
1878 : : }
1879 : : {
1880 : 0 : double m00_exp(d00_exp0,(zetare*ln_qtt0))
1881 : : #if defined(_DERIVATE)
1882 : : #define d10_exp0 d00_exp0
1883 : : #endif
1884 : : #if defined(_DERIVATE)
1885 : 0 : re_t_Vtnode_GND=(re*(zetare*ln_qtt0_Vtnode_GND)*d10_exp0);
1886 : : #endif
1887 : 0 : re_t=(re*d00_exp0);
1888 : : }
1889 : : {
1890 : 0 : double m00_exp(d00_exp0,(aleav*dT))
1891 : : #if defined(_DERIVATE)
1892 : : #define d10_exp0 d00_exp0
1893 : : #endif
1894 : : #if defined(_DERIVATE)
1895 : 0 : eavl_t_Vtnode_GND=(eavl*(aleav*dT_Vtnode_GND)*d10_exp0);
1896 : : #endif
1897 : 0 : eavl_t=(eavl*d00_exp0);
1898 : : }
1899 : : {
1900 : 0 : double m00_exp(d00_exp0,(alkav*dT))
1901 : : #if defined(_DERIVATE)
1902 : : #define d10_exp0 d00_exp0
1903 : : #endif
1904 : : #if defined(_DERIVATE)
1905 : 0 : kavl_t_Vtnode_GND=(kavl*(alkav*dT_Vtnode_GND)*d10_exp0);
1906 : : #endif
1907 : 0 : kavl_t=(kavl*d00_exp0);
1908 : : }
1909 [ # # ]: 0 : if
1910 : : (cjcx0_t==0)
1911 : : {
1912 : : #if defined(_DERIVATE)
1913 : 0 : cjci0_t_ii_Vtnode_GND=cjci0_t_Vtnode_GND*fbc;
1914 : : #endif
1915 : 0 : cjci0_t_ii=(cjci0_t*fbc);
1916 : : #if defined(_DYNAMIC)
1917 : : #if defined(_DERIVATE)
1918 : 0 : qjcxi_Vbi_ci=0.0;
1919 : 0 : qjcxi_Vtnode_GND=0.0;
1920 : 0 : qjcxi_Vb_ci=0.0;
1921 : : #endif
1922 : 0 : qjcxi=0;
1923 : : #endif
1924 : : #if defined(_DERIVATE)
1925 : 0 : cjcx0_t_i_Vtnode_GND=cjci0_t_Vtnode_GND*(1-fbc);
1926 : : #endif
1927 : 0 : cjcx0_t_i=(cjci0_t*(1-fbc));
1928 [ # # ]: 0 : if
1929 : : (vptci<1.0e2)
1930 : : {
1931 [ # # ]: 0 : if
1932 : : (cjcx0_t_i>0.0)
1933 : : {
1934 : 0 : zr=(zci/4.0);
1935 : : #if defined(_DERIVATE)
1936 : 0 : vp_Vtnode_GND=(-vdci_t_Vtnode_GND);
1937 : : #endif
1938 : 0 : vp=(vptci-vdci_t);
1939 : : {
1940 : 0 : double m00_logE(d00_logE0,2.4)
1941 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zci))
1942 : : #if defined(_DERIVATE)
1943 : 0 : vf_Vtnode_GND=vdci_t_Vtnode_GND*(1.0-d00_exp1);
1944 : : #endif
1945 : 0 : vf=(vdci_t*(1.0-d00_exp1));
1946 : : }
1947 : : #if defined(_DERIVATE)
1948 : 0 : cmax_Vtnode_GND=(2.4*cjcx0_t_i_Vtnode_GND);
1949 : : #endif
1950 : 0 : cmax=(2.4*cjcx0_t_i);
1951 : : {
1952 : 0 : double m00_logE(d00_logE0,(vdci_t/vptci))
1953 : 0 : double m00_exp(d00_exp1,((zci-zr)*d00_logE0))
1954 : : #if defined(_DERIVATE)
1955 : 0 : double m10_logE(d10_logE0,d00_logE0,(vdci_t/vptci))
1956 : : #define d10_exp1 d00_exp1
1957 : : #endif
1958 : : #if defined(_DERIVATE)
1959 : 0 : cr_Vtnode_GND=((cjcx0_t_i_Vtnode_GND*d00_exp1)+(cjcx0_t_i*((zci-zr)*(vdci_t_Vtnode_GND/vptci)*d10_logE0)*d10_exp1));
1960 : : #endif
1961 : 0 : cr=(cjcx0_t_i*d00_exp1);
1962 : : }
1963 : : #if defined(_DERIVATE)
1964 : 0 : a_Vci_ei=0.0;
1965 : 0 : a_Vbi_ei=0.0;
1966 : 0 : a_Vbi_ci=0.0;
1967 : 0 : a_Vb_ci=0.0;
1968 : 0 : a_Vtnode_GND=VT_Vtnode_GND;
1969 : : #endif
1970 : 0 : a=VT;
1971 : : #if defined(_DERIVATE)
1972 : 0 : ve_Vs_ci=0.0;
1973 : 0 : ve_Vci_ei=0.0;
1974 : 0 : ve_Vbi_ei=0.0;
1975 : 0 : ve_Vbi_ci=0.0;
1976 : 0 : ve_Vtnode_GND=((vf_Vtnode_GND*a-(vf-Vbci)*a_Vtnode_GND)/a/a);
1977 : 0 : ve_Vb_ci=(((-Vbci_Vb_ci)*a-(vf-Vbci)*a_Vb_ci)/a/a);
1978 : : #endif
1979 : 0 : ve=((vf-Vbci)/a);
1980 [ # # ]: 0 : if
1981 : : (ve<=80.0)
1982 : : {
1983 : : {
1984 : 0 : double m00_exp(d00_exp0,ve)
1985 : : #if defined(_DERIVATE)
1986 : : #define d10_exp0 d00_exp0
1987 : : #endif
1988 : : #if defined(_DERIVATE)
1989 : 0 : ex1_Vs_ci=0.0;
1990 : 0 : ex1_Vci_ei=0.0;
1991 : 0 : ex1_Vbi_ei=0.0;
1992 : 0 : ex1_Vbi_ci=0.0;
1993 : 0 : ex1_Vtnode_GND=ve_Vtnode_GND*d10_exp0;
1994 : 0 : ex1_Vb_ci=ve_Vb_ci*d10_exp0;
1995 : : #endif
1996 : 0 : ex1=d00_exp0;
1997 : : }
1998 : : #if defined(_DERIVATE)
1999 : 0 : ee1_Vs_ci=0.0;
2000 : 0 : ee1_Vci_ei=0.0;
2001 : 0 : ee1_Vbi_ei=0.0;
2002 : 0 : ee1_Vbi_ci=0.0;
2003 : 0 : ee1_Vtnode_GND=ex1_Vtnode_GND;
2004 : 0 : ee1_Vb_ci=ex1_Vb_ci;
2005 : : #endif
2006 : 0 : ee1=(1.0+ex1);
2007 : : {
2008 : 0 : double m00_logE(d00_logE0,ee1)
2009 : : #if defined(_DERIVATE)
2010 : 0 : double m10_logE(d10_logE0,d00_logE0,ee1)
2011 : : #endif
2012 : : #if defined(_DERIVATE)
2013 : 0 : vj1_Vci_ei=0.0;
2014 : 0 : vj1_Vbi_ei=0.0;
2015 : 0 : vj1_Vs_ci=0.0;
2016 : 0 : vj1_Vbi_ci=0.0;
2017 : 0 : vj1_Vtnode_GND=(vf_Vtnode_GND-((a_Vtnode_GND*d00_logE0)+(a*ee1_Vtnode_GND*d10_logE0)));
2018 : 0 : vj1_Vb_ci=(-((a_Vb_ci*d00_logE0)+(a*ee1_Vb_ci*d10_logE0)));
2019 : : #endif
2020 : 0 : vj1=(vf-(a*d00_logE0));
2021 : : }
2022 : : }
2023 : : else
2024 : : {
2025 : : #if defined(_DERIVATE)
2026 : 0 : vj1_Vci_ei=0.0;
2027 : 0 : vj1_Vbi_ei=0.0;
2028 : 0 : vj1_Vs_ci=0.0;
2029 : 0 : vj1_Vbi_ci=0.0;
2030 : 0 : vj1_Vtnode_GND=0.0;
2031 : 0 : vj1_Vb_ci=Vbci_Vb_ci;
2032 : : #endif
2033 : 0 : vj1=Vbci;
2034 : : }
2035 : : #if defined(_DERIVATE)
2036 : 0 : a_Vci_ei=0.0;
2037 : 0 : a_Vbi_ei=0.0;
2038 : 0 : a_Vbi_ci=0.0;
2039 : 0 : a_Vb_ci=0.0;
2040 : 0 : a_Vtnode_GND=((0.1*vp_Vtnode_GND)+(4.0*VT_Vtnode_GND));
2041 : : #endif
2042 : 0 : a=((0.1*vp)+(4.0*VT));
2043 : : #if defined(_DERIVATE)
2044 : 0 : vr_Vci_ei=0.0;
2045 : 0 : vr_Vbi_ei=0.0;
2046 : 0 : vr_Vs_ci=0.0;
2047 : 0 : vr_Vbi_ci=0.0;
2048 : 0 : vr_Vtnode_GND=(((vp_Vtnode_GND+vj1_Vtnode_GND)*a-(vp+vj1)*a_Vtnode_GND)/a/a);
2049 : 0 : vr_Vb_ci=((vj1_Vb_ci*a-(vp+vj1)*a_Vb_ci)/a/a);
2050 : : #endif
2051 : 0 : vr=((vp+vj1)/a);
2052 [ # # ]: 0 : if
2053 : : (vr<=80.0)
2054 : : {
2055 : : {
2056 : 0 : double m00_exp(d00_exp0,vr)
2057 : : #if defined(_DERIVATE)
2058 : : #define d10_exp0 d00_exp0
2059 : : #endif
2060 : : #if defined(_DERIVATE)
2061 : 0 : ex1_Vs_ci=0.0;
2062 : 0 : ex1_Vci_ei=0.0;
2063 : 0 : ex1_Vbi_ei=0.0;
2064 : 0 : ex1_Vbi_ci=0.0;
2065 : 0 : ex1_Vtnode_GND=vr_Vtnode_GND*d10_exp0;
2066 : 0 : ex1_Vb_ci=vr_Vb_ci*d10_exp0;
2067 : : #endif
2068 : 0 : ex1=d00_exp0;
2069 : : }
2070 : : #if defined(_DERIVATE)
2071 : 0 : ee1_Vs_ci=0.0;
2072 : 0 : ee1_Vci_ei=0.0;
2073 : 0 : ee1_Vbi_ei=0.0;
2074 : 0 : ee1_Vbi_ci=0.0;
2075 : 0 : ee1_Vtnode_GND=ex1_Vtnode_GND;
2076 : 0 : ee1_Vb_ci=ex1_Vb_ci;
2077 : : #endif
2078 : 0 : ee1=(1.0+ex1);
2079 : : {
2080 : 0 : double m00_logE(d00_logE0,ee1)
2081 : : #if defined(_DERIVATE)
2082 : 0 : double m10_logE(d10_logE0,d00_logE0,ee1)
2083 : : #endif
2084 : : #if defined(_DERIVATE)
2085 : 0 : vj2_Vci_ei=0.0;
2086 : 0 : vj2_Vbi_ei=0.0;
2087 : 0 : vj2_Vs_ci=0.0;
2088 : 0 : vj2_Vbi_ci=0.0;
2089 : 0 : vj2_Vtnode_GND=((-vp_Vtnode_GND)+((a_Vtnode_GND*d00_logE0)+(a*ee1_Vtnode_GND*d10_logE0)));
2090 : 0 : vj2_Vb_ci=((a_Vb_ci*d00_logE0)+(a*ee1_Vb_ci*d10_logE0));
2091 : : #endif
2092 : 0 : vj2=((-vp)+(a*d00_logE0));
2093 : : }
2094 : : }
2095 : : else
2096 : : {
2097 : : #if defined(_DERIVATE)
2098 : 0 : vj2_Vci_ei=0.0;
2099 : 0 : vj2_Vbi_ei=0.0;
2100 : 0 : vj2_Vs_ci=0.0;
2101 : 0 : vj2_Vbi_ci=0.0;
2102 : 0 : vj2_Vtnode_GND=vj1_Vtnode_GND;
2103 : 0 : vj2_Vb_ci=vj1_Vb_ci;
2104 : : #endif
2105 : 0 : vj2=vj1;
2106 : : }
2107 : : #if defined(_DERIVATE)
2108 : 0 : vj4_Vs_ci=0.0;
2109 : 0 : vj4_Vci_ei=0.0;
2110 : 0 : vj4_Vbi_ei=0.0;
2111 : 0 : vj4_Vbi_ci=0.0;
2112 : 0 : vj4_Vb_ci=(Vbci_Vb_ci-vj1_Vb_ci);
2113 : 0 : vj4_Vtnode_GND=(-vj1_Vtnode_GND);
2114 : : #endif
2115 : 0 : vj4=(Vbci-vj1);
2116 : 0 : ez=(1.0-zci);
2117 : 0 : ezr=(1.0-zr);
2118 : : {
2119 : 0 : double m00_logE(d00_logE0,(1.0-(vj1/vdci_t)))
2120 : : #if defined(_DERIVATE)
2121 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(vj1/vdci_t)))
2122 : : #endif
2123 : : #if defined(_DERIVATE)
2124 : 0 : vdj1_Vci_ei=0.0;
2125 : 0 : vdj1_Vbi_ei=0.0;
2126 : 0 : vdj1_Vs_ci=0.0;
2127 : 0 : vdj1_Vbi_ci=0.0;
2128 : 0 : vdj1_Vtnode_GND=(-((vj1_Vtnode_GND*vdci_t-vj1*vdci_t_Vtnode_GND)/vdci_t/vdci_t))*d10_logE0;
2129 : 0 : vdj1_Vb_ci=(-(vj1_Vb_ci/vdci_t))*d10_logE0;
2130 : : #endif
2131 : 0 : vdj1=d00_logE0;
2132 : : }
2133 : : {
2134 : 0 : double m00_logE(d00_logE0,(1.0-(vj2/vdci_t)))
2135 : : #if defined(_DERIVATE)
2136 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(vj2/vdci_t)))
2137 : : #endif
2138 : : #if defined(_DERIVATE)
2139 : 0 : vdj2_Vci_ei=0.0;
2140 : 0 : vdj2_Vbi_ei=0.0;
2141 : 0 : vdj2_Vs_ci=0.0;
2142 : 0 : vdj2_Vbi_ci=0.0;
2143 : 0 : vdj2_Vtnode_GND=(-((vj2_Vtnode_GND*vdci_t-vj2*vdci_t_Vtnode_GND)/vdci_t/vdci_t))*d10_logE0;
2144 : 0 : vdj2_Vb_ci=(-(vj2_Vb_ci/vdci_t))*d10_logE0;
2145 : : #endif
2146 : 0 : vdj2=d00_logE0;
2147 : : }
2148 : : {
2149 : 0 : double m00_exp(d00_exp0,(vdj2*ez))
2150 : : #if defined(_DERIVATE)
2151 : : #define d10_exp0 d00_exp0
2152 : : #endif
2153 : : #if defined(_DERIVATE)
2154 : 0 : qj1_Vci_ei=0.0;
2155 : 0 : qj1_Vbi_ei=0.0;
2156 : 0 : qj1_Vs_ci=0.0;
2157 : 0 : qj1_Vbi_ci=0.0;
2158 : 0 : qj1_Vtnode_GND=(((cjcx0_t_i_Vtnode_GND*(1.0-d00_exp0))+(cjcx0_t_i*(-vdj2_Vtnode_GND*ez*d10_exp0)))/ez);
2159 : 0 : qj1_Vb_ci=((cjcx0_t_i*(-vdj2_Vb_ci*ez*d10_exp0))/ez);
2160 : : #endif
2161 : 0 : qj1=((cjcx0_t_i*(1.0-d00_exp0))/ez);
2162 : : }
2163 : : {
2164 : 0 : double m00_exp(d00_exp0,(vdj1*ezr))
2165 : : #if defined(_DERIVATE)
2166 : : #define d10_exp0 d00_exp0
2167 : : #endif
2168 : : #if defined(_DERIVATE)
2169 : 0 : qj2_Vci_ei=0.0;
2170 : 0 : qj2_Vbi_ei=0.0;
2171 : 0 : qj2_Vs_ci=0.0;
2172 : 0 : qj2_Vbi_ci=0.0;
2173 : 0 : qj2_Vtnode_GND=(((cr_Vtnode_GND*(1.0-d00_exp0))+(cr*(-vdj1_Vtnode_GND*ezr*d10_exp0)))/ezr);
2174 : 0 : qj2_Vb_ci=((cr*(-vdj1_Vb_ci*ezr*d10_exp0))/ezr);
2175 : : #endif
2176 : 0 : qj2=((cr*(1.0-d00_exp0))/ezr);
2177 : : }
2178 : : {
2179 : 0 : double m00_exp(d00_exp0,(vdj2*ezr))
2180 : : #if defined(_DERIVATE)
2181 : : #define d10_exp0 d00_exp0
2182 : : #endif
2183 : : #if defined(_DERIVATE)
2184 : 0 : qj3_Vci_ei=0.0;
2185 : 0 : qj3_Vbi_ei=0.0;
2186 : 0 : qj3_Vs_ci=0.0;
2187 : 0 : qj3_Vbi_ci=0.0;
2188 : 0 : qj3_Vtnode_GND=(((cr_Vtnode_GND*(1.0-d00_exp0))+(cr*(-vdj2_Vtnode_GND*ezr*d10_exp0)))/ezr);
2189 : 0 : qj3_Vb_ci=((cr*(-vdj2_Vb_ci*ezr*d10_exp0))/ezr);
2190 : : #endif
2191 : 0 : qj3=((cr*(1.0-d00_exp0))/ezr);
2192 : : }
2193 : : #if defined(_DYNAMIC)
2194 : : #if defined(_DERIVATE)
2195 : 0 : qjcx_Vbi_ci=0.0;
2196 : 0 : qjcx_Vtnode_GND=(((((qj1_Vtnode_GND+qj2_Vtnode_GND)-qj3_Vtnode_GND)*vdci_t)+(((qj1+qj2)-qj3)*vdci_t_Vtnode_GND))+((cmax_Vtnode_GND*vj4)+(cmax*vj4_Vtnode_GND)));
2197 : 0 : qjcx_Vb_ci=(((qj1_Vb_ci+qj2_Vb_ci)-qj3_Vb_ci)*vdci_t+(cmax*vj4_Vb_ci));
2198 : : #endif
2199 : 0 : qjcx=((((qj1+qj2)-qj3)*vdci_t)+(cmax*vj4));
2200 : : #endif
2201 : : }
2202 : : else
2203 : : {
2204 : : #if defined(_DYNAMIC)
2205 : : #if defined(_DERIVATE)
2206 : 0 : qjcx_Vbi_ci=0.0;
2207 : 0 : qjcx_Vtnode_GND=0.0;
2208 : 0 : qjcx_Vb_ci=0.0;
2209 : : #endif
2210 : 0 : qjcx=0.0;
2211 : : #endif
2212 : : }
2213 : : }
2214 : : else
2215 : : {
2216 [ # # ]: 0 : if
2217 : : (cjcx0_t_i>0.0)
2218 : : {
2219 : : {
2220 : 0 : double m00_logE(d00_logE0,2.4)
2221 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zci))
2222 : : #if defined(_DERIVATE)
2223 : 0 : vf_Vtnode_GND=vdci_t_Vtnode_GND*(1.0-d00_exp1);
2224 : : #endif
2225 : 0 : vf=(vdci_t*(1.0-d00_exp1));
2226 : : }
2227 : : #if defined(_DERIVATEFORDDX)
2228 : : #if defined(_DERIVATE)
2229 : 0 : xvf_Vs_ci=0.0;
2230 : : #endif
2231 : 0 : xvf_Vbi_ei=0.0;
2232 : : #if defined(_DERIVATE)
2233 : 0 : xvf_Vbi_ei_Vs_ci=0.0;
2234 : 0 : xvf_Vbi_ei_Vbi_ei=0.0;
2235 : 0 : xvf_Vbi_ei_Vbi_ci=0.0;
2236 : 0 : xvf_Vbi_ei_Vtnode_GND=0.0;
2237 : 0 : xvf_Vbi_ei_Vb_ci=0.0;
2238 : : #endif
2239 : 0 : xvf_Vbi_ci=0.0;
2240 : : #if defined(_DERIVATE)
2241 : 0 : xvf_Vbi_ci_Vs_ci=0.0;
2242 : 0 : xvf_Vbi_ci_Vbi_ei=0.0;
2243 : 0 : xvf_Vbi_ci_Vbi_ci=0.0;
2244 : 0 : xvf_Vbi_ci_Vtnode_GND=0.0;
2245 : 0 : xvf_Vbi_ci_Vb_ci=0.0;
2246 : : #endif
2247 : : #if defined(_DERIVATE)
2248 : 0 : xvf_Vtnode_GND=((vf_Vtnode_GND*VT-(vf-Vbci)*VT_Vtnode_GND)/VT/VT);
2249 : : #endif
2250 : : #if defined(_DERIVATE)
2251 : 0 : xvf_Vb_ci=((-Vbci_Vb_ci)/VT);
2252 : : #endif
2253 : : #endif
2254 : 0 : xvf=((vf-Vbci)/VT);
2255 : : {
2256 : 0 : double m00_sqrt(d00_sqrt0,((xvf*xvf)+1.921812))
2257 : : #if defined(_DERIVATEFORDDX)
2258 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((xvf*xvf)+1.921812))
2259 : : #endif
2260 : : #if defined(_DERIVATEFORDDX)
2261 : : #if defined(_DERIVATE)
2262 : 0 : xvf2_Vs_ci=0.0;
2263 : : #endif
2264 : 0 : xvf2_Vbi_ei=0.0;
2265 : : #if defined(_DERIVATE)
2266 : 0 : xvf2_Vbi_ei_Vs_ci=0.0;
2267 : 0 : xvf2_Vbi_ei_Vbi_ei=0.0;
2268 : 0 : xvf2_Vbi_ei_Vbi_ci=0.0;
2269 : 0 : xvf2_Vbi_ei_Vtnode_GND=0.0;
2270 : 0 : xvf2_Vbi_ei_Vb_ci=0.0;
2271 : : #endif
2272 : 0 : xvf2_Vbi_ci=0.0;
2273 : : #if defined(_DERIVATE)
2274 : 0 : xvf2_Vbi_ci_Vs_ci=0.0;
2275 : 0 : xvf2_Vbi_ci_Vbi_ei=0.0;
2276 : 0 : xvf2_Vbi_ci_Vbi_ci=0.0;
2277 : 0 : xvf2_Vbi_ci_Vtnode_GND=0.0;
2278 : 0 : xvf2_Vbi_ci_Vb_ci=0.0;
2279 : : #endif
2280 : : #if defined(_DERIVATE)
2281 : 0 : xvf2_Vtnode_GND=((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND))*d10_sqrt0;
2282 : : #endif
2283 : : #if defined(_DERIVATE)
2284 : 0 : xvf2_Vb_ci=((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci))*d10_sqrt0;
2285 : : #endif
2286 : : #endif
2287 : 0 : xvf2=d00_sqrt0;
2288 : : }
2289 : : #if defined(_DERIVATEFORDDX)
2290 : : #if defined(_DERIVATE)
2291 : 0 : v_j_Vs_ci=0.0;
2292 : : #endif
2293 : 0 : v_j_Vbi_ei=0.0;
2294 : : #if defined(_DERIVATE)
2295 : 0 : v_j_Vbi_ei_Vs_ci=0.0;
2296 : 0 : v_j_Vbi_ei_Vbi_ei=0.0;
2297 : 0 : v_j_Vbi_ei_Vbi_ci=0.0;
2298 : 0 : v_j_Vbi_ei_Vtnode_GND=0.0;
2299 : 0 : v_j_Vbi_ei_Vb_ci=0.0;
2300 : : #endif
2301 : 0 : v_j_Vbi_ci=0.0;
2302 : : #if defined(_DERIVATE)
2303 : 0 : v_j_Vbi_ci_Vs_ci=0.0;
2304 : 0 : v_j_Vbi_ci_Vbi_ei=0.0;
2305 : 0 : v_j_Vbi_ci_Vbi_ci=0.0;
2306 : 0 : v_j_Vbi_ci_Vtnode_GND=0.0;
2307 : 0 : v_j_Vbi_ci_Vb_ci=0.0;
2308 : : #endif
2309 : : #if defined(_DERIVATE)
2310 : 0 : v_j_Vtnode_GND=(vf_Vtnode_GND-((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND)))*0.5);
2311 : : #endif
2312 : : #if defined(_DERIVATE)
2313 : 0 : v_j_Vb_ci=(-(VT*(xvf_Vb_ci+xvf2_Vb_ci))*0.5);
2314 : : #endif
2315 : : #endif
2316 : 0 : v_j=(vf-((VT*(xvf+xvf2))*0.5));
2317 : : #if defined(_DERIVATE)
2318 : 0 : x_Vtnode_GND=0.0;
2319 : 0 : x_Vci_ei=0.0;
2320 : : #endif
2321 : 0 : x=(1.0-zci);
2322 : : {
2323 : 0 : double m00_logE(d00_logE0,(1.0-(v_j/vdci_t)))
2324 : 0 : double m00_exp(d00_exp1,(x*d00_logE0))
2325 : : #if defined(_DERIVATEFORDDX)
2326 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(v_j/vdci_t)))
2327 : : #define d10_exp1 d00_exp1
2328 : : #endif
2329 : : #if defined(_DERIVATEFORDDX)
2330 : : #if defined(_DERIVATE)
2331 : 0 : y_Vci_ei=0.0;
2332 : : #endif
2333 : : #if defined(_DERIVATE)
2334 : 0 : y_Vs_ci=0.0;
2335 : : #endif
2336 : 0 : y_Vbi_ei=0.0;
2337 : : #if defined(_DERIVATE)
2338 : 0 : y_Vbi_ei_Vci_ei=0.0;
2339 : 0 : y_Vbi_ei_Vs_ci=0.0;
2340 : 0 : y_Vbi_ei_Vbi_ei=0.0;
2341 : 0 : y_Vbi_ei_Vbi_ci=0.0;
2342 : 0 : y_Vbi_ei_Vtnode_GND=0.0;
2343 : 0 : y_Vbi_ei_Vb_ci=0.0;
2344 : : #endif
2345 : 0 : y_Vbi_ci=0.0;
2346 : : #if defined(_DERIVATE)
2347 : 0 : y_Vbi_ci_Vci_ei=0.0;
2348 : 0 : y_Vbi_ci_Vs_ci=0.0;
2349 : 0 : y_Vbi_ci_Vbi_ei=0.0;
2350 : 0 : y_Vbi_ci_Vbi_ci=0.0;
2351 : 0 : y_Vbi_ci_Vtnode_GND=0.0;
2352 : 0 : y_Vbi_ci_Vb_ci=0.0;
2353 : : #endif
2354 : : #if defined(_DERIVATE)
2355 : 0 : y_Vtnode_GND=(-((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vdci_t-v_j*vdci_t_Vtnode_GND)/vdci_t/vdci_t))*d10_logE0))*d10_exp1);
2356 : : #endif
2357 : : #if defined(_DERIVATE)
2358 : 0 : y_Vb_ci=(-(x*(-(v_j_Vb_ci/vdci_t))*d10_logE0)*d10_exp1);
2359 : : #endif
2360 : : #endif
2361 : 0 : y=(1.0-d00_exp1);
2362 : : }
2363 : : #if defined(_DYNAMIC)
2364 : : #if defined(_DERIVATE)
2365 : 0 : qjcx_Vbi_ci=0.0;
2366 : 0 : qjcx_Vtnode_GND=(((((((cjcx0_t_i_Vtnode_GND*vdci_t)+(cjcx0_t_i*vdci_t_Vtnode_GND))*y)+((cjcx0_t_i*vdci_t)*y_Vtnode_GND))*x-((cjcx0_t_i*vdci_t)*y)*x_Vtnode_GND)/x/x)+(((2.4*cjcx0_t_i_Vtnode_GND)*(Vbci-v_j))+((2.4*cjcx0_t_i)*(-v_j_Vtnode_GND))));
2367 : 0 : qjcx_Vb_ci=((((cjcx0_t_i*vdci_t)*y_Vb_ci)/x)+((2.4*cjcx0_t_i)*(Vbci_Vb_ci-v_j_Vb_ci)));
2368 : : #endif
2369 : 0 : qjcx=((((cjcx0_t_i*vdci_t)*y)/x)+((2.4*cjcx0_t_i)*(Vbci-v_j)));
2370 : : #endif
2371 : : }
2372 : : else
2373 : : {
2374 : : #if defined(_DYNAMIC)
2375 : : #if defined(_DERIVATE)
2376 : 0 : qjcx_Vbi_ci=0.0;
2377 : 0 : qjcx_Vtnode_GND=0.0;
2378 : 0 : qjcx_Vb_ci=0.0;
2379 : : #endif
2380 : 0 : qjcx=0.0;
2381 : : #endif
2382 : : }
2383 : : }
2384 : : }
2385 : : else
2386 : : {
2387 : : #if defined(_DERIVATE)
2388 : 0 : cjci0_t_ii_Vtnode_GND=cjci0_t_Vtnode_GND;
2389 : : #endif
2390 : 0 : cjci0_t_ii=cjci0_t;
2391 : : #if defined(_DERIVATE)
2392 : 0 : cjcx0_t_ii_Vtnode_GND=cjcx0_t_Vtnode_GND*fbc;
2393 : : #endif
2394 : 0 : cjcx0_t_ii=(cjcx0_t*fbc);
2395 [ # # ]: 0 : if
2396 : : (vptcx<1.0e2)
2397 : : {
2398 [ # # ]: 0 : if
2399 : : (cjcx0_t_ii>0.0)
2400 : : {
2401 : 0 : zr=(zcx/4.0);
2402 : : #if defined(_DERIVATE)
2403 : 0 : vp_Vtnode_GND=(-vdcx_t_Vtnode_GND);
2404 : : #endif
2405 : 0 : vp=(vptcx-vdcx_t);
2406 : : {
2407 : 0 : double m00_logE(d00_logE0,2.4)
2408 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zcx))
2409 : : #if defined(_DERIVATE)
2410 : 0 : vf_Vtnode_GND=vdcx_t_Vtnode_GND*(1.0-d00_exp1);
2411 : : #endif
2412 : 0 : vf=(vdcx_t*(1.0-d00_exp1));
2413 : : }
2414 : : #if defined(_DERIVATE)
2415 : 0 : cmax_Vtnode_GND=(2.4*cjcx0_t_ii_Vtnode_GND);
2416 : : #endif
2417 : 0 : cmax=(2.4*cjcx0_t_ii);
2418 : : {
2419 : 0 : double m00_logE(d00_logE0,(vdcx_t/vptcx))
2420 : 0 : double m00_exp(d00_exp1,((zcx-zr)*d00_logE0))
2421 : : #if defined(_DERIVATE)
2422 : 0 : double m10_logE(d10_logE0,d00_logE0,(vdcx_t/vptcx))
2423 : : #define d10_exp1 d00_exp1
2424 : : #endif
2425 : : #if defined(_DERIVATE)
2426 : 0 : cr_Vtnode_GND=((cjcx0_t_ii_Vtnode_GND*d00_exp1)+(cjcx0_t_ii*((zcx-zr)*(vdcx_t_Vtnode_GND/vptcx)*d10_logE0)*d10_exp1));
2427 : : #endif
2428 : 0 : cr=(cjcx0_t_ii*d00_exp1);
2429 : : }
2430 : : #if defined(_DERIVATE)
2431 : 0 : a_Vci_ei=0.0;
2432 : 0 : a_Vbi_ei=0.0;
2433 : 0 : a_Vbi_ci=0.0;
2434 : 0 : a_Vb_ci=0.0;
2435 : 0 : a_Vtnode_GND=VT_Vtnode_GND;
2436 : : #endif
2437 : 0 : a=VT;
2438 : : #if defined(_DERIVATE)
2439 : 0 : ve_Vs_ci=0.0;
2440 : 0 : ve_Vci_ei=0.0;
2441 : 0 : ve_Vbi_ei=0.0;
2442 : 0 : ve_Vbi_ci=(((-Vbici_Vbi_ci)*a-(vf-Vbici)*a_Vbi_ci)/a/a);
2443 : 0 : ve_Vtnode_GND=((vf_Vtnode_GND*a-(vf-Vbici)*a_Vtnode_GND)/a/a);
2444 : 0 : ve_Vb_ci=0.0;
2445 : : #endif
2446 : 0 : ve=((vf-Vbici)/a);
2447 [ # # ]: 0 : if
2448 : : (ve<=80.0)
2449 : : {
2450 : : {
2451 : 0 : double m00_exp(d00_exp0,ve)
2452 : : #if defined(_DERIVATE)
2453 : : #define d10_exp0 d00_exp0
2454 : : #endif
2455 : : #if defined(_DERIVATE)
2456 : 0 : ex1_Vs_ci=0.0;
2457 : 0 : ex1_Vci_ei=0.0;
2458 : 0 : ex1_Vbi_ei=0.0;
2459 : 0 : ex1_Vbi_ci=ve_Vbi_ci*d10_exp0;
2460 : 0 : ex1_Vtnode_GND=ve_Vtnode_GND*d10_exp0;
2461 : 0 : ex1_Vb_ci=ve_Vb_ci*d10_exp0;
2462 : : #endif
2463 : 0 : ex1=d00_exp0;
2464 : : }
2465 : : #if defined(_DERIVATE)
2466 : 0 : ee1_Vs_ci=0.0;
2467 : 0 : ee1_Vci_ei=0.0;
2468 : 0 : ee1_Vbi_ei=0.0;
2469 : 0 : ee1_Vbi_ci=ex1_Vbi_ci;
2470 : 0 : ee1_Vtnode_GND=ex1_Vtnode_GND;
2471 : 0 : ee1_Vb_ci=ex1_Vb_ci;
2472 : : #endif
2473 : 0 : ee1=(1.0+ex1);
2474 : : {
2475 : 0 : double m00_logE(d00_logE0,ee1)
2476 : : #if defined(_DERIVATE)
2477 : 0 : double m10_logE(d10_logE0,d00_logE0,ee1)
2478 : : #endif
2479 : : #if defined(_DERIVATE)
2480 : 0 : vj1_Vci_ei=0.0;
2481 : 0 : vj1_Vbi_ei=0.0;
2482 : 0 : vj1_Vs_ci=0.0;
2483 : 0 : vj1_Vbi_ci=(-((a_Vbi_ci*d00_logE0)+(a*ee1_Vbi_ci*d10_logE0)));
2484 : 0 : vj1_Vtnode_GND=(vf_Vtnode_GND-((a_Vtnode_GND*d00_logE0)+(a*ee1_Vtnode_GND*d10_logE0)));
2485 : 0 : vj1_Vb_ci=(-((a_Vb_ci*d00_logE0)+(a*ee1_Vb_ci*d10_logE0)));
2486 : : #endif
2487 : 0 : vj1=(vf-(a*d00_logE0));
2488 : : }
2489 : : }
2490 : : else
2491 : : {
2492 : : #if defined(_DERIVATE)
2493 : 0 : vj1_Vci_ei=0.0;
2494 : 0 : vj1_Vbi_ei=0.0;
2495 : 0 : vj1_Vs_ci=0.0;
2496 : 0 : vj1_Vbi_ci=Vbici_Vbi_ci;
2497 : 0 : vj1_Vtnode_GND=0.0;
2498 : 0 : vj1_Vb_ci=0.0;
2499 : : #endif
2500 : 0 : vj1=Vbici;
2501 : : }
2502 : : #if defined(_DERIVATE)
2503 : 0 : a_Vci_ei=0.0;
2504 : 0 : a_Vbi_ei=0.0;
2505 : 0 : a_Vbi_ci=0.0;
2506 : 0 : a_Vb_ci=0.0;
2507 : 0 : a_Vtnode_GND=((0.1*vp_Vtnode_GND)+(4.0*VT_Vtnode_GND));
2508 : : #endif
2509 : 0 : a=((0.1*vp)+(4.0*VT));
2510 : : #if defined(_DERIVATE)
2511 : 0 : vr_Vci_ei=0.0;
2512 : 0 : vr_Vbi_ei=0.0;
2513 : 0 : vr_Vs_ci=0.0;
2514 : 0 : vr_Vbi_ci=((vj1_Vbi_ci*a-(vp+vj1)*a_Vbi_ci)/a/a);
2515 : 0 : vr_Vtnode_GND=(((vp_Vtnode_GND+vj1_Vtnode_GND)*a-(vp+vj1)*a_Vtnode_GND)/a/a);
2516 : 0 : vr_Vb_ci=((vj1_Vb_ci*a-(vp+vj1)*a_Vb_ci)/a/a);
2517 : : #endif
2518 : 0 : vr=((vp+vj1)/a);
2519 [ # # ]: 0 : if
2520 : : (vr<=80.0)
2521 : : {
2522 : : {
2523 : 0 : double m00_exp(d00_exp0,vr)
2524 : : #if defined(_DERIVATE)
2525 : : #define d10_exp0 d00_exp0
2526 : : #endif
2527 : : #if defined(_DERIVATE)
2528 : 0 : ex1_Vs_ci=0.0;
2529 : 0 : ex1_Vci_ei=0.0;
2530 : 0 : ex1_Vbi_ei=0.0;
2531 : 0 : ex1_Vbi_ci=vr_Vbi_ci*d10_exp0;
2532 : 0 : ex1_Vtnode_GND=vr_Vtnode_GND*d10_exp0;
2533 : 0 : ex1_Vb_ci=vr_Vb_ci*d10_exp0;
2534 : : #endif
2535 : 0 : ex1=d00_exp0;
2536 : : }
2537 : : #if defined(_DERIVATE)
2538 : 0 : ee1_Vs_ci=0.0;
2539 : 0 : ee1_Vci_ei=0.0;
2540 : 0 : ee1_Vbi_ei=0.0;
2541 : 0 : ee1_Vbi_ci=ex1_Vbi_ci;
2542 : 0 : ee1_Vtnode_GND=ex1_Vtnode_GND;
2543 : 0 : ee1_Vb_ci=ex1_Vb_ci;
2544 : : #endif
2545 : 0 : ee1=(1.0+ex1);
2546 : : {
2547 : 0 : double m00_logE(d00_logE0,ee1)
2548 : : #if defined(_DERIVATE)
2549 : 0 : double m10_logE(d10_logE0,d00_logE0,ee1)
2550 : : #endif
2551 : : #if defined(_DERIVATE)
2552 : 0 : vj2_Vci_ei=0.0;
2553 : 0 : vj2_Vbi_ei=0.0;
2554 : 0 : vj2_Vs_ci=0.0;
2555 : 0 : vj2_Vbi_ci=((a_Vbi_ci*d00_logE0)+(a*ee1_Vbi_ci*d10_logE0));
2556 : 0 : vj2_Vtnode_GND=((-vp_Vtnode_GND)+((a_Vtnode_GND*d00_logE0)+(a*ee1_Vtnode_GND*d10_logE0)));
2557 : 0 : vj2_Vb_ci=((a_Vb_ci*d00_logE0)+(a*ee1_Vb_ci*d10_logE0));
2558 : : #endif
2559 : 0 : vj2=((-vp)+(a*d00_logE0));
2560 : : }
2561 : : }
2562 : : else
2563 : : {
2564 : : #if defined(_DERIVATE)
2565 : 0 : vj2_Vci_ei=0.0;
2566 : 0 : vj2_Vbi_ei=0.0;
2567 : 0 : vj2_Vs_ci=0.0;
2568 : 0 : vj2_Vbi_ci=vj1_Vbi_ci;
2569 : 0 : vj2_Vtnode_GND=vj1_Vtnode_GND;
2570 : 0 : vj2_Vb_ci=vj1_Vb_ci;
2571 : : #endif
2572 : 0 : vj2=vj1;
2573 : : }
2574 : : #if defined(_DERIVATE)
2575 : 0 : vj4_Vs_ci=0.0;
2576 : 0 : vj4_Vci_ei=0.0;
2577 : 0 : vj4_Vbi_ei=0.0;
2578 : 0 : vj4_Vbi_ci=(Vbici_Vbi_ci-vj1_Vbi_ci);
2579 : 0 : vj4_Vb_ci=(-vj1_Vb_ci);
2580 : 0 : vj4_Vtnode_GND=(-vj1_Vtnode_GND);
2581 : : #endif
2582 : 0 : vj4=(Vbici-vj1);
2583 : 0 : ez=(1.0-zcx);
2584 : 0 : ezr=(1.0-zr);
2585 : : {
2586 : 0 : double m00_logE(d00_logE0,(1.0-(vj1/vdcx_t)))
2587 : : #if defined(_DERIVATE)
2588 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(vj1/vdcx_t)))
2589 : : #endif
2590 : : #if defined(_DERIVATE)
2591 : 0 : vdj1_Vci_ei=0.0;
2592 : 0 : vdj1_Vbi_ei=0.0;
2593 : 0 : vdj1_Vs_ci=0.0;
2594 : 0 : vdj1_Vbi_ci=(-(vj1_Vbi_ci/vdcx_t))*d10_logE0;
2595 : 0 : vdj1_Vtnode_GND=(-((vj1_Vtnode_GND*vdcx_t-vj1*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*d10_logE0;
2596 : 0 : vdj1_Vb_ci=(-(vj1_Vb_ci/vdcx_t))*d10_logE0;
2597 : : #endif
2598 : 0 : vdj1=d00_logE0;
2599 : : }
2600 : : {
2601 : 0 : double m00_logE(d00_logE0,(1.0-(vj2/vdcx_t)))
2602 : : #if defined(_DERIVATE)
2603 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(vj2/vdcx_t)))
2604 : : #endif
2605 : : #if defined(_DERIVATE)
2606 : 0 : vdj2_Vci_ei=0.0;
2607 : 0 : vdj2_Vbi_ei=0.0;
2608 : 0 : vdj2_Vs_ci=0.0;
2609 : 0 : vdj2_Vbi_ci=(-(vj2_Vbi_ci/vdcx_t))*d10_logE0;
2610 : 0 : vdj2_Vtnode_GND=(-((vj2_Vtnode_GND*vdcx_t-vj2*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*d10_logE0;
2611 : 0 : vdj2_Vb_ci=(-(vj2_Vb_ci/vdcx_t))*d10_logE0;
2612 : : #endif
2613 : 0 : vdj2=d00_logE0;
2614 : : }
2615 : : {
2616 : 0 : double m00_exp(d00_exp0,(vdj2*ez))
2617 : : #if defined(_DERIVATE)
2618 : : #define d10_exp0 d00_exp0
2619 : : #endif
2620 : : #if defined(_DERIVATE)
2621 : 0 : qj1_Vci_ei=0.0;
2622 : 0 : qj1_Vbi_ei=0.0;
2623 : 0 : qj1_Vs_ci=0.0;
2624 : 0 : qj1_Vbi_ci=((cjcx0_t_ii*(-vdj2_Vbi_ci*ez*d10_exp0))/ez);
2625 : 0 : qj1_Vtnode_GND=(((cjcx0_t_ii_Vtnode_GND*(1.0-d00_exp0))+(cjcx0_t_ii*(-vdj2_Vtnode_GND*ez*d10_exp0)))/ez);
2626 : 0 : qj1_Vb_ci=((cjcx0_t_ii*(-vdj2_Vb_ci*ez*d10_exp0))/ez);
2627 : : #endif
2628 : 0 : qj1=((cjcx0_t_ii*(1.0-d00_exp0))/ez);
2629 : : }
2630 : : {
2631 : 0 : double m00_exp(d00_exp0,(vdj1*ezr))
2632 : : #if defined(_DERIVATE)
2633 : : #define d10_exp0 d00_exp0
2634 : : #endif
2635 : : #if defined(_DERIVATE)
2636 : 0 : qj2_Vci_ei=0.0;
2637 : 0 : qj2_Vbi_ei=0.0;
2638 : 0 : qj2_Vs_ci=0.0;
2639 : 0 : qj2_Vbi_ci=((cr*(-vdj1_Vbi_ci*ezr*d10_exp0))/ezr);
2640 : 0 : qj2_Vtnode_GND=(((cr_Vtnode_GND*(1.0-d00_exp0))+(cr*(-vdj1_Vtnode_GND*ezr*d10_exp0)))/ezr);
2641 : 0 : qj2_Vb_ci=((cr*(-vdj1_Vb_ci*ezr*d10_exp0))/ezr);
2642 : : #endif
2643 : 0 : qj2=((cr*(1.0-d00_exp0))/ezr);
2644 : : }
2645 : : {
2646 : 0 : double m00_exp(d00_exp0,(vdj2*ezr))
2647 : : #if defined(_DERIVATE)
2648 : : #define d10_exp0 d00_exp0
2649 : : #endif
2650 : : #if defined(_DERIVATE)
2651 : 0 : qj3_Vci_ei=0.0;
2652 : 0 : qj3_Vbi_ei=0.0;
2653 : 0 : qj3_Vs_ci=0.0;
2654 : 0 : qj3_Vbi_ci=((cr*(-vdj2_Vbi_ci*ezr*d10_exp0))/ezr);
2655 : 0 : qj3_Vtnode_GND=(((cr_Vtnode_GND*(1.0-d00_exp0))+(cr*(-vdj2_Vtnode_GND*ezr*d10_exp0)))/ezr);
2656 : 0 : qj3_Vb_ci=((cr*(-vdj2_Vb_ci*ezr*d10_exp0))/ezr);
2657 : : #endif
2658 : 0 : qj3=((cr*(1.0-d00_exp0))/ezr);
2659 : : }
2660 : : #if defined(_DYNAMIC)
2661 : : #if defined(_DERIVATE)
2662 : 0 : qjcxi_Vbi_ci=(((qj1_Vbi_ci+qj2_Vbi_ci)-qj3_Vbi_ci)*vdcx_t+(cmax*vj4_Vbi_ci));
2663 : 0 : qjcxi_Vtnode_GND=(((((qj1_Vtnode_GND+qj2_Vtnode_GND)-qj3_Vtnode_GND)*vdcx_t)+(((qj1+qj2)-qj3)*vdcx_t_Vtnode_GND))+((cmax_Vtnode_GND*vj4)+(cmax*vj4_Vtnode_GND)));
2664 : 0 : qjcxi_Vb_ci=(((qj1_Vb_ci+qj2_Vb_ci)-qj3_Vb_ci)*vdcx_t+(cmax*vj4_Vb_ci));
2665 : : #endif
2666 : 0 : qjcxi=((((qj1+qj2)-qj3)*vdcx_t)+(cmax*vj4));
2667 : : #endif
2668 : : }
2669 : : else
2670 : : {
2671 : : #if defined(_DYNAMIC)
2672 : : #if defined(_DERIVATE)
2673 : 0 : qjcxi_Vbi_ci=0.0;
2674 : 0 : qjcxi_Vtnode_GND=0.0;
2675 : 0 : qjcxi_Vb_ci=0.0;
2676 : : #endif
2677 : 0 : qjcxi=0.0;
2678 : : #endif
2679 : : }
2680 : : }
2681 : : else
2682 : : {
2683 [ # # ]: 0 : if
2684 : : (cjcx0_t_ii>0.0)
2685 : : {
2686 : : {
2687 : 0 : double m00_logE(d00_logE0,2.4)
2688 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zcx))
2689 : : #if defined(_DERIVATE)
2690 : 0 : vf_Vtnode_GND=vdcx_t_Vtnode_GND*(1.0-d00_exp1);
2691 : : #endif
2692 : 0 : vf=(vdcx_t*(1.0-d00_exp1));
2693 : : }
2694 : : #if defined(_DERIVATEFORDDX)
2695 : : #if defined(_DERIVATE)
2696 : 0 : xvf_Vs_ci=0.0;
2697 : : #endif
2698 : 0 : xvf_Vbi_ei=0.0;
2699 : : #if defined(_DERIVATE)
2700 : 0 : xvf_Vbi_ei_Vs_ci=0.0;
2701 : 0 : xvf_Vbi_ei_Vbi_ei=0.0;
2702 : 0 : xvf_Vbi_ei_Vbi_ci=0.0;
2703 : 0 : xvf_Vbi_ei_Vtnode_GND=0.0;
2704 : 0 : xvf_Vbi_ei_Vb_ci=0.0;
2705 : : #endif
2706 : 0 : xvf_Vbi_ci=((-Vbici_Vbi_ci)/VT);
2707 : : #if defined(_DERIVATE)
2708 : 0 : xvf_Vbi_ci_Vs_ci=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*0.0+0.0*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
2709 : 0 : xvf_Vbi_ci_Vbi_ei=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*0.0+0.0*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
2710 : 0 : xvf_Vbi_ci_Vbi_ci=((+0.0-Vbici_Vbi_ci_Vbi_ci)/VT-((-Vbici_Vbi_ci)*0.0+(-Vbici_Vbi_ci)*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
2711 : 0 : xvf_Vbi_ci_Vtnode_GND=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*VT_Vtnode_GND+vf_Vtnode_GND*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*VT_Vtnode_GND/VT/VT/VT);
2712 : 0 : xvf_Vbi_ci_Vb_ci=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*0.0+0.0*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
2713 : : #endif
2714 : : #if defined(_DERIVATE)
2715 : 0 : xvf_Vtnode_GND=((vf_Vtnode_GND*VT-(vf-Vbici)*VT_Vtnode_GND)/VT/VT);
2716 : : #endif
2717 : : #if defined(_DERIVATE)
2718 : 0 : xvf_Vb_ci=0.0;
2719 : : #endif
2720 : : #endif
2721 : 0 : xvf=((vf-Vbici)/VT);
2722 : : {
2723 : 0 : double m00_sqrt(d00_sqrt0,((xvf*xvf)+1.921812))
2724 : : #if defined(_DERIVATEFORDDX)
2725 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((xvf*xvf)+1.921812))
2726 : : #endif
2727 : : #if defined(_DERIVATEFORDDX)
2728 : : #if defined(_DERIVATE)
2729 : 0 : xvf2_Vs_ci=0.0;
2730 : : #endif
2731 : 0 : xvf2_Vbi_ei=0.0;
2732 : : #if defined(_DERIVATE)
2733 : 0 : xvf2_Vbi_ei_Vs_ci=0.0;
2734 : 0 : xvf2_Vbi_ei_Vbi_ei=0.0;
2735 : 0 : xvf2_Vbi_ei_Vbi_ci=0.0;
2736 : 0 : xvf2_Vbi_ei_Vtnode_GND=0.0;
2737 : 0 : xvf2_Vbi_ei_Vb_ci=0.0;
2738 : : #endif
2739 : 0 : xvf2_Vbi_ci=((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))*d10_sqrt0;
2740 : : #if defined(_DERIVATE)
2741 : 0 : xvf2_Vbi_ci_Vs_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vs_ci*xvf)+(xvf*xvf_Vs_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vs_ci*xvf+xvf_Vbi_ci*xvf_Vs_ci+xvf_Vs_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vs_ci)+0.0));
2742 : 0 : xvf2_Vbi_ci_Vbi_ei=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ei*xvf+xvf_Vbi_ci*xvf_Vbi_ei+xvf_Vbi_ei*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ei)+0.0));
2743 : 0 : xvf2_Vbi_ci_Vbi_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ci*xvf+xvf_Vbi_ci*xvf_Vbi_ci+xvf_Vbi_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ci)+0.0));
2744 : 0 : xvf2_Vbi_ci_Vtnode_GND=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vtnode_GND*xvf+xvf_Vbi_ci*xvf_Vtnode_GND+xvf_Vtnode_GND*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vtnode_GND)+0.0));
2745 : 0 : xvf2_Vbi_ci_Vb_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vb_ci*xvf+xvf_Vbi_ci*xvf_Vb_ci+xvf_Vb_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vb_ci)+0.0));
2746 : : #endif
2747 : : #if defined(_DERIVATE)
2748 : 0 : xvf2_Vtnode_GND=((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND))*d10_sqrt0;
2749 : : #endif
2750 : : #if defined(_DERIVATE)
2751 : 0 : xvf2_Vb_ci=((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci))*d10_sqrt0;
2752 : : #endif
2753 : : #endif
2754 : 0 : xvf2=d00_sqrt0;
2755 : : }
2756 : : #if defined(_DERIVATEFORDDX)
2757 : : #if defined(_DERIVATE)
2758 : 0 : v_j_Vs_ci=0.0;
2759 : : #endif
2760 : 0 : v_j_Vbi_ei=0.0;
2761 : : #if defined(_DERIVATE)
2762 : 0 : v_j_Vbi_ei_Vs_ci=0.0;
2763 : 0 : v_j_Vbi_ei_Vbi_ei=0.0;
2764 : 0 : v_j_Vbi_ei_Vbi_ci=0.0;
2765 : 0 : v_j_Vbi_ei_Vtnode_GND=0.0;
2766 : 0 : v_j_Vbi_ei_Vb_ci=0.0;
2767 : : #endif
2768 : 0 : v_j_Vbi_ci=(-(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.5);
2769 : : #if defined(_DERIVATE)
2770 : 0 : v_j_Vbi_ci_Vs_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vs_ci+xvf2_Vs_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vs_ci+xvf2_Vbi_ci_Vs_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vs_ci+xvf2_Vs_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
2771 : 0 : v_j_Vbi_ci_Vbi_ei=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ei+xvf2_Vbi_ci_Vbi_ei))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ei+xvf2_Vbi_ei)))*0.0+(VT*(xvf+xvf2))*0.0));
2772 : 0 : v_j_Vbi_ci_Vbi_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ci+xvf2_Vbi_ci_Vbi_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ci+xvf2_Vbi_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
2773 : 0 : v_j_Vbi_ci_Vtnode_GND=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vtnode_GND+xvf2_Vtnode_GND)+VT_Vtnode_GND*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vtnode_GND+xvf2_Vbi_ci_Vtnode_GND))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+(((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND))))*0.0+(VT*(xvf+xvf2))*0.0));
2774 : 0 : v_j_Vbi_ci_Vb_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vb_ci+xvf2_Vb_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vb_ci+xvf2_Vbi_ci_Vb_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vb_ci+xvf2_Vb_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
2775 : : #endif
2776 : : #if defined(_DERIVATE)
2777 : 0 : v_j_Vtnode_GND=(vf_Vtnode_GND-((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND)))*0.5);
2778 : : #endif
2779 : : #if defined(_DERIVATE)
2780 : 0 : v_j_Vb_ci=(-(VT*(xvf_Vb_ci+xvf2_Vb_ci))*0.5);
2781 : : #endif
2782 : : #endif
2783 : 0 : v_j=(vf-((VT*(xvf+xvf2))*0.5));
2784 : : #if defined(_DERIVATE)
2785 : 0 : x_Vtnode_GND=0.0;
2786 : 0 : x_Vci_ei=0.0;
2787 : : #endif
2788 : 0 : x=(1.0-zcx);
2789 : : {
2790 : 0 : double m00_logE(d00_logE0,(1.0-(v_j/vdcx_t)))
2791 : 0 : double m00_exp(d00_exp1,(x*d00_logE0))
2792 : : #if defined(_DERIVATEFORDDX)
2793 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(v_j/vdcx_t)))
2794 : : #define d10_exp1 d00_exp1
2795 : : #endif
2796 : : #if defined(_DERIVATEFORDDX)
2797 : : #if defined(_DERIVATE)
2798 : 0 : y_Vci_ei=0.0;
2799 : : #endif
2800 : : #if defined(_DERIVATE)
2801 : 0 : y_Vs_ci=0.0;
2802 : : #endif
2803 : 0 : y_Vbi_ei=0.0;
2804 : : #if defined(_DERIVATE)
2805 : 0 : y_Vbi_ei_Vci_ei=0.0;
2806 : 0 : y_Vbi_ei_Vs_ci=0.0;
2807 : 0 : y_Vbi_ei_Vbi_ei=0.0;
2808 : 0 : y_Vbi_ei_Vbi_ci=0.0;
2809 : 0 : y_Vbi_ei_Vtnode_GND=0.0;
2810 : 0 : y_Vbi_ei_Vb_ci=0.0;
2811 : : #endif
2812 : 0 : y_Vbi_ci=(-(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)*d10_exp1);
2813 : : #if defined(_DERIVATE)
2814 : 0 : y_Vbi_ci_Vci_ei=(+0.0-(m20_exp((x*d00_logE0))*(x_Vci_ei*d00_logE0)*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*0.0+x_Vci_ei*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*0.0)));
2815 : 0 : y_Vbi_ci_Vs_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vs_ci/vdcx_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vs_ci/vdcx_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdcx_t)))*(-(v_j_Vs_ci/vdcx_t))*(-(v_j_Vbi_ci/vdcx_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vs_ci/vdcx_t-(v_j_Vbi_ci*0.0+v_j_Vs_ci*0.0+v_j*0.0)/vdcx_t/vdcx_t+2*v_j*0.0*0.0/vdcx_t/vdcx_t/vdcx_t))))));
2816 : 0 : y_Vbi_ci_Vbi_ei=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ei/vdcx_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ei/vdcx_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdcx_t)))*(-(v_j_Vbi_ei/vdcx_t))*(-(v_j_Vbi_ci/vdcx_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vbi_ei/vdcx_t-(v_j_Vbi_ci*0.0+v_j_Vbi_ei*0.0+v_j*0.0)/vdcx_t/vdcx_t+2*v_j*0.0*0.0/vdcx_t/vdcx_t/vdcx_t))))));
2817 : 0 : y_Vbi_ci_Vbi_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdcx_t)))*(-(v_j_Vbi_ci/vdcx_t))*(-(v_j_Vbi_ci/vdcx_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vbi_ci/vdcx_t-(v_j_Vbi_ci*0.0+v_j_Vbi_ci*0.0+v_j*0.0)/vdcx_t/vdcx_t+2*v_j*0.0*0.0/vdcx_t/vdcx_t/vdcx_t))))));
2818 : 0 : y_Vbi_ci_Vtnode_GND=(+0.0-(m20_exp((x*d00_logE0))*(((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vdcx_t-v_j*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*d10_logE0)))*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-((v_j_Vtnode_GND*vdcx_t-v_j*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*d10_logE0+x_Vtnode_GND*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdcx_t)))*(-((v_j_Vtnode_GND*vdcx_t-v_j*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*(-(v_j_Vbi_ci/vdcx_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vtnode_GND/vdcx_t-(v_j_Vbi_ci*vdcx_t_Vtnode_GND+v_j_Vtnode_GND*0.0+v_j*0.0)/vdcx_t/vdcx_t+2*v_j*0.0*vdcx_t_Vtnode_GND/vdcx_t/vdcx_t/vdcx_t))))));
2819 : 0 : y_Vbi_ci_Vb_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vb_ci/vdcx_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vb_ci/vdcx_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdcx_t)))*(-(v_j_Vb_ci/vdcx_t))*(-(v_j_Vbi_ci/vdcx_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vb_ci/vdcx_t-(v_j_Vbi_ci*0.0+v_j_Vb_ci*0.0+v_j*0.0)/vdcx_t/vdcx_t+2*v_j*0.0*0.0/vdcx_t/vdcx_t/vdcx_t))))));
2820 : : #endif
2821 : : #if defined(_DERIVATE)
2822 : 0 : y_Vtnode_GND=(-((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vdcx_t-v_j*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*d10_logE0))*d10_exp1);
2823 : : #endif
2824 : : #if defined(_DERIVATE)
2825 : 0 : y_Vb_ci=(-(x*(-(v_j_Vb_ci/vdcx_t))*d10_logE0)*d10_exp1);
2826 : : #endif
2827 : : #endif
2828 : 0 : y=(1.0-d00_exp1);
2829 : : }
2830 : : #if defined(_DYNAMIC)
2831 : : #if defined(_DERIVATE)
2832 : 0 : qjcxi_Vbi_ci=((((cjcx0_t_ii*vdcx_t)*y_Vbi_ci)/x)+((2.4*cjcx0_t_ii)*(Vbici_Vbi_ci-v_j_Vbi_ci)));
2833 : 0 : qjcxi_Vtnode_GND=(((((((cjcx0_t_ii_Vtnode_GND*vdcx_t)+(cjcx0_t_ii*vdcx_t_Vtnode_GND))*y)+((cjcx0_t_ii*vdcx_t)*y_Vtnode_GND))*x-((cjcx0_t_ii*vdcx_t)*y)*x_Vtnode_GND)/x/x)+(((2.4*cjcx0_t_ii_Vtnode_GND)*(Vbici-v_j))+((2.4*cjcx0_t_ii)*(-v_j_Vtnode_GND))));
2834 : 0 : qjcxi_Vb_ci=((((cjcx0_t_ii*vdcx_t)*y_Vb_ci)/x)+((2.4*cjcx0_t_ii)*(-v_j_Vb_ci)));
2835 : : #endif
2836 : 0 : qjcxi=((((cjcx0_t_ii*vdcx_t)*y)/x)+((2.4*cjcx0_t_ii)*(Vbici-v_j)));
2837 : : #endif
2838 : : }
2839 : : else
2840 : : {
2841 : : #if defined(_DYNAMIC)
2842 : : #if defined(_DERIVATE)
2843 : 0 : qjcxi_Vbi_ci=0.0;
2844 : 0 : qjcxi_Vtnode_GND=0.0;
2845 : 0 : qjcxi_Vb_ci=0.0;
2846 : : #endif
2847 : 0 : qjcxi=0.0;
2848 : : #endif
2849 : : }
2850 : : }
2851 : : #if defined(_DERIVATE)
2852 : 0 : cjcx0_t_i_Vtnode_GND=cjcx0_t_Vtnode_GND*(1-fbc);
2853 : : #endif
2854 : 0 : cjcx0_t_i=(cjcx0_t*(1-fbc));
2855 [ # # ]: 0 : if
2856 : : (vptcx<1.0e2)
2857 : : {
2858 [ # # ]: 0 : if
2859 : : (cjcx0_t_i>0.0)
2860 : : {
2861 : 0 : zr=(zcx/4.0);
2862 : : #if defined(_DERIVATE)
2863 : 0 : vp_Vtnode_GND=(-vdcx_t_Vtnode_GND);
2864 : : #endif
2865 : 0 : vp=(vptcx-vdcx_t);
2866 : : {
2867 : 0 : double m00_logE(d00_logE0,2.4)
2868 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zcx))
2869 : : #if defined(_DERIVATE)
2870 : 0 : vf_Vtnode_GND=vdcx_t_Vtnode_GND*(1.0-d00_exp1);
2871 : : #endif
2872 : 0 : vf=(vdcx_t*(1.0-d00_exp1));
2873 : : }
2874 : : #if defined(_DERIVATE)
2875 : 0 : cmax_Vtnode_GND=(2.4*cjcx0_t_i_Vtnode_GND);
2876 : : #endif
2877 : 0 : cmax=(2.4*cjcx0_t_i);
2878 : : {
2879 : 0 : double m00_logE(d00_logE0,(vdcx_t/vptcx))
2880 : 0 : double m00_exp(d00_exp1,((zcx-zr)*d00_logE0))
2881 : : #if defined(_DERIVATE)
2882 : 0 : double m10_logE(d10_logE0,d00_logE0,(vdcx_t/vptcx))
2883 : : #define d10_exp1 d00_exp1
2884 : : #endif
2885 : : #if defined(_DERIVATE)
2886 : 0 : cr_Vtnode_GND=((cjcx0_t_i_Vtnode_GND*d00_exp1)+(cjcx0_t_i*((zcx-zr)*(vdcx_t_Vtnode_GND/vptcx)*d10_logE0)*d10_exp1));
2887 : : #endif
2888 : 0 : cr=(cjcx0_t_i*d00_exp1);
2889 : : }
2890 : : #if defined(_DERIVATE)
2891 : 0 : a_Vci_ei=0.0;
2892 : 0 : a_Vbi_ei=0.0;
2893 : 0 : a_Vbi_ci=0.0;
2894 : 0 : a_Vb_ci=0.0;
2895 : 0 : a_Vtnode_GND=VT_Vtnode_GND;
2896 : : #endif
2897 : 0 : a=VT;
2898 : : #if defined(_DERIVATE)
2899 : 0 : ve_Vs_ci=0.0;
2900 : 0 : ve_Vci_ei=0.0;
2901 : 0 : ve_Vbi_ei=0.0;
2902 : 0 : ve_Vbi_ci=0.0;
2903 : 0 : ve_Vtnode_GND=((vf_Vtnode_GND*a-(vf-Vbci)*a_Vtnode_GND)/a/a);
2904 : 0 : ve_Vb_ci=(((-Vbci_Vb_ci)*a-(vf-Vbci)*a_Vb_ci)/a/a);
2905 : : #endif
2906 : 0 : ve=((vf-Vbci)/a);
2907 [ # # ]: 0 : if
2908 : : (ve<=80.0)
2909 : : {
2910 : : {
2911 : 0 : double m00_exp(d00_exp0,ve)
2912 : : #if defined(_DERIVATE)
2913 : : #define d10_exp0 d00_exp0
2914 : : #endif
2915 : : #if defined(_DERIVATE)
2916 : 0 : ex1_Vs_ci=0.0;
2917 : 0 : ex1_Vci_ei=0.0;
2918 : 0 : ex1_Vbi_ei=0.0;
2919 : 0 : ex1_Vbi_ci=ve_Vbi_ci*d10_exp0;
2920 : 0 : ex1_Vtnode_GND=ve_Vtnode_GND*d10_exp0;
2921 : 0 : ex1_Vb_ci=ve_Vb_ci*d10_exp0;
2922 : : #endif
2923 : 0 : ex1=d00_exp0;
2924 : : }
2925 : : #if defined(_DERIVATE)
2926 : 0 : ee1_Vs_ci=0.0;
2927 : 0 : ee1_Vci_ei=0.0;
2928 : 0 : ee1_Vbi_ei=0.0;
2929 : 0 : ee1_Vbi_ci=ex1_Vbi_ci;
2930 : 0 : ee1_Vtnode_GND=ex1_Vtnode_GND;
2931 : 0 : ee1_Vb_ci=ex1_Vb_ci;
2932 : : #endif
2933 : 0 : ee1=(1.0+ex1);
2934 : : {
2935 : 0 : double m00_logE(d00_logE0,ee1)
2936 : : #if defined(_DERIVATE)
2937 : 0 : double m10_logE(d10_logE0,d00_logE0,ee1)
2938 : : #endif
2939 : : #if defined(_DERIVATE)
2940 : 0 : vj1_Vci_ei=0.0;
2941 : 0 : vj1_Vbi_ei=0.0;
2942 : 0 : vj1_Vs_ci=0.0;
2943 : 0 : vj1_Vbi_ci=(-((a_Vbi_ci*d00_logE0)+(a*ee1_Vbi_ci*d10_logE0)));
2944 : 0 : vj1_Vtnode_GND=(vf_Vtnode_GND-((a_Vtnode_GND*d00_logE0)+(a*ee1_Vtnode_GND*d10_logE0)));
2945 : 0 : vj1_Vb_ci=(-((a_Vb_ci*d00_logE0)+(a*ee1_Vb_ci*d10_logE0)));
2946 : : #endif
2947 : 0 : vj1=(vf-(a*d00_logE0));
2948 : : }
2949 : : }
2950 : : else
2951 : : {
2952 : : #if defined(_DERIVATE)
2953 : 0 : vj1_Vci_ei=0.0;
2954 : 0 : vj1_Vbi_ei=0.0;
2955 : 0 : vj1_Vs_ci=0.0;
2956 : 0 : vj1_Vbi_ci=0.0;
2957 : 0 : vj1_Vtnode_GND=0.0;
2958 : 0 : vj1_Vb_ci=Vbci_Vb_ci;
2959 : : #endif
2960 : 0 : vj1=Vbci;
2961 : : }
2962 : : #if defined(_DERIVATE)
2963 : 0 : a_Vci_ei=0.0;
2964 : 0 : a_Vbi_ei=0.0;
2965 : 0 : a_Vbi_ci=0.0;
2966 : 0 : a_Vb_ci=0.0;
2967 : 0 : a_Vtnode_GND=((0.1*vp_Vtnode_GND)+(4.0*VT_Vtnode_GND));
2968 : : #endif
2969 : 0 : a=((0.1*vp)+(4.0*VT));
2970 : : #if defined(_DERIVATE)
2971 : 0 : vr_Vci_ei=0.0;
2972 : 0 : vr_Vbi_ei=0.0;
2973 : 0 : vr_Vs_ci=0.0;
2974 : 0 : vr_Vbi_ci=((vj1_Vbi_ci*a-(vp+vj1)*a_Vbi_ci)/a/a);
2975 : 0 : vr_Vtnode_GND=(((vp_Vtnode_GND+vj1_Vtnode_GND)*a-(vp+vj1)*a_Vtnode_GND)/a/a);
2976 : 0 : vr_Vb_ci=((vj1_Vb_ci*a-(vp+vj1)*a_Vb_ci)/a/a);
2977 : : #endif
2978 : 0 : vr=((vp+vj1)/a);
2979 [ # # ]: 0 : if
2980 : : (vr<=80.0)
2981 : : {
2982 : : {
2983 : 0 : double m00_exp(d00_exp0,vr)
2984 : : #if defined(_DERIVATE)
2985 : : #define d10_exp0 d00_exp0
2986 : : #endif
2987 : : #if defined(_DERIVATE)
2988 : 0 : ex1_Vs_ci=0.0;
2989 : 0 : ex1_Vci_ei=0.0;
2990 : 0 : ex1_Vbi_ei=0.0;
2991 : 0 : ex1_Vbi_ci=vr_Vbi_ci*d10_exp0;
2992 : 0 : ex1_Vtnode_GND=vr_Vtnode_GND*d10_exp0;
2993 : 0 : ex1_Vb_ci=vr_Vb_ci*d10_exp0;
2994 : : #endif
2995 : 0 : ex1=d00_exp0;
2996 : : }
2997 : : #if defined(_DERIVATE)
2998 : 0 : ee1_Vs_ci=0.0;
2999 : 0 : ee1_Vci_ei=0.0;
3000 : 0 : ee1_Vbi_ei=0.0;
3001 : 0 : ee1_Vbi_ci=ex1_Vbi_ci;
3002 : 0 : ee1_Vtnode_GND=ex1_Vtnode_GND;
3003 : 0 : ee1_Vb_ci=ex1_Vb_ci;
3004 : : #endif
3005 : 0 : ee1=(1.0+ex1);
3006 : : {
3007 : 0 : double m00_logE(d00_logE0,ee1)
3008 : : #if defined(_DERIVATE)
3009 : 0 : double m10_logE(d10_logE0,d00_logE0,ee1)
3010 : : #endif
3011 : : #if defined(_DERIVATE)
3012 : 0 : vj2_Vci_ei=0.0;
3013 : 0 : vj2_Vbi_ei=0.0;
3014 : 0 : vj2_Vs_ci=0.0;
3015 : 0 : vj2_Vbi_ci=((a_Vbi_ci*d00_logE0)+(a*ee1_Vbi_ci*d10_logE0));
3016 : 0 : vj2_Vtnode_GND=((-vp_Vtnode_GND)+((a_Vtnode_GND*d00_logE0)+(a*ee1_Vtnode_GND*d10_logE0)));
3017 : 0 : vj2_Vb_ci=((a_Vb_ci*d00_logE0)+(a*ee1_Vb_ci*d10_logE0));
3018 : : #endif
3019 : 0 : vj2=((-vp)+(a*d00_logE0));
3020 : : }
3021 : : }
3022 : : else
3023 : : {
3024 : : #if defined(_DERIVATE)
3025 : 0 : vj2_Vci_ei=0.0;
3026 : 0 : vj2_Vbi_ei=0.0;
3027 : 0 : vj2_Vs_ci=0.0;
3028 : 0 : vj2_Vbi_ci=vj1_Vbi_ci;
3029 : 0 : vj2_Vtnode_GND=vj1_Vtnode_GND;
3030 : 0 : vj2_Vb_ci=vj1_Vb_ci;
3031 : : #endif
3032 : 0 : vj2=vj1;
3033 : : }
3034 : : #if defined(_DERIVATE)
3035 : 0 : vj4_Vs_ci=0.0;
3036 : 0 : vj4_Vci_ei=0.0;
3037 : 0 : vj4_Vbi_ei=0.0;
3038 : 0 : vj4_Vbi_ci=(-vj1_Vbi_ci);
3039 : 0 : vj4_Vb_ci=(Vbci_Vb_ci-vj1_Vb_ci);
3040 : 0 : vj4_Vtnode_GND=(-vj1_Vtnode_GND);
3041 : : #endif
3042 : 0 : vj4=(Vbci-vj1);
3043 : 0 : ez=(1.0-zcx);
3044 : 0 : ezr=(1.0-zr);
3045 : : {
3046 : 0 : double m00_logE(d00_logE0,(1.0-(vj1/vdcx_t)))
3047 : : #if defined(_DERIVATE)
3048 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(vj1/vdcx_t)))
3049 : : #endif
3050 : : #if defined(_DERIVATE)
3051 : 0 : vdj1_Vci_ei=0.0;
3052 : 0 : vdj1_Vbi_ei=0.0;
3053 : 0 : vdj1_Vs_ci=0.0;
3054 : 0 : vdj1_Vbi_ci=(-(vj1_Vbi_ci/vdcx_t))*d10_logE0;
3055 : 0 : vdj1_Vtnode_GND=(-((vj1_Vtnode_GND*vdcx_t-vj1*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*d10_logE0;
3056 : 0 : vdj1_Vb_ci=(-(vj1_Vb_ci/vdcx_t))*d10_logE0;
3057 : : #endif
3058 : 0 : vdj1=d00_logE0;
3059 : : }
3060 : : {
3061 : 0 : double m00_logE(d00_logE0,(1.0-(vj2/vdcx_t)))
3062 : : #if defined(_DERIVATE)
3063 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(vj2/vdcx_t)))
3064 : : #endif
3065 : : #if defined(_DERIVATE)
3066 : 0 : vdj2_Vci_ei=0.0;
3067 : 0 : vdj2_Vbi_ei=0.0;
3068 : 0 : vdj2_Vs_ci=0.0;
3069 : 0 : vdj2_Vbi_ci=(-(vj2_Vbi_ci/vdcx_t))*d10_logE0;
3070 : 0 : vdj2_Vtnode_GND=(-((vj2_Vtnode_GND*vdcx_t-vj2*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*d10_logE0;
3071 : 0 : vdj2_Vb_ci=(-(vj2_Vb_ci/vdcx_t))*d10_logE0;
3072 : : #endif
3073 : 0 : vdj2=d00_logE0;
3074 : : }
3075 : : {
3076 : 0 : double m00_exp(d00_exp0,(vdj2*ez))
3077 : : #if defined(_DERIVATE)
3078 : : #define d10_exp0 d00_exp0
3079 : : #endif
3080 : : #if defined(_DERIVATE)
3081 : 0 : qj1_Vci_ei=0.0;
3082 : 0 : qj1_Vbi_ei=0.0;
3083 : 0 : qj1_Vs_ci=0.0;
3084 : 0 : qj1_Vbi_ci=((cjcx0_t_i*(-vdj2_Vbi_ci*ez*d10_exp0))/ez);
3085 : 0 : qj1_Vtnode_GND=(((cjcx0_t_i_Vtnode_GND*(1.0-d00_exp0))+(cjcx0_t_i*(-vdj2_Vtnode_GND*ez*d10_exp0)))/ez);
3086 : 0 : qj1_Vb_ci=((cjcx0_t_i*(-vdj2_Vb_ci*ez*d10_exp0))/ez);
3087 : : #endif
3088 : 0 : qj1=((cjcx0_t_i*(1.0-d00_exp0))/ez);
3089 : : }
3090 : : {
3091 : 0 : double m00_exp(d00_exp0,(vdj1*ezr))
3092 : : #if defined(_DERIVATE)
3093 : : #define d10_exp0 d00_exp0
3094 : : #endif
3095 : : #if defined(_DERIVATE)
3096 : 0 : qj2_Vci_ei=0.0;
3097 : 0 : qj2_Vbi_ei=0.0;
3098 : 0 : qj2_Vs_ci=0.0;
3099 : 0 : qj2_Vbi_ci=((cr*(-vdj1_Vbi_ci*ezr*d10_exp0))/ezr);
3100 : 0 : qj2_Vtnode_GND=(((cr_Vtnode_GND*(1.0-d00_exp0))+(cr*(-vdj1_Vtnode_GND*ezr*d10_exp0)))/ezr);
3101 : 0 : qj2_Vb_ci=((cr*(-vdj1_Vb_ci*ezr*d10_exp0))/ezr);
3102 : : #endif
3103 : 0 : qj2=((cr*(1.0-d00_exp0))/ezr);
3104 : : }
3105 : : {
3106 : 0 : double m00_exp(d00_exp0,(vdj2*ezr))
3107 : : #if defined(_DERIVATE)
3108 : : #define d10_exp0 d00_exp0
3109 : : #endif
3110 : : #if defined(_DERIVATE)
3111 : 0 : qj3_Vci_ei=0.0;
3112 : 0 : qj3_Vbi_ei=0.0;
3113 : 0 : qj3_Vs_ci=0.0;
3114 : 0 : qj3_Vbi_ci=((cr*(-vdj2_Vbi_ci*ezr*d10_exp0))/ezr);
3115 : 0 : qj3_Vtnode_GND=(((cr_Vtnode_GND*(1.0-d00_exp0))+(cr*(-vdj2_Vtnode_GND*ezr*d10_exp0)))/ezr);
3116 : 0 : qj3_Vb_ci=((cr*(-vdj2_Vb_ci*ezr*d10_exp0))/ezr);
3117 : : #endif
3118 : 0 : qj3=((cr*(1.0-d00_exp0))/ezr);
3119 : : }
3120 : : #if defined(_DYNAMIC)
3121 : : #if defined(_DERIVATE)
3122 : 0 : qjcx_Vbi_ci=(((qj1_Vbi_ci+qj2_Vbi_ci)-qj3_Vbi_ci)*vdcx_t+(cmax*vj4_Vbi_ci));
3123 : 0 : qjcx_Vtnode_GND=(((((qj1_Vtnode_GND+qj2_Vtnode_GND)-qj3_Vtnode_GND)*vdcx_t)+(((qj1+qj2)-qj3)*vdcx_t_Vtnode_GND))+((cmax_Vtnode_GND*vj4)+(cmax*vj4_Vtnode_GND)));
3124 : 0 : qjcx_Vb_ci=(((qj1_Vb_ci+qj2_Vb_ci)-qj3_Vb_ci)*vdcx_t+(cmax*vj4_Vb_ci));
3125 : : #endif
3126 : 0 : qjcx=((((qj1+qj2)-qj3)*vdcx_t)+(cmax*vj4));
3127 : : #endif
3128 : : }
3129 : : else
3130 : : {
3131 : : #if defined(_DYNAMIC)
3132 : : #if defined(_DERIVATE)
3133 : 0 : qjcx_Vbi_ci=0.0;
3134 : 0 : qjcx_Vtnode_GND=0.0;
3135 : 0 : qjcx_Vb_ci=0.0;
3136 : : #endif
3137 : 0 : qjcx=0.0;
3138 : : #endif
3139 : : }
3140 : : }
3141 : : else
3142 : : {
3143 [ # # ]: 0 : if
3144 : : (cjcx0_t_i>0.0)
3145 : : {
3146 : : {
3147 : 0 : double m00_logE(d00_logE0,2.4)
3148 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zcx))
3149 : : #if defined(_DERIVATE)
3150 : 0 : vf_Vtnode_GND=vdcx_t_Vtnode_GND*(1.0-d00_exp1);
3151 : : #endif
3152 : 0 : vf=(vdcx_t*(1.0-d00_exp1));
3153 : : }
3154 : : #if defined(_DERIVATEFORDDX)
3155 : : #if defined(_DERIVATE)
3156 : 0 : xvf_Vs_ci=0.0;
3157 : : #endif
3158 : 0 : xvf_Vbi_ei=0.0;
3159 : : #if defined(_DERIVATE)
3160 : 0 : xvf_Vbi_ei_Vs_ci=0.0;
3161 : 0 : xvf_Vbi_ei_Vbi_ei=0.0;
3162 : 0 : xvf_Vbi_ei_Vbi_ci=0.0;
3163 : 0 : xvf_Vbi_ei_Vtnode_GND=0.0;
3164 : 0 : xvf_Vbi_ei_Vb_ci=0.0;
3165 : : #endif
3166 : 0 : xvf_Vbi_ci=0.0;
3167 : : #if defined(_DERIVATE)
3168 : 0 : xvf_Vbi_ci_Vs_ci=0.0;
3169 : 0 : xvf_Vbi_ci_Vbi_ei=0.0;
3170 : 0 : xvf_Vbi_ci_Vbi_ci=0.0;
3171 : 0 : xvf_Vbi_ci_Vtnode_GND=0.0;
3172 : 0 : xvf_Vbi_ci_Vb_ci=0.0;
3173 : : #endif
3174 : : #if defined(_DERIVATE)
3175 : 0 : xvf_Vtnode_GND=((vf_Vtnode_GND*VT-(vf-Vbci)*VT_Vtnode_GND)/VT/VT);
3176 : : #endif
3177 : : #if defined(_DERIVATE)
3178 : 0 : xvf_Vb_ci=((-Vbci_Vb_ci)/VT);
3179 : : #endif
3180 : : #endif
3181 : 0 : xvf=((vf-Vbci)/VT);
3182 : : {
3183 : 0 : double m00_sqrt(d00_sqrt0,((xvf*xvf)+1.921812))
3184 : : #if defined(_DERIVATEFORDDX)
3185 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((xvf*xvf)+1.921812))
3186 : : #endif
3187 : : #if defined(_DERIVATEFORDDX)
3188 : : #if defined(_DERIVATE)
3189 : 0 : xvf2_Vs_ci=0.0;
3190 : : #endif
3191 : 0 : xvf2_Vbi_ei=0.0;
3192 : : #if defined(_DERIVATE)
3193 : 0 : xvf2_Vbi_ei_Vs_ci=0.0;
3194 : 0 : xvf2_Vbi_ei_Vbi_ei=0.0;
3195 : 0 : xvf2_Vbi_ei_Vbi_ci=0.0;
3196 : 0 : xvf2_Vbi_ei_Vtnode_GND=0.0;
3197 : 0 : xvf2_Vbi_ei_Vb_ci=0.0;
3198 : : #endif
3199 : 0 : xvf2_Vbi_ci=((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))*d10_sqrt0;
3200 : : #if defined(_DERIVATE)
3201 : 0 : xvf2_Vbi_ci_Vs_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vs_ci*xvf)+(xvf*xvf_Vs_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vs_ci*xvf+xvf_Vbi_ci*xvf_Vs_ci+xvf_Vs_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vs_ci)+0.0));
3202 : 0 : xvf2_Vbi_ci_Vbi_ei=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ei*xvf+xvf_Vbi_ci*xvf_Vbi_ei+xvf_Vbi_ei*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ei)+0.0));
3203 : 0 : xvf2_Vbi_ci_Vbi_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ci*xvf+xvf_Vbi_ci*xvf_Vbi_ci+xvf_Vbi_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ci)+0.0));
3204 : 0 : xvf2_Vbi_ci_Vtnode_GND=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vtnode_GND*xvf+xvf_Vbi_ci*xvf_Vtnode_GND+xvf_Vtnode_GND*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vtnode_GND)+0.0));
3205 : 0 : xvf2_Vbi_ci_Vb_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vb_ci*xvf+xvf_Vbi_ci*xvf_Vb_ci+xvf_Vb_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vb_ci)+0.0));
3206 : : #endif
3207 : : #if defined(_DERIVATE)
3208 : 0 : xvf2_Vtnode_GND=((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND))*d10_sqrt0;
3209 : : #endif
3210 : : #if defined(_DERIVATE)
3211 : 0 : xvf2_Vb_ci=((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci))*d10_sqrt0;
3212 : : #endif
3213 : : #endif
3214 : 0 : xvf2=d00_sqrt0;
3215 : : }
3216 : : #if defined(_DERIVATEFORDDX)
3217 : : #if defined(_DERIVATE)
3218 : 0 : v_j_Vs_ci=0.0;
3219 : : #endif
3220 : 0 : v_j_Vbi_ei=0.0;
3221 : : #if defined(_DERIVATE)
3222 : 0 : v_j_Vbi_ei_Vs_ci=0.0;
3223 : 0 : v_j_Vbi_ei_Vbi_ei=0.0;
3224 : 0 : v_j_Vbi_ei_Vbi_ci=0.0;
3225 : 0 : v_j_Vbi_ei_Vtnode_GND=0.0;
3226 : 0 : v_j_Vbi_ei_Vb_ci=0.0;
3227 : : #endif
3228 : 0 : v_j_Vbi_ci=(-(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.5);
3229 : : #if defined(_DERIVATE)
3230 : 0 : v_j_Vbi_ci_Vs_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vs_ci+xvf2_Vs_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vs_ci+xvf2_Vbi_ci_Vs_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vs_ci+xvf2_Vs_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3231 : 0 : v_j_Vbi_ci_Vbi_ei=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ei+xvf2_Vbi_ci_Vbi_ei))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ei+xvf2_Vbi_ei)))*0.0+(VT*(xvf+xvf2))*0.0));
3232 : 0 : v_j_Vbi_ci_Vbi_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ci+xvf2_Vbi_ci_Vbi_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ci+xvf2_Vbi_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3233 : 0 : v_j_Vbi_ci_Vtnode_GND=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vtnode_GND+xvf2_Vtnode_GND)+VT_Vtnode_GND*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vtnode_GND+xvf2_Vbi_ci_Vtnode_GND))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+(((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND))))*0.0+(VT*(xvf+xvf2))*0.0));
3234 : 0 : v_j_Vbi_ci_Vb_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vb_ci+xvf2_Vb_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vb_ci+xvf2_Vbi_ci_Vb_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vb_ci+xvf2_Vb_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3235 : : #endif
3236 : : #if defined(_DERIVATE)
3237 : 0 : v_j_Vtnode_GND=(vf_Vtnode_GND-((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND)))*0.5);
3238 : : #endif
3239 : : #if defined(_DERIVATE)
3240 : 0 : v_j_Vb_ci=(-(VT*(xvf_Vb_ci+xvf2_Vb_ci))*0.5);
3241 : : #endif
3242 : : #endif
3243 : 0 : v_j=(vf-((VT*(xvf+xvf2))*0.5));
3244 : : #if defined(_DERIVATE)
3245 : 0 : x_Vtnode_GND=0.0;
3246 : 0 : x_Vci_ei=0.0;
3247 : : #endif
3248 : 0 : x=(1.0-zcx);
3249 : : {
3250 : 0 : double m00_logE(d00_logE0,(1.0-(v_j/vdcx_t)))
3251 : 0 : double m00_exp(d00_exp1,(x*d00_logE0))
3252 : : #if defined(_DERIVATEFORDDX)
3253 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(v_j/vdcx_t)))
3254 : : #define d10_exp1 d00_exp1
3255 : : #endif
3256 : : #if defined(_DERIVATEFORDDX)
3257 : : #if defined(_DERIVATE)
3258 : 0 : y_Vci_ei=0.0;
3259 : : #endif
3260 : : #if defined(_DERIVATE)
3261 : 0 : y_Vs_ci=0.0;
3262 : : #endif
3263 : 0 : y_Vbi_ei=0.0;
3264 : : #if defined(_DERIVATE)
3265 : 0 : y_Vbi_ei_Vci_ei=0.0;
3266 : 0 : y_Vbi_ei_Vs_ci=0.0;
3267 : 0 : y_Vbi_ei_Vbi_ei=0.0;
3268 : 0 : y_Vbi_ei_Vbi_ci=0.0;
3269 : 0 : y_Vbi_ei_Vtnode_GND=0.0;
3270 : 0 : y_Vbi_ei_Vb_ci=0.0;
3271 : : #endif
3272 : 0 : y_Vbi_ci=(-(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)*d10_exp1);
3273 : : #if defined(_DERIVATE)
3274 : 0 : y_Vbi_ci_Vci_ei=(+0.0-(m20_exp((x*d00_logE0))*(x_Vci_ei*d00_logE0)*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*0.0+x_Vci_ei*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*0.0)));
3275 : 0 : y_Vbi_ci_Vs_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vs_ci/vdcx_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vs_ci/vdcx_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdcx_t)))*(-(v_j_Vs_ci/vdcx_t))*(-(v_j_Vbi_ci/vdcx_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vs_ci/vdcx_t-(v_j_Vbi_ci*0.0+v_j_Vs_ci*0.0+v_j*0.0)/vdcx_t/vdcx_t+2*v_j*0.0*0.0/vdcx_t/vdcx_t/vdcx_t))))));
3276 : 0 : y_Vbi_ci_Vbi_ei=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ei/vdcx_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ei/vdcx_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdcx_t)))*(-(v_j_Vbi_ei/vdcx_t))*(-(v_j_Vbi_ci/vdcx_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vbi_ei/vdcx_t-(v_j_Vbi_ci*0.0+v_j_Vbi_ei*0.0+v_j*0.0)/vdcx_t/vdcx_t+2*v_j*0.0*0.0/vdcx_t/vdcx_t/vdcx_t))))));
3277 : 0 : y_Vbi_ci_Vbi_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdcx_t)))*(-(v_j_Vbi_ci/vdcx_t))*(-(v_j_Vbi_ci/vdcx_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vbi_ci/vdcx_t-(v_j_Vbi_ci*0.0+v_j_Vbi_ci*0.0+v_j*0.0)/vdcx_t/vdcx_t+2*v_j*0.0*0.0/vdcx_t/vdcx_t/vdcx_t))))));
3278 : 0 : y_Vbi_ci_Vtnode_GND=(+0.0-(m20_exp((x*d00_logE0))*(((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vdcx_t-v_j*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*d10_logE0)))*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-((v_j_Vtnode_GND*vdcx_t-v_j*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*d10_logE0+x_Vtnode_GND*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdcx_t)))*(-((v_j_Vtnode_GND*vdcx_t-v_j*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*(-(v_j_Vbi_ci/vdcx_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vtnode_GND/vdcx_t-(v_j_Vbi_ci*vdcx_t_Vtnode_GND+v_j_Vtnode_GND*0.0+v_j*0.0)/vdcx_t/vdcx_t+2*v_j*0.0*vdcx_t_Vtnode_GND/vdcx_t/vdcx_t/vdcx_t))))));
3279 : 0 : y_Vbi_ci_Vb_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vb_ci/vdcx_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vb_ci/vdcx_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdcx_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdcx_t)))*(-(v_j_Vb_ci/vdcx_t))*(-(v_j_Vbi_ci/vdcx_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vb_ci/vdcx_t-(v_j_Vbi_ci*0.0+v_j_Vb_ci*0.0+v_j*0.0)/vdcx_t/vdcx_t+2*v_j*0.0*0.0/vdcx_t/vdcx_t/vdcx_t))))));
3280 : : #endif
3281 : : #if defined(_DERIVATE)
3282 : 0 : y_Vtnode_GND=(-((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vdcx_t-v_j*vdcx_t_Vtnode_GND)/vdcx_t/vdcx_t))*d10_logE0))*d10_exp1);
3283 : : #endif
3284 : : #if defined(_DERIVATE)
3285 : 0 : y_Vb_ci=(-(x*(-(v_j_Vb_ci/vdcx_t))*d10_logE0)*d10_exp1);
3286 : : #endif
3287 : : #endif
3288 : 0 : y=(1.0-d00_exp1);
3289 : : }
3290 : : #if defined(_DYNAMIC)
3291 : : #if defined(_DERIVATE)
3292 : 0 : qjcx_Vbi_ci=((((cjcx0_t_i*vdcx_t)*y_Vbi_ci)/x)+((2.4*cjcx0_t_i)*(-v_j_Vbi_ci)));
3293 : 0 : qjcx_Vtnode_GND=(((((((cjcx0_t_i_Vtnode_GND*vdcx_t)+(cjcx0_t_i*vdcx_t_Vtnode_GND))*y)+((cjcx0_t_i*vdcx_t)*y_Vtnode_GND))*x-((cjcx0_t_i*vdcx_t)*y)*x_Vtnode_GND)/x/x)+(((2.4*cjcx0_t_i_Vtnode_GND)*(Vbci-v_j))+((2.4*cjcx0_t_i)*(-v_j_Vtnode_GND))));
3294 : 0 : qjcx_Vb_ci=((((cjcx0_t_i*vdcx_t)*y_Vb_ci)/x)+((2.4*cjcx0_t_i)*(Vbci_Vb_ci-v_j_Vb_ci)));
3295 : : #endif
3296 : 0 : qjcx=((((cjcx0_t_i*vdcx_t)*y)/x)+((2.4*cjcx0_t_i)*(Vbci-v_j)));
3297 : : #endif
3298 : : }
3299 : : else
3300 : : {
3301 : : #if defined(_DYNAMIC)
3302 : : #if defined(_DERIVATE)
3303 : 0 : qjcx_Vbi_ci=0.0;
3304 : 0 : qjcx_Vtnode_GND=0.0;
3305 : 0 : qjcx_Vb_ci=0.0;
3306 : : #endif
3307 : 0 : qjcx=0.0;
3308 : : #endif
3309 : : }
3310 : : }
3311 : : }
3312 [ # # ]: 0 : if
3313 : : (vptci<1.0e2)
3314 : : {
3315 [ # # ]: 0 : if
3316 : : (cjci0_t_ii>0.0)
3317 : : {
3318 : 0 : zr=(zci/4.0);
3319 : : #if defined(_DERIVATE)
3320 : 0 : vp_Vtnode_GND=(-vdci_t_Vtnode_GND);
3321 : : #endif
3322 : 0 : vp=(vptci-vdci_t);
3323 : : {
3324 : 0 : double m00_logE(d00_logE0,2.4)
3325 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zci))
3326 : : #if defined(_DERIVATE)
3327 : 0 : vf_Vtnode_GND=vdci_t_Vtnode_GND*(1.0-d00_exp1);
3328 : : #endif
3329 : 0 : vf=(vdci_t*(1.0-d00_exp1));
3330 : : }
3331 : : #if defined(_DERIVATE)
3332 : 0 : cmax_Vtnode_GND=(2.4*cjci0_t_ii_Vtnode_GND);
3333 : : #endif
3334 : 0 : cmax=(2.4*cjci0_t_ii);
3335 : : {
3336 : 0 : double m00_logE(d00_logE0,(vdci_t/vptci))
3337 : 0 : double m00_exp(d00_exp1,((zci-zr)*d00_logE0))
3338 : : #if defined(_DERIVATE)
3339 : 0 : double m10_logE(d10_logE0,d00_logE0,(vdci_t/vptci))
3340 : : #define d10_exp1 d00_exp1
3341 : : #endif
3342 : : #if defined(_DERIVATE)
3343 : 0 : cr_Vtnode_GND=((cjci0_t_ii_Vtnode_GND*d00_exp1)+(cjci0_t_ii*((zci-zr)*(vdci_t_Vtnode_GND/vptci)*d10_logE0)*d10_exp1));
3344 : : #endif
3345 : 0 : cr=(cjci0_t_ii*d00_exp1);
3346 : : }
3347 : : #if defined(_DERIVATE)
3348 : 0 : a_Vci_ei=0.0;
3349 : 0 : a_Vbi_ei=0.0;
3350 : 0 : a_Vbi_ci=0.0;
3351 : 0 : a_Vb_ci=0.0;
3352 : 0 : a_Vtnode_GND=VT_Vtnode_GND;
3353 : : #endif
3354 : 0 : a=VT;
3355 : : #if defined(_DERIVATE)
3356 : 0 : ve_Vs_ci=0.0;
3357 : 0 : ve_Vci_ei=0.0;
3358 : 0 : ve_Vbi_ei=0.0;
3359 : 0 : ve_Vbi_ci=(((-Vbici_Vbi_ci)*a-(vf-Vbici)*a_Vbi_ci)/a/a);
3360 : 0 : ve_Vtnode_GND=((vf_Vtnode_GND*a-(vf-Vbici)*a_Vtnode_GND)/a/a);
3361 : 0 : ve_Vb_ci=0.0;
3362 : : #endif
3363 : 0 : ve=((vf-Vbici)/a);
3364 [ # # ]: 0 : if
3365 : : (ve<=80.0)
3366 : : {
3367 : : {
3368 : 0 : double m00_exp(d00_exp0,ve)
3369 : : #if defined(_DERIVATE)
3370 : : #define d10_exp0 d00_exp0
3371 : : #endif
3372 : : #if defined(_DERIVATE)
3373 : 0 : ex1_Vs_ci=0.0;
3374 : 0 : ex1_Vci_ei=0.0;
3375 : 0 : ex1_Vbi_ei=0.0;
3376 : 0 : ex1_Vbi_ci=ve_Vbi_ci*d10_exp0;
3377 : 0 : ex1_Vtnode_GND=ve_Vtnode_GND*d10_exp0;
3378 : 0 : ex1_Vb_ci=ve_Vb_ci*d10_exp0;
3379 : : #endif
3380 : 0 : ex1=d00_exp0;
3381 : : }
3382 : : #if defined(_DERIVATE)
3383 : 0 : ee1_Vs_ci=0.0;
3384 : 0 : ee1_Vci_ei=0.0;
3385 : 0 : ee1_Vbi_ei=0.0;
3386 : 0 : ee1_Vbi_ci=ex1_Vbi_ci;
3387 : 0 : ee1_Vtnode_GND=ex1_Vtnode_GND;
3388 : 0 : ee1_Vb_ci=ex1_Vb_ci;
3389 : : #endif
3390 : 0 : ee1=(1.0+ex1);
3391 : : {
3392 : 0 : double m00_logE(d00_logE0,ee1)
3393 : : #if defined(_DERIVATE)
3394 : 0 : double m10_logE(d10_logE0,d00_logE0,ee1)
3395 : : #endif
3396 : : #if defined(_DERIVATE)
3397 : 0 : vj1_Vci_ei=0.0;
3398 : 0 : vj1_Vbi_ei=0.0;
3399 : 0 : vj1_Vs_ci=0.0;
3400 : 0 : vj1_Vbi_ci=(-((a_Vbi_ci*d00_logE0)+(a*ee1_Vbi_ci*d10_logE0)));
3401 : 0 : vj1_Vtnode_GND=(vf_Vtnode_GND-((a_Vtnode_GND*d00_logE0)+(a*ee1_Vtnode_GND*d10_logE0)));
3402 : 0 : vj1_Vb_ci=(-((a_Vb_ci*d00_logE0)+(a*ee1_Vb_ci*d10_logE0)));
3403 : : #endif
3404 : 0 : vj1=(vf-(a*d00_logE0));
3405 : : }
3406 : : }
3407 : : else
3408 : : {
3409 : : #if defined(_DERIVATE)
3410 : 0 : vj1_Vci_ei=0.0;
3411 : 0 : vj1_Vbi_ei=0.0;
3412 : 0 : vj1_Vs_ci=0.0;
3413 : 0 : vj1_Vbi_ci=Vbici_Vbi_ci;
3414 : 0 : vj1_Vtnode_GND=0.0;
3415 : 0 : vj1_Vb_ci=0.0;
3416 : : #endif
3417 : 0 : vj1=Vbici;
3418 : : }
3419 : : #if defined(_DERIVATE)
3420 : 0 : a_Vci_ei=0.0;
3421 : 0 : a_Vbi_ei=0.0;
3422 : 0 : a_Vbi_ci=0.0;
3423 : 0 : a_Vb_ci=0.0;
3424 : 0 : a_Vtnode_GND=((0.1*vp_Vtnode_GND)+(4.0*VT_Vtnode_GND));
3425 : : #endif
3426 : 0 : a=((0.1*vp)+(4.0*VT));
3427 : : #if defined(_DERIVATE)
3428 : 0 : vr_Vci_ei=0.0;
3429 : 0 : vr_Vbi_ei=0.0;
3430 : 0 : vr_Vs_ci=0.0;
3431 : 0 : vr_Vbi_ci=((vj1_Vbi_ci*a-(vp+vj1)*a_Vbi_ci)/a/a);
3432 : 0 : vr_Vtnode_GND=(((vp_Vtnode_GND+vj1_Vtnode_GND)*a-(vp+vj1)*a_Vtnode_GND)/a/a);
3433 : 0 : vr_Vb_ci=((vj1_Vb_ci*a-(vp+vj1)*a_Vb_ci)/a/a);
3434 : : #endif
3435 : 0 : vr=((vp+vj1)/a);
3436 [ # # ]: 0 : if
3437 : : (vr<=80.0)
3438 : : {
3439 : : {
3440 : 0 : double m00_exp(d00_exp0,vr)
3441 : : #if defined(_DERIVATE)
3442 : : #define d10_exp0 d00_exp0
3443 : : #endif
3444 : : #if defined(_DERIVATE)
3445 : 0 : ex1_Vs_ci=0.0;
3446 : 0 : ex1_Vci_ei=0.0;
3447 : 0 : ex1_Vbi_ei=0.0;
3448 : 0 : ex1_Vbi_ci=vr_Vbi_ci*d10_exp0;
3449 : 0 : ex1_Vtnode_GND=vr_Vtnode_GND*d10_exp0;
3450 : 0 : ex1_Vb_ci=vr_Vb_ci*d10_exp0;
3451 : : #endif
3452 : 0 : ex1=d00_exp0;
3453 : : }
3454 : : #if defined(_DERIVATE)
3455 : 0 : ee1_Vs_ci=0.0;
3456 : 0 : ee1_Vci_ei=0.0;
3457 : 0 : ee1_Vbi_ei=0.0;
3458 : 0 : ee1_Vbi_ci=ex1_Vbi_ci;
3459 : 0 : ee1_Vtnode_GND=ex1_Vtnode_GND;
3460 : 0 : ee1_Vb_ci=ex1_Vb_ci;
3461 : : #endif
3462 : 0 : ee1=(1.0+ex1);
3463 : : {
3464 : 0 : double m00_logE(d00_logE0,ee1)
3465 : : #if defined(_DERIVATE)
3466 : 0 : double m10_logE(d10_logE0,d00_logE0,ee1)
3467 : : #endif
3468 : : #if defined(_DERIVATE)
3469 : 0 : vj2_Vci_ei=0.0;
3470 : 0 : vj2_Vbi_ei=0.0;
3471 : 0 : vj2_Vs_ci=0.0;
3472 : 0 : vj2_Vbi_ci=((a_Vbi_ci*d00_logE0)+(a*ee1_Vbi_ci*d10_logE0));
3473 : 0 : vj2_Vtnode_GND=((-vp_Vtnode_GND)+((a_Vtnode_GND*d00_logE0)+(a*ee1_Vtnode_GND*d10_logE0)));
3474 : 0 : vj2_Vb_ci=((a_Vb_ci*d00_logE0)+(a*ee1_Vb_ci*d10_logE0));
3475 : : #endif
3476 : 0 : vj2=((-vp)+(a*d00_logE0));
3477 : : }
3478 : : }
3479 : : else
3480 : : {
3481 : : #if defined(_DERIVATE)
3482 : 0 : vj2_Vci_ei=0.0;
3483 : 0 : vj2_Vbi_ei=0.0;
3484 : 0 : vj2_Vs_ci=0.0;
3485 : 0 : vj2_Vbi_ci=vj1_Vbi_ci;
3486 : 0 : vj2_Vtnode_GND=vj1_Vtnode_GND;
3487 : 0 : vj2_Vb_ci=vj1_Vb_ci;
3488 : : #endif
3489 : 0 : vj2=vj1;
3490 : : }
3491 : : #if defined(_DERIVATE)
3492 : 0 : vj4_Vs_ci=0.0;
3493 : 0 : vj4_Vci_ei=0.0;
3494 : 0 : vj4_Vbi_ei=0.0;
3495 : 0 : vj4_Vbi_ci=(Vbici_Vbi_ci-vj1_Vbi_ci);
3496 : 0 : vj4_Vb_ci=(-vj1_Vb_ci);
3497 : 0 : vj4_Vtnode_GND=(-vj1_Vtnode_GND);
3498 : : #endif
3499 : 0 : vj4=(Vbici-vj1);
3500 : 0 : ez=(1.0-zci);
3501 : 0 : ezr=(1.0-zr);
3502 : : {
3503 : 0 : double m00_logE(d00_logE0,(1.0-(vj1/vdci_t)))
3504 : : #if defined(_DERIVATE)
3505 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(vj1/vdci_t)))
3506 : : #endif
3507 : : #if defined(_DERIVATE)
3508 : 0 : vdj1_Vci_ei=0.0;
3509 : 0 : vdj1_Vbi_ei=0.0;
3510 : 0 : vdj1_Vs_ci=0.0;
3511 : 0 : vdj1_Vbi_ci=(-(vj1_Vbi_ci/vdci_t))*d10_logE0;
3512 : 0 : vdj1_Vtnode_GND=(-((vj1_Vtnode_GND*vdci_t-vj1*vdci_t_Vtnode_GND)/vdci_t/vdci_t))*d10_logE0;
3513 : 0 : vdj1_Vb_ci=(-(vj1_Vb_ci/vdci_t))*d10_logE0;
3514 : : #endif
3515 : 0 : vdj1=d00_logE0;
3516 : : }
3517 : : {
3518 : 0 : double m00_logE(d00_logE0,(1.0-(vj2/vdci_t)))
3519 : : #if defined(_DERIVATE)
3520 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(vj2/vdci_t)))
3521 : : #endif
3522 : : #if defined(_DERIVATE)
3523 : 0 : vdj2_Vci_ei=0.0;
3524 : 0 : vdj2_Vbi_ei=0.0;
3525 : 0 : vdj2_Vs_ci=0.0;
3526 : 0 : vdj2_Vbi_ci=(-(vj2_Vbi_ci/vdci_t))*d10_logE0;
3527 : 0 : vdj2_Vtnode_GND=(-((vj2_Vtnode_GND*vdci_t-vj2*vdci_t_Vtnode_GND)/vdci_t/vdci_t))*d10_logE0;
3528 : 0 : vdj2_Vb_ci=(-(vj2_Vb_ci/vdci_t))*d10_logE0;
3529 : : #endif
3530 : 0 : vdj2=d00_logE0;
3531 : : }
3532 : : {
3533 : 0 : double m00_exp(d00_exp0,(vdj2*ez))
3534 : : #if defined(_DERIVATE)
3535 : : #define d10_exp0 d00_exp0
3536 : : #endif
3537 : : #if defined(_DERIVATE)
3538 : 0 : qj1_Vci_ei=0.0;
3539 : 0 : qj1_Vbi_ei=0.0;
3540 : 0 : qj1_Vs_ci=0.0;
3541 : 0 : qj1_Vbi_ci=((cjci0_t_ii*(-vdj2_Vbi_ci*ez*d10_exp0))/ez);
3542 : 0 : qj1_Vtnode_GND=(((cjci0_t_ii_Vtnode_GND*(1.0-d00_exp0))+(cjci0_t_ii*(-vdj2_Vtnode_GND*ez*d10_exp0)))/ez);
3543 : 0 : qj1_Vb_ci=((cjci0_t_ii*(-vdj2_Vb_ci*ez*d10_exp0))/ez);
3544 : : #endif
3545 : 0 : qj1=((cjci0_t_ii*(1.0-d00_exp0))/ez);
3546 : : }
3547 : : {
3548 : 0 : double m00_exp(d00_exp0,(vdj1*ezr))
3549 : : #if defined(_DERIVATE)
3550 : : #define d10_exp0 d00_exp0
3551 : : #endif
3552 : : #if defined(_DERIVATE)
3553 : 0 : qj2_Vci_ei=0.0;
3554 : 0 : qj2_Vbi_ei=0.0;
3555 : 0 : qj2_Vs_ci=0.0;
3556 : 0 : qj2_Vbi_ci=((cr*(-vdj1_Vbi_ci*ezr*d10_exp0))/ezr);
3557 : 0 : qj2_Vtnode_GND=(((cr_Vtnode_GND*(1.0-d00_exp0))+(cr*(-vdj1_Vtnode_GND*ezr*d10_exp0)))/ezr);
3558 : 0 : qj2_Vb_ci=((cr*(-vdj1_Vb_ci*ezr*d10_exp0))/ezr);
3559 : : #endif
3560 : 0 : qj2=((cr*(1.0-d00_exp0))/ezr);
3561 : : }
3562 : : {
3563 : 0 : double m00_exp(d00_exp0,(vdj2*ezr))
3564 : : #if defined(_DERIVATE)
3565 : : #define d10_exp0 d00_exp0
3566 : : #endif
3567 : : #if defined(_DERIVATE)
3568 : 0 : qj3_Vci_ei=0.0;
3569 : 0 : qj3_Vbi_ei=0.0;
3570 : 0 : qj3_Vs_ci=0.0;
3571 : 0 : qj3_Vbi_ci=((cr*(-vdj2_Vbi_ci*ezr*d10_exp0))/ezr);
3572 : 0 : qj3_Vtnode_GND=(((cr_Vtnode_GND*(1.0-d00_exp0))+(cr*(-vdj2_Vtnode_GND*ezr*d10_exp0)))/ezr);
3573 : 0 : qj3_Vb_ci=((cr*(-vdj2_Vb_ci*ezr*d10_exp0))/ezr);
3574 : : #endif
3575 : 0 : qj3=((cr*(1.0-d00_exp0))/ezr);
3576 : : }
3577 : : #if defined(_DERIVATE)
3578 : 0 : qjci_Vbi_ci=(((qj1_Vbi_ci+qj2_Vbi_ci)-qj3_Vbi_ci)*vdci_t+(cmax*vj4_Vbi_ci));
3579 : 0 : qjci_Vtnode_GND=(((((qj1_Vtnode_GND+qj2_Vtnode_GND)-qj3_Vtnode_GND)*vdci_t)+(((qj1+qj2)-qj3)*vdci_t_Vtnode_GND))+((cmax_Vtnode_GND*vj4)+(cmax*vj4_Vtnode_GND)));
3580 : 0 : qjci_Vb_ci=(((qj1_Vb_ci+qj2_Vb_ci)-qj3_Vb_ci)*vdci_t+(cmax*vj4_Vb_ci));
3581 : : #endif
3582 : 0 : qjci=((((qj1+qj2)-qj3)*vdci_t)+(cmax*vj4));
3583 : : }
3584 : : else
3585 : : {
3586 : : #if defined(_DERIVATE)
3587 : 0 : qjci_Vbi_ci=0.0;
3588 : 0 : qjci_Vtnode_GND=0.0;
3589 : 0 : qjci_Vb_ci=0.0;
3590 : : #endif
3591 : 0 : qjci=0.0;
3592 : : }
3593 : : }
3594 : : else
3595 : : {
3596 [ # # ]: 0 : if
3597 : : (cjci0_t_ii>0.0)
3598 : : {
3599 : : {
3600 : 0 : double m00_logE(d00_logE0,2.4)
3601 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zci))
3602 : : #if defined(_DERIVATE)
3603 : 0 : vf_Vtnode_GND=vdci_t_Vtnode_GND*(1.0-d00_exp1);
3604 : : #endif
3605 : 0 : vf=(vdci_t*(1.0-d00_exp1));
3606 : : }
3607 : : #if defined(_DERIVATEFORDDX)
3608 : : #if defined(_DERIVATE)
3609 : 0 : xvf_Vs_ci=0.0;
3610 : : #endif
3611 : 0 : xvf_Vbi_ei=0.0;
3612 : : #if defined(_DERIVATE)
3613 : 0 : xvf_Vbi_ei_Vs_ci=0.0;
3614 : 0 : xvf_Vbi_ei_Vbi_ei=0.0;
3615 : 0 : xvf_Vbi_ei_Vbi_ci=0.0;
3616 : 0 : xvf_Vbi_ei_Vtnode_GND=0.0;
3617 : 0 : xvf_Vbi_ei_Vb_ci=0.0;
3618 : : #endif
3619 : 0 : xvf_Vbi_ci=((-Vbici_Vbi_ci)/VT);
3620 : : #if defined(_DERIVATE)
3621 : 0 : xvf_Vbi_ci_Vs_ci=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*0.0+0.0*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
3622 : 0 : xvf_Vbi_ci_Vbi_ei=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*0.0+0.0*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
3623 : 0 : xvf_Vbi_ci_Vbi_ci=((+0.0-Vbici_Vbi_ci_Vbi_ci)/VT-((-Vbici_Vbi_ci)*0.0+(-Vbici_Vbi_ci)*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
3624 : 0 : xvf_Vbi_ci_Vtnode_GND=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*VT_Vtnode_GND+vf_Vtnode_GND*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*VT_Vtnode_GND/VT/VT/VT);
3625 : 0 : xvf_Vbi_ci_Vb_ci=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*0.0+0.0*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
3626 : : #endif
3627 : : #if defined(_DERIVATE)
3628 : 0 : xvf_Vtnode_GND=((vf_Vtnode_GND*VT-(vf-Vbici)*VT_Vtnode_GND)/VT/VT);
3629 : : #endif
3630 : : #if defined(_DERIVATE)
3631 : 0 : xvf_Vb_ci=0.0;
3632 : : #endif
3633 : : #endif
3634 : 0 : xvf=((vf-Vbici)/VT);
3635 : : {
3636 : 0 : double m00_sqrt(d00_sqrt0,((xvf*xvf)+1.921812))
3637 : : #if defined(_DERIVATEFORDDX)
3638 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((xvf*xvf)+1.921812))
3639 : : #endif
3640 : : #if defined(_DERIVATEFORDDX)
3641 : : #if defined(_DERIVATE)
3642 : 0 : xvf2_Vs_ci=0.0;
3643 : : #endif
3644 : 0 : xvf2_Vbi_ei=0.0;
3645 : : #if defined(_DERIVATE)
3646 : 0 : xvf2_Vbi_ei_Vs_ci=0.0;
3647 : 0 : xvf2_Vbi_ei_Vbi_ei=0.0;
3648 : 0 : xvf2_Vbi_ei_Vbi_ci=0.0;
3649 : 0 : xvf2_Vbi_ei_Vtnode_GND=0.0;
3650 : 0 : xvf2_Vbi_ei_Vb_ci=0.0;
3651 : : #endif
3652 : 0 : xvf2_Vbi_ci=((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))*d10_sqrt0;
3653 : : #if defined(_DERIVATE)
3654 : 0 : xvf2_Vbi_ci_Vs_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vs_ci*xvf)+(xvf*xvf_Vs_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vs_ci*xvf+xvf_Vbi_ci*xvf_Vs_ci+xvf_Vs_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vs_ci)+0.0));
3655 : 0 : xvf2_Vbi_ci_Vbi_ei=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ei*xvf+xvf_Vbi_ci*xvf_Vbi_ei+xvf_Vbi_ei*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ei)+0.0));
3656 : 0 : xvf2_Vbi_ci_Vbi_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ci*xvf+xvf_Vbi_ci*xvf_Vbi_ci+xvf_Vbi_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ci)+0.0));
3657 : 0 : xvf2_Vbi_ci_Vtnode_GND=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vtnode_GND*xvf+xvf_Vbi_ci*xvf_Vtnode_GND+xvf_Vtnode_GND*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vtnode_GND)+0.0));
3658 : 0 : xvf2_Vbi_ci_Vb_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vb_ci*xvf+xvf_Vbi_ci*xvf_Vb_ci+xvf_Vb_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vb_ci)+0.0));
3659 : : #endif
3660 : : #if defined(_DERIVATE)
3661 : 0 : xvf2_Vtnode_GND=((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND))*d10_sqrt0;
3662 : : #endif
3663 : : #if defined(_DERIVATE)
3664 : 0 : xvf2_Vb_ci=((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci))*d10_sqrt0;
3665 : : #endif
3666 : : #endif
3667 : 0 : xvf2=d00_sqrt0;
3668 : : }
3669 : : #if defined(_DERIVATEFORDDX)
3670 : : #if defined(_DERIVATE)
3671 : 0 : v_j_Vs_ci=0.0;
3672 : : #endif
3673 : 0 : v_j_Vbi_ei=0.0;
3674 : : #if defined(_DERIVATE)
3675 : 0 : v_j_Vbi_ei_Vs_ci=0.0;
3676 : 0 : v_j_Vbi_ei_Vbi_ei=0.0;
3677 : 0 : v_j_Vbi_ei_Vbi_ci=0.0;
3678 : 0 : v_j_Vbi_ei_Vtnode_GND=0.0;
3679 : 0 : v_j_Vbi_ei_Vb_ci=0.0;
3680 : : #endif
3681 : 0 : v_j_Vbi_ci=(-(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.5);
3682 : : #if defined(_DERIVATE)
3683 : 0 : v_j_Vbi_ci_Vs_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vs_ci+xvf2_Vs_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vs_ci+xvf2_Vbi_ci_Vs_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vs_ci+xvf2_Vs_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3684 : 0 : v_j_Vbi_ci_Vbi_ei=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ei+xvf2_Vbi_ci_Vbi_ei))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ei+xvf2_Vbi_ei)))*0.0+(VT*(xvf+xvf2))*0.0));
3685 : 0 : v_j_Vbi_ci_Vbi_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ci+xvf2_Vbi_ci_Vbi_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ci+xvf2_Vbi_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3686 : 0 : v_j_Vbi_ci_Vtnode_GND=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vtnode_GND+xvf2_Vtnode_GND)+VT_Vtnode_GND*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vtnode_GND+xvf2_Vbi_ci_Vtnode_GND))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+(((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND))))*0.0+(VT*(xvf+xvf2))*0.0));
3687 : 0 : v_j_Vbi_ci_Vb_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vb_ci+xvf2_Vb_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vb_ci+xvf2_Vbi_ci_Vb_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vb_ci+xvf2_Vb_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3688 : : #endif
3689 : : #if defined(_DERIVATE)
3690 : 0 : v_j_Vtnode_GND=(vf_Vtnode_GND-((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND)))*0.5);
3691 : : #endif
3692 : : #if defined(_DERIVATE)
3693 : 0 : v_j_Vb_ci=(-(VT*(xvf_Vb_ci+xvf2_Vb_ci))*0.5);
3694 : : #endif
3695 : : #endif
3696 : 0 : v_j=(vf-((VT*(xvf+xvf2))*0.5));
3697 : : #if defined(_DERIVATE)
3698 : 0 : x_Vtnode_GND=0.0;
3699 : 0 : x_Vci_ei=0.0;
3700 : : #endif
3701 : 0 : x=(1.0-zci);
3702 : : {
3703 : 0 : double m00_logE(d00_logE0,(1.0-(v_j/vdci_t)))
3704 : 0 : double m00_exp(d00_exp1,(x*d00_logE0))
3705 : : #if defined(_DERIVATEFORDDX)
3706 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(v_j/vdci_t)))
3707 : : #define d10_exp1 d00_exp1
3708 : : #endif
3709 : : #if defined(_DERIVATEFORDDX)
3710 : : #if defined(_DERIVATE)
3711 : 0 : y_Vci_ei=0.0;
3712 : : #endif
3713 : : #if defined(_DERIVATE)
3714 : 0 : y_Vs_ci=0.0;
3715 : : #endif
3716 : 0 : y_Vbi_ei=0.0;
3717 : : #if defined(_DERIVATE)
3718 : 0 : y_Vbi_ei_Vci_ei=0.0;
3719 : 0 : y_Vbi_ei_Vs_ci=0.0;
3720 : 0 : y_Vbi_ei_Vbi_ei=0.0;
3721 : 0 : y_Vbi_ei_Vbi_ci=0.0;
3722 : 0 : y_Vbi_ei_Vtnode_GND=0.0;
3723 : 0 : y_Vbi_ei_Vb_ci=0.0;
3724 : : #endif
3725 : 0 : y_Vbi_ci=(-(x*(-(v_j_Vbi_ci/vdci_t))*d10_logE0)*d10_exp1);
3726 : : #if defined(_DERIVATE)
3727 : 0 : y_Vbi_ci_Vci_ei=(+0.0-(m20_exp((x*d00_logE0))*(x_Vci_ei*d00_logE0)*(x*(-(v_j_Vbi_ci/vdci_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*0.0+x_Vci_ei*(-(v_j_Vbi_ci/vdci_t))*d10_logE0+x*0.0)));
3728 : 0 : y_Vbi_ci_Vs_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vs_ci/vdci_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdci_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vs_ci/vdci_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdci_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdci_t)))*(-(v_j_Vs_ci/vdci_t))*(-(v_j_Vbi_ci/vdci_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vs_ci/vdci_t-(v_j_Vbi_ci*0.0+v_j_Vs_ci*0.0+v_j*0.0)/vdci_t/vdci_t+2*v_j*0.0*0.0/vdci_t/vdci_t/vdci_t))))));
3729 : 0 : y_Vbi_ci_Vbi_ei=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ei/vdci_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdci_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ei/vdci_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdci_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdci_t)))*(-(v_j_Vbi_ei/vdci_t))*(-(v_j_Vbi_ci/vdci_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vbi_ei/vdci_t-(v_j_Vbi_ci*0.0+v_j_Vbi_ei*0.0+v_j*0.0)/vdci_t/vdci_t+2*v_j*0.0*0.0/vdci_t/vdci_t/vdci_t))))));
3730 : 0 : y_Vbi_ci_Vbi_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ci/vdci_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdci_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ci/vdci_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdci_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdci_t)))*(-(v_j_Vbi_ci/vdci_t))*(-(v_j_Vbi_ci/vdci_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vbi_ci/vdci_t-(v_j_Vbi_ci*0.0+v_j_Vbi_ci*0.0+v_j*0.0)/vdci_t/vdci_t+2*v_j*0.0*0.0/vdci_t/vdci_t/vdci_t))))));
3731 : 0 : y_Vbi_ci_Vtnode_GND=(+0.0-(m20_exp((x*d00_logE0))*(((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vdci_t-v_j*vdci_t_Vtnode_GND)/vdci_t/vdci_t))*d10_logE0)))*(x*(-(v_j_Vbi_ci/vdci_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-((v_j_Vtnode_GND*vdci_t-v_j*vdci_t_Vtnode_GND)/vdci_t/vdci_t))*d10_logE0+x_Vtnode_GND*(-(v_j_Vbi_ci/vdci_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdci_t)))*(-((v_j_Vtnode_GND*vdci_t-v_j*vdci_t_Vtnode_GND)/vdci_t/vdci_t))*(-(v_j_Vbi_ci/vdci_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vtnode_GND/vdci_t-(v_j_Vbi_ci*vdci_t_Vtnode_GND+v_j_Vtnode_GND*0.0+v_j*0.0)/vdci_t/vdci_t+2*v_j*0.0*vdci_t_Vtnode_GND/vdci_t/vdci_t/vdci_t))))));
3732 : 0 : y_Vbi_ci_Vb_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vb_ci/vdci_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vdci_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vb_ci/vdci_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vdci_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vdci_t)))*(-(v_j_Vb_ci/vdci_t))*(-(v_j_Vbi_ci/vdci_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vb_ci/vdci_t-(v_j_Vbi_ci*0.0+v_j_Vb_ci*0.0+v_j*0.0)/vdci_t/vdci_t+2*v_j*0.0*0.0/vdci_t/vdci_t/vdci_t))))));
3733 : : #endif
3734 : : #if defined(_DERIVATE)
3735 : 0 : y_Vtnode_GND=(-((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vdci_t-v_j*vdci_t_Vtnode_GND)/vdci_t/vdci_t))*d10_logE0))*d10_exp1);
3736 : : #endif
3737 : : #if defined(_DERIVATE)
3738 : 0 : y_Vb_ci=(-(x*(-(v_j_Vb_ci/vdci_t))*d10_logE0)*d10_exp1);
3739 : : #endif
3740 : : #endif
3741 : 0 : y=(1.0-d00_exp1);
3742 : : }
3743 : : #if defined(_DERIVATE)
3744 : 0 : qjci_Vbi_ci=((((cjci0_t_ii*vdci_t)*y_Vbi_ci)/x)+((2.4*cjci0_t_ii)*(Vbici_Vbi_ci-v_j_Vbi_ci)));
3745 : 0 : qjci_Vtnode_GND=(((((((cjci0_t_ii_Vtnode_GND*vdci_t)+(cjci0_t_ii*vdci_t_Vtnode_GND))*y)+((cjci0_t_ii*vdci_t)*y_Vtnode_GND))*x-((cjci0_t_ii*vdci_t)*y)*x_Vtnode_GND)/x/x)+(((2.4*cjci0_t_ii_Vtnode_GND)*(Vbici-v_j))+((2.4*cjci0_t_ii)*(-v_j_Vtnode_GND))));
3746 : 0 : qjci_Vb_ci=((((cjci0_t_ii*vdci_t)*y_Vb_ci)/x)+((2.4*cjci0_t_ii)*(-v_j_Vb_ci)));
3747 : : #endif
3748 : 0 : qjci=((((cjci0_t_ii*vdci_t)*y)/x)+((2.4*cjci0_t_ii)*(Vbici-v_j)));
3749 : : }
3750 : : else
3751 : : {
3752 : : #if defined(_DERIVATE)
3753 : 0 : qjci_Vbi_ci=0.0;
3754 : 0 : qjci_Vtnode_GND=0.0;
3755 : 0 : qjci_Vb_ci=0.0;
3756 : : #endif
3757 : 0 : qjci=0.0;
3758 : : }
3759 : : }
3760 : : #if defined(_DYNAMIC)
3761 : : #if defined(_DERIVATE)
3762 : 0 : qjcii_Vbi_ci=(qjci_Vbi_ci+qjcxi_Vbi_ci);
3763 : 0 : qjcii_Vtnode_GND=(qjci_Vtnode_GND+qjcxi_Vtnode_GND);
3764 : 0 : qjcii_Vb_ci=(qjci_Vb_ci+qjcxi_Vb_ci);
3765 : : #endif
3766 : 0 : qjcii=(qjci+qjcxi);
3767 : : #endif
3768 [ # # ]: 0 : if
3769 : : (cjci0_t_ii>0.0)
3770 : : {
3771 : : {
3772 : 0 : double m00_logE(d00_logE0,2.4)
3773 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zci))
3774 : : #if defined(_DERIVATE)
3775 : 0 : vf_Vtnode_GND=vdci_t_Vtnode_GND*(1.0-d00_exp1);
3776 : : #endif
3777 : 0 : vf=(vdci_t*(1.0-d00_exp1));
3778 : : }
3779 : : #if defined(_DERIVATEFORDDX)
3780 : : #if defined(_DERIVATE)
3781 : 0 : xvf_Vs_ci=0.0;
3782 : : #endif
3783 : 0 : xvf_Vbi_ei=0.0;
3784 : : #if defined(_DERIVATE)
3785 : 0 : xvf_Vbi_ei_Vs_ci=0.0;
3786 : 0 : xvf_Vbi_ei_Vbi_ei=0.0;
3787 : 0 : xvf_Vbi_ei_Vbi_ci=0.0;
3788 : 0 : xvf_Vbi_ei_Vtnode_GND=0.0;
3789 : 0 : xvf_Vbi_ei_Vb_ci=0.0;
3790 : : #endif
3791 : 0 : xvf_Vbi_ci=((-Vbici_Vbi_ci)/VT);
3792 : : #if defined(_DERIVATE)
3793 : 0 : xvf_Vbi_ci_Vs_ci=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*0.0+0.0*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
3794 : 0 : xvf_Vbi_ci_Vbi_ei=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*0.0+0.0*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
3795 : 0 : xvf_Vbi_ci_Vbi_ci=((+0.0-Vbici_Vbi_ci_Vbi_ci)/VT-((-Vbici_Vbi_ci)*0.0+(-Vbici_Vbi_ci)*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
3796 : 0 : xvf_Vbi_ci_Vtnode_GND=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*VT_Vtnode_GND+vf_Vtnode_GND*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*VT_Vtnode_GND/VT/VT/VT);
3797 : 0 : xvf_Vbi_ci_Vb_ci=((+0.0-0.0)/VT-((-Vbici_Vbi_ci)*0.0+0.0*0.0+(vf-Vbici)*0.0)/VT/VT+2*(vf-Vbici)*0.0*0.0/VT/VT/VT);
3798 : : #endif
3799 : : #if defined(_DERIVATE)
3800 : 0 : xvf_Vtnode_GND=((vf_Vtnode_GND*VT-(vf-Vbici)*VT_Vtnode_GND)/VT/VT);
3801 : : #endif
3802 : : #if defined(_DERIVATE)
3803 : 0 : xvf_Vb_ci=0.0;
3804 : : #endif
3805 : : #endif
3806 : 0 : xvf=((vf-Vbici)/VT);
3807 : : {
3808 : 0 : double m00_sqrt(d00_sqrt0,((xvf*xvf)+1.921812))
3809 : : #if defined(_DERIVATEFORDDX)
3810 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((xvf*xvf)+1.921812))
3811 : : #endif
3812 : : #if defined(_DERIVATEFORDDX)
3813 : : #if defined(_DERIVATE)
3814 : 0 : xvf2_Vs_ci=0.0;
3815 : : #endif
3816 : 0 : xvf2_Vbi_ei=0.0;
3817 : : #if defined(_DERIVATE)
3818 : 0 : xvf2_Vbi_ei_Vs_ci=0.0;
3819 : 0 : xvf2_Vbi_ei_Vbi_ei=0.0;
3820 : 0 : xvf2_Vbi_ei_Vbi_ci=0.0;
3821 : 0 : xvf2_Vbi_ei_Vtnode_GND=0.0;
3822 : 0 : xvf2_Vbi_ei_Vb_ci=0.0;
3823 : : #endif
3824 : 0 : xvf2_Vbi_ci=((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))*d10_sqrt0;
3825 : : #if defined(_DERIVATE)
3826 : 0 : xvf2_Vbi_ci_Vs_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vs_ci*xvf)+(xvf*xvf_Vs_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vs_ci*xvf+xvf_Vbi_ci*xvf_Vs_ci+xvf_Vs_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vs_ci)+0.0));
3827 : 0 : xvf2_Vbi_ci_Vbi_ei=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ei*xvf+xvf_Vbi_ci*xvf_Vbi_ei+xvf_Vbi_ei*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ei)+0.0));
3828 : 0 : xvf2_Vbi_ci_Vbi_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ci*xvf+xvf_Vbi_ci*xvf_Vbi_ci+xvf_Vbi_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ci)+0.0));
3829 : 0 : xvf2_Vbi_ci_Vtnode_GND=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vtnode_GND*xvf+xvf_Vbi_ci*xvf_Vtnode_GND+xvf_Vtnode_GND*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vtnode_GND)+0.0));
3830 : 0 : xvf2_Vbi_ci_Vb_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vb_ci*xvf+xvf_Vbi_ci*xvf_Vb_ci+xvf_Vb_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vb_ci)+0.0));
3831 : : #endif
3832 : : #if defined(_DERIVATE)
3833 : 0 : xvf2_Vtnode_GND=((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND))*d10_sqrt0;
3834 : : #endif
3835 : : #if defined(_DERIVATE)
3836 : 0 : xvf2_Vb_ci=((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci))*d10_sqrt0;
3837 : : #endif
3838 : : #endif
3839 : 0 : xvf2=d00_sqrt0;
3840 : : }
3841 : : #if defined(_DERIVATEFORDDX)
3842 : : #if defined(_DERIVATE)
3843 : 0 : v_j_Vs_ci=0.0;
3844 : : #endif
3845 : 0 : v_j_Vbi_ei=0.0;
3846 : : #if defined(_DERIVATE)
3847 : 0 : v_j_Vbi_ei_Vs_ci=0.0;
3848 : 0 : v_j_Vbi_ei_Vbi_ei=0.0;
3849 : 0 : v_j_Vbi_ei_Vbi_ci=0.0;
3850 : 0 : v_j_Vbi_ei_Vtnode_GND=0.0;
3851 : 0 : v_j_Vbi_ei_Vb_ci=0.0;
3852 : : #endif
3853 : 0 : v_j_Vbi_ci=(-(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.5);
3854 : : #if defined(_DERIVATE)
3855 : 0 : v_j_Vbi_ci_Vs_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vs_ci+xvf2_Vs_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vs_ci+xvf2_Vbi_ci_Vs_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vs_ci+xvf2_Vs_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3856 : 0 : v_j_Vbi_ci_Vbi_ei=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ei+xvf2_Vbi_ci_Vbi_ei))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ei+xvf2_Vbi_ei)))*0.0+(VT*(xvf+xvf2))*0.0));
3857 : 0 : v_j_Vbi_ci_Vbi_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ci+xvf2_Vbi_ci_Vbi_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ci+xvf2_Vbi_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3858 : 0 : v_j_Vbi_ci_Vtnode_GND=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vtnode_GND+xvf2_Vtnode_GND)+VT_Vtnode_GND*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vtnode_GND+xvf2_Vbi_ci_Vtnode_GND))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+(((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND))))*0.0+(VT*(xvf+xvf2))*0.0));
3859 : 0 : v_j_Vbi_ci_Vb_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vb_ci+xvf2_Vb_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vb_ci+xvf2_Vbi_ci_Vb_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vb_ci+xvf2_Vb_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3860 : : #endif
3861 : : #if defined(_DERIVATE)
3862 : 0 : v_j_Vtnode_GND=(vf_Vtnode_GND-((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND)))*0.5);
3863 : : #endif
3864 : : #if defined(_DERIVATE)
3865 : 0 : v_j_Vb_ci=(-(VT*(xvf_Vb_ci+xvf2_Vb_ci))*0.5);
3866 : : #endif
3867 : : #endif
3868 : 0 : v_j=(vf-((VT*(xvf+xvf2))*0.5));
3869 : : #if defined(_DERIVATE)
3870 : 0 : dvj_Vbi_ci=(((0.5*(xvf_Vbi_ci+xvf2_Vbi_ci))*xvf2-(0.5*(xvf+xvf2))*xvf2_Vbi_ci)/xvf2/xvf2);
3871 : 0 : dvj_Vtnode_GND=(((0.5*(xvf_Vtnode_GND+xvf2_Vtnode_GND))*xvf2-(0.5*(xvf+xvf2))*xvf2_Vtnode_GND)/xvf2/xvf2);
3872 : 0 : dvj_Vb_ci=(((0.5*(xvf_Vb_ci+xvf2_Vb_ci))*xvf2-(0.5*(xvf+xvf2))*xvf2_Vb_ci)/xvf2/xvf2);
3873 : : #endif
3874 : 0 : dvj=((0.5*(xvf+xvf2))/xvf2);
3875 : : {
3876 : 0 : double m00_logE(d00_logE0,(1-(v_j/vdci_t)))
3877 : 0 : double m00_exp(d00_exp1,((-zci)*d00_logE0))
3878 : : #if defined(_DERIVATE)
3879 : 0 : double m10_logE(d10_logE0,d00_logE0,(1-(v_j/vdci_t)))
3880 : : #define d10_exp1 d00_exp1
3881 : : #endif
3882 : : #if defined(_DERIVATE)
3883 : 0 : cjcii_Vtnode_GND=(((((cjci0_t_ii_Vtnode_GND*d00_exp1)+(cjci0_t_ii*((-zci)*(-((v_j_Vtnode_GND*vdci_t-v_j*vdci_t_Vtnode_GND)/vdci_t/vdci_t))*d10_logE0)*d10_exp1))*dvj)+((cjci0_t_ii*d00_exp1)*dvj_Vtnode_GND))+(((2.4*cjci0_t_ii_Vtnode_GND)*(1-dvj))+((2.4*cjci0_t_ii)*(-dvj_Vtnode_GND))));
3884 : 0 : cjcii_Vbi_ci=((((cjci0_t_ii*((-zci)*(-(v_j_Vbi_ci/vdci_t))*d10_logE0)*d10_exp1)*dvj)+((cjci0_t_ii*d00_exp1)*dvj_Vbi_ci))+((2.4*cjci0_t_ii)*(-dvj_Vbi_ci)));
3885 : 0 : cjcii_Vb_ci=((((cjci0_t_ii*((-zci)*(-(v_j_Vb_ci/vdci_t))*d10_logE0)*d10_exp1)*dvj)+((cjci0_t_ii*d00_exp1)*dvj_Vb_ci))+((2.4*cjci0_t_ii)*(-dvj_Vb_ci)));
3886 : : #endif
3887 : 0 : cjcii=(((cjci0_t_ii*d00_exp1)*dvj)+((2.4*cjci0_t_ii)*(1-dvj)));
3888 : : }
3889 : : }
3890 : : else
3891 : : {
3892 : : #if defined(_DERIVATE)
3893 : 0 : cjcii_Vtnode_GND=0.0;
3894 : 0 : cjcii_Vbi_ci=0.0;
3895 : 0 : cjcii_Vb_ci=0.0;
3896 : : #endif
3897 : 0 : cjcii=0.0;
3898 : : }
3899 [ # # ]: 0 : if
3900 : : (cje0_t>0.0)
3901 : : {
3902 : : {
3903 : 0 : double m00_logE(d00_logE0,aje_t)
3904 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/ze))
3905 : : #if defined(_DERIVATE)
3906 : 0 : double m10_logE(d10_logE0,d00_logE0,aje_t)
3907 : : #define d10_exp1 d00_exp1
3908 : : #endif
3909 : : #if defined(_DERIVATE)
3910 : 0 : vf_Vtnode_GND=((vde_t_Vtnode_GND*(1.0-d00_exp1))+(vde_t*(-((-aje_t_Vtnode_GND*d10_logE0)/ze)*d10_exp1)));
3911 : : #endif
3912 : 0 : vf=(vde_t*(1.0-d00_exp1));
3913 : : }
3914 : : #if defined(_DERIVATEFORDDX)
3915 : : #if defined(_DERIVATE)
3916 : 0 : xvf_Vs_ci=0.0;
3917 : : #endif
3918 : 0 : xvf_Vbi_ei=((-Vbiei_Vbi_ei)/VT);
3919 : : #if defined(_DERIVATE)
3920 : 0 : xvf_Vbi_ei_Vs_ci=((+0.0-0.0)/VT-((-Vbiei_Vbi_ei)*0.0+0.0*0.0+(vf-Vbiei)*0.0)/VT/VT+2*(vf-Vbiei)*0.0*0.0/VT/VT/VT);
3921 : 0 : xvf_Vbi_ei_Vbi_ei=((+0.0-Vbiei_Vbi_ei_Vbi_ei)/VT-((-Vbiei_Vbi_ei)*0.0+(-Vbiei_Vbi_ei)*0.0+(vf-Vbiei)*0.0)/VT/VT+2*(vf-Vbiei)*0.0*0.0/VT/VT/VT);
3922 : 0 : xvf_Vbi_ei_Vbi_ci=((+0.0-0.0)/VT-((-Vbiei_Vbi_ei)*0.0+0.0*0.0+(vf-Vbiei)*0.0)/VT/VT+2*(vf-Vbiei)*0.0*0.0/VT/VT/VT);
3923 : 0 : xvf_Vbi_ei_Vtnode_GND=((+0.0-0.0)/VT-((-Vbiei_Vbi_ei)*VT_Vtnode_GND+vf_Vtnode_GND*0.0+(vf-Vbiei)*0.0)/VT/VT+2*(vf-Vbiei)*0.0*VT_Vtnode_GND/VT/VT/VT);
3924 : 0 : xvf_Vbi_ei_Vb_ci=((+0.0-0.0)/VT-((-Vbiei_Vbi_ei)*0.0+0.0*0.0+(vf-Vbiei)*0.0)/VT/VT+2*(vf-Vbiei)*0.0*0.0/VT/VT/VT);
3925 : : #endif
3926 : 0 : xvf_Vbi_ci=0.0;
3927 : : #if defined(_DERIVATE)
3928 : 0 : xvf_Vbi_ci_Vs_ci=0.0;
3929 : 0 : xvf_Vbi_ci_Vbi_ei=0.0;
3930 : 0 : xvf_Vbi_ci_Vbi_ci=0.0;
3931 : 0 : xvf_Vbi_ci_Vtnode_GND=0.0;
3932 : 0 : xvf_Vbi_ci_Vb_ci=0.0;
3933 : : #endif
3934 : : #if defined(_DERIVATE)
3935 : 0 : xvf_Vtnode_GND=((vf_Vtnode_GND*VT-(vf-Vbiei)*VT_Vtnode_GND)/VT/VT);
3936 : : #endif
3937 : : #if defined(_DERIVATE)
3938 : 0 : xvf_Vb_ci=0.0;
3939 : : #endif
3940 : : #endif
3941 : 0 : xvf=((vf-Vbiei)/VT);
3942 : : {
3943 : 0 : double m00_sqrt(d00_sqrt0,((xvf*xvf)+1.921812))
3944 : : #if defined(_DERIVATEFORDDX)
3945 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((xvf*xvf)+1.921812))
3946 : : #endif
3947 : : #if defined(_DERIVATEFORDDX)
3948 : : #if defined(_DERIVATE)
3949 : 0 : xvf2_Vs_ci=0.0;
3950 : : #endif
3951 : 0 : xvf2_Vbi_ei=((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))*d10_sqrt0;
3952 : : #if defined(_DERIVATE)
3953 : 0 : xvf2_Vbi_ei_Vs_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vs_ci*xvf)+(xvf*xvf_Vs_ci)))*((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))+d10_sqrt0*(+(+xvf_Vbi_ei_Vs_ci*xvf+xvf_Vbi_ei*xvf_Vs_ci+xvf_Vs_ci*xvf_Vbi_ei+xvf*xvf_Vbi_ei_Vs_ci)+0.0));
3954 : 0 : xvf2_Vbi_ei_Vbi_ei=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei)))*((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))+d10_sqrt0*(+(+xvf_Vbi_ei_Vbi_ei*xvf+xvf_Vbi_ei*xvf_Vbi_ei+xvf_Vbi_ei*xvf_Vbi_ei+xvf*xvf_Vbi_ei_Vbi_ei)+0.0));
3955 : 0 : xvf2_Vbi_ei_Vbi_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci)))*((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))+d10_sqrt0*(+(+xvf_Vbi_ei_Vbi_ci*xvf+xvf_Vbi_ei*xvf_Vbi_ci+xvf_Vbi_ci*xvf_Vbi_ei+xvf*xvf_Vbi_ei_Vbi_ci)+0.0));
3956 : 0 : xvf2_Vbi_ei_Vtnode_GND=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND)))*((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))+d10_sqrt0*(+(+xvf_Vbi_ei_Vtnode_GND*xvf+xvf_Vbi_ei*xvf_Vtnode_GND+xvf_Vtnode_GND*xvf_Vbi_ei+xvf*xvf_Vbi_ei_Vtnode_GND)+0.0));
3957 : 0 : xvf2_Vbi_ei_Vb_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci)))*((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))+d10_sqrt0*(+(+xvf_Vbi_ei_Vb_ci*xvf+xvf_Vbi_ei*xvf_Vb_ci+xvf_Vb_ci*xvf_Vbi_ei+xvf*xvf_Vbi_ei_Vb_ci)+0.0));
3958 : : #endif
3959 : 0 : xvf2_Vbi_ci=((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))*d10_sqrt0;
3960 : : #if defined(_DERIVATE)
3961 : 0 : xvf2_Vbi_ci_Vs_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vs_ci*xvf)+(xvf*xvf_Vs_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vs_ci*xvf+xvf_Vbi_ci*xvf_Vs_ci+xvf_Vs_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vs_ci)+0.0));
3962 : 0 : xvf2_Vbi_ci_Vbi_ei=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ei*xvf+xvf_Vbi_ci*xvf_Vbi_ei+xvf_Vbi_ei*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ei)+0.0));
3963 : 0 : xvf2_Vbi_ci_Vbi_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ci*xvf+xvf_Vbi_ci*xvf_Vbi_ci+xvf_Vbi_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ci)+0.0));
3964 : 0 : xvf2_Vbi_ci_Vtnode_GND=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vtnode_GND*xvf+xvf_Vbi_ci*xvf_Vtnode_GND+xvf_Vtnode_GND*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vtnode_GND)+0.0));
3965 : 0 : xvf2_Vbi_ci_Vb_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vb_ci*xvf+xvf_Vbi_ci*xvf_Vb_ci+xvf_Vb_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vb_ci)+0.0));
3966 : : #endif
3967 : : #if defined(_DERIVATE)
3968 : 0 : xvf2_Vtnode_GND=((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND))*d10_sqrt0;
3969 : : #endif
3970 : : #if defined(_DERIVATE)
3971 : 0 : xvf2_Vb_ci=((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci))*d10_sqrt0;
3972 : : #endif
3973 : : #endif
3974 : 0 : xvf2=d00_sqrt0;
3975 : : }
3976 : : #if defined(_DERIVATEFORDDX)
3977 : : #if defined(_DERIVATE)
3978 : 0 : v_j_Vs_ci=0.0;
3979 : : #endif
3980 : 0 : v_j_Vbi_ei=(-(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.5);
3981 : : #if defined(_DERIVATE)
3982 : 0 : v_j_Vbi_ei_Vs_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vs_ci+xvf2_Vs_ci)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+VT*(+xvf_Vbi_ei_Vs_ci+xvf2_Vbi_ei_Vs_ci))*0.5+(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.0+((VT*(xvf_Vs_ci+xvf2_Vs_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3983 : 0 : v_j_Vbi_ei_Vbi_ei=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+VT*(+xvf_Vbi_ei_Vbi_ei+xvf2_Vbi_ei_Vbi_ei))*0.5+(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.0+((VT*(xvf_Vbi_ei+xvf2_Vbi_ei)))*0.0+(VT*(xvf+xvf2))*0.0));
3984 : 0 : v_j_Vbi_ei_Vbi_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+VT*(+xvf_Vbi_ei_Vbi_ci+xvf2_Vbi_ei_Vbi_ci))*0.5+(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.0+((VT*(xvf_Vbi_ci+xvf2_Vbi_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3985 : 0 : v_j_Vbi_ei_Vtnode_GND=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vtnode_GND+xvf2_Vtnode_GND)+VT_Vtnode_GND*(xvf_Vbi_ei+xvf2_Vbi_ei)+VT*(+xvf_Vbi_ei_Vtnode_GND+xvf2_Vbi_ei_Vtnode_GND))*0.5+(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.0+(((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND))))*0.0+(VT*(xvf+xvf2))*0.0));
3986 : 0 : v_j_Vbi_ei_Vb_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vb_ci+xvf2_Vb_ci)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+VT*(+xvf_Vbi_ei_Vb_ci+xvf2_Vbi_ei_Vb_ci))*0.5+(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.0+((VT*(xvf_Vb_ci+xvf2_Vb_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3987 : : #endif
3988 : 0 : v_j_Vbi_ci=(-(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.5);
3989 : : #if defined(_DERIVATE)
3990 : 0 : v_j_Vbi_ci_Vs_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vs_ci+xvf2_Vs_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vs_ci+xvf2_Vbi_ci_Vs_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vs_ci+xvf2_Vs_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3991 : 0 : v_j_Vbi_ci_Vbi_ei=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ei+xvf2_Vbi_ci_Vbi_ei))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ei+xvf2_Vbi_ei)))*0.0+(VT*(xvf+xvf2))*0.0));
3992 : 0 : v_j_Vbi_ci_Vbi_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ci+xvf2_Vbi_ci_Vbi_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ci+xvf2_Vbi_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3993 : 0 : v_j_Vbi_ci_Vtnode_GND=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vtnode_GND+xvf2_Vtnode_GND)+VT_Vtnode_GND*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vtnode_GND+xvf2_Vbi_ci_Vtnode_GND))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+(((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND))))*0.0+(VT*(xvf+xvf2))*0.0));
3994 : 0 : v_j_Vbi_ci_Vb_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vb_ci+xvf2_Vb_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vb_ci+xvf2_Vbi_ci_Vb_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vb_ci+xvf2_Vb_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
3995 : : #endif
3996 : : #if defined(_DERIVATE)
3997 : 0 : v_j_Vtnode_GND=(vf_Vtnode_GND-((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND)))*0.5);
3998 : : #endif
3999 : : #if defined(_DERIVATE)
4000 : 0 : v_j_Vb_ci=(-(VT*(xvf_Vb_ci+xvf2_Vb_ci))*0.5);
4001 : : #endif
4002 : : #endif
4003 : 0 : v_j=(vf-((VT*(xvf+xvf2))*0.5));
4004 : : #if defined(_DERIVATE)
4005 : 0 : x_Vtnode_GND=0.0;
4006 : 0 : x_Vci_ei=0.0;
4007 : : #endif
4008 : 0 : x=(1.0-ze);
4009 : : {
4010 : 0 : double m00_logE(d00_logE0,(1.0-(v_j/vde_t)))
4011 : 0 : double m00_exp(d00_exp1,(x*d00_logE0))
4012 : : #if defined(_DERIVATEFORDDX)
4013 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(v_j/vde_t)))
4014 : : #define d10_exp1 d00_exp1
4015 : : #endif
4016 : : #if defined(_DERIVATEFORDDX)
4017 : : #if defined(_DERIVATE)
4018 : 0 : y_Vci_ei=0.0;
4019 : : #endif
4020 : : #if defined(_DERIVATE)
4021 : 0 : y_Vs_ci=0.0;
4022 : : #endif
4023 : 0 : y_Vbi_ei=(-(x*(-(v_j_Vbi_ei/vde_t))*d10_logE0)*d10_exp1);
4024 : : #if defined(_DERIVATE)
4025 : 0 : y_Vbi_ei_Vci_ei=(+0.0-(m20_exp((x*d00_logE0))*(x_Vci_ei*d00_logE0)*(x*(-(v_j_Vbi_ei/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*0.0+x_Vci_ei*(-(v_j_Vbi_ei/vde_t))*d10_logE0+x*0.0)));
4026 : 0 : y_Vbi_ei_Vs_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vs_ci/vde_t))*d10_logE0))*(x*(-(v_j_Vbi_ei/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vs_ci/vde_t))*d10_logE0+0.0*(-(v_j_Vbi_ei/vde_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vde_t)))*(-(v_j_Vs_ci/vde_t))*(-(v_j_Vbi_ei/vde_t))+d10_logE0*(+0.0-(v_j_Vbi_ei_Vs_ci/vde_t-(v_j_Vbi_ei*0.0+v_j_Vs_ci*0.0+v_j*0.0)/vde_t/vde_t+2*v_j*0.0*0.0/vde_t/vde_t/vde_t))))));
4027 : 0 : y_Vbi_ei_Vbi_ei=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ei/vde_t))*d10_logE0))*(x*(-(v_j_Vbi_ei/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ei/vde_t))*d10_logE0+0.0*(-(v_j_Vbi_ei/vde_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vde_t)))*(-(v_j_Vbi_ei/vde_t))*(-(v_j_Vbi_ei/vde_t))+d10_logE0*(+0.0-(v_j_Vbi_ei_Vbi_ei/vde_t-(v_j_Vbi_ei*0.0+v_j_Vbi_ei*0.0+v_j*0.0)/vde_t/vde_t+2*v_j*0.0*0.0/vde_t/vde_t/vde_t))))));
4028 : 0 : y_Vbi_ei_Vbi_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ci/vde_t))*d10_logE0))*(x*(-(v_j_Vbi_ei/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ci/vde_t))*d10_logE0+0.0*(-(v_j_Vbi_ei/vde_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vde_t)))*(-(v_j_Vbi_ci/vde_t))*(-(v_j_Vbi_ei/vde_t))+d10_logE0*(+0.0-(v_j_Vbi_ei_Vbi_ci/vde_t-(v_j_Vbi_ei*0.0+v_j_Vbi_ci*0.0+v_j*0.0)/vde_t/vde_t+2*v_j*0.0*0.0/vde_t/vde_t/vde_t))))));
4029 : 0 : y_Vbi_ei_Vtnode_GND=(+0.0-(m20_exp((x*d00_logE0))*(((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vde_t-v_j*vde_t_Vtnode_GND)/vde_t/vde_t))*d10_logE0)))*(x*(-(v_j_Vbi_ei/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-((v_j_Vtnode_GND*vde_t-v_j*vde_t_Vtnode_GND)/vde_t/vde_t))*d10_logE0+x_Vtnode_GND*(-(v_j_Vbi_ei/vde_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vde_t)))*(-((v_j_Vtnode_GND*vde_t-v_j*vde_t_Vtnode_GND)/vde_t/vde_t))*(-(v_j_Vbi_ei/vde_t))+d10_logE0*(+0.0-(v_j_Vbi_ei_Vtnode_GND/vde_t-(v_j_Vbi_ei*vde_t_Vtnode_GND+v_j_Vtnode_GND*0.0+v_j*0.0)/vde_t/vde_t+2*v_j*0.0*vde_t_Vtnode_GND/vde_t/vde_t/vde_t))))));
4030 : 0 : y_Vbi_ei_Vb_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vb_ci/vde_t))*d10_logE0))*(x*(-(v_j_Vbi_ei/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vb_ci/vde_t))*d10_logE0+0.0*(-(v_j_Vbi_ei/vde_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vde_t)))*(-(v_j_Vb_ci/vde_t))*(-(v_j_Vbi_ei/vde_t))+d10_logE0*(+0.0-(v_j_Vbi_ei_Vb_ci/vde_t-(v_j_Vbi_ei*0.0+v_j_Vb_ci*0.0+v_j*0.0)/vde_t/vde_t+2*v_j*0.0*0.0/vde_t/vde_t/vde_t))))));
4031 : : #endif
4032 : 0 : y_Vbi_ci=(-(x*(-(v_j_Vbi_ci/vde_t))*d10_logE0)*d10_exp1);
4033 : : #if defined(_DERIVATE)
4034 : 0 : y_Vbi_ci_Vci_ei=(+0.0-(m20_exp((x*d00_logE0))*(x_Vci_ei*d00_logE0)*(x*(-(v_j_Vbi_ci/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*0.0+x_Vci_ei*(-(v_j_Vbi_ci/vde_t))*d10_logE0+x*0.0)));
4035 : 0 : y_Vbi_ci_Vs_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vs_ci/vde_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vs_ci/vde_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vde_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vde_t)))*(-(v_j_Vs_ci/vde_t))*(-(v_j_Vbi_ci/vde_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vs_ci/vde_t-(v_j_Vbi_ci*0.0+v_j_Vs_ci*0.0+v_j*0.0)/vde_t/vde_t+2*v_j*0.0*0.0/vde_t/vde_t/vde_t))))));
4036 : 0 : y_Vbi_ci_Vbi_ei=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ei/vde_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ei/vde_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vde_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vde_t)))*(-(v_j_Vbi_ei/vde_t))*(-(v_j_Vbi_ci/vde_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vbi_ei/vde_t-(v_j_Vbi_ci*0.0+v_j_Vbi_ei*0.0+v_j*0.0)/vde_t/vde_t+2*v_j*0.0*0.0/vde_t/vde_t/vde_t))))));
4037 : 0 : y_Vbi_ci_Vbi_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ci/vde_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ci/vde_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vde_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vde_t)))*(-(v_j_Vbi_ci/vde_t))*(-(v_j_Vbi_ci/vde_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vbi_ci/vde_t-(v_j_Vbi_ci*0.0+v_j_Vbi_ci*0.0+v_j*0.0)/vde_t/vde_t+2*v_j*0.0*0.0/vde_t/vde_t/vde_t))))));
4038 : 0 : y_Vbi_ci_Vtnode_GND=(+0.0-(m20_exp((x*d00_logE0))*(((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vde_t-v_j*vde_t_Vtnode_GND)/vde_t/vde_t))*d10_logE0)))*(x*(-(v_j_Vbi_ci/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-((v_j_Vtnode_GND*vde_t-v_j*vde_t_Vtnode_GND)/vde_t/vde_t))*d10_logE0+x_Vtnode_GND*(-(v_j_Vbi_ci/vde_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vde_t)))*(-((v_j_Vtnode_GND*vde_t-v_j*vde_t_Vtnode_GND)/vde_t/vde_t))*(-(v_j_Vbi_ci/vde_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vtnode_GND/vde_t-(v_j_Vbi_ci*vde_t_Vtnode_GND+v_j_Vtnode_GND*0.0+v_j*0.0)/vde_t/vde_t+2*v_j*0.0*vde_t_Vtnode_GND/vde_t/vde_t/vde_t))))));
4039 : 0 : y_Vbi_ci_Vb_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vb_ci/vde_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vde_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vb_ci/vde_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vde_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vde_t)))*(-(v_j_Vb_ci/vde_t))*(-(v_j_Vbi_ci/vde_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vb_ci/vde_t-(v_j_Vbi_ci*0.0+v_j_Vb_ci*0.0+v_j*0.0)/vde_t/vde_t+2*v_j*0.0*0.0/vde_t/vde_t/vde_t))))));
4040 : : #endif
4041 : : #if defined(_DERIVATE)
4042 : 0 : y_Vtnode_GND=(-((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vde_t-v_j*vde_t_Vtnode_GND)/vde_t/vde_t))*d10_logE0))*d10_exp1);
4043 : : #endif
4044 : : #if defined(_DERIVATE)
4045 : 0 : y_Vb_ci=(-(x*(-(v_j_Vb_ci/vde_t))*d10_logE0)*d10_exp1);
4046 : : #endif
4047 : : #endif
4048 : 0 : y=(1.0-d00_exp1);
4049 : : }
4050 : : #if defined(_DERIVATEFORDDX)
4051 : : #if defined(_DERIVATE)
4052 : 0 : qjei_Vtnode_GND=(((((((cje0_t_Vtnode_GND*vde_t)+(cje0_t*vde_t_Vtnode_GND))*y)+((cje0_t*vde_t)*y_Vtnode_GND))*x-((cje0_t*vde_t)*y)*x_Vtnode_GND)/x/x)+((((aje_t_Vtnode_GND*cje0_t)+(aje_t*cje0_t_Vtnode_GND))*(Vbiei-v_j))+((aje_t*cje0_t)*(-v_j_Vtnode_GND))));
4053 : : #endif
4054 : 0 : qjei_Vbi_ei=((((cje0_t*vde_t)*y_Vbi_ei)/x)+((aje_t*cje0_t)*(Vbiei_Vbi_ei-v_j_Vbi_ei)));
4055 : : #if defined(_DERIVATE)
4056 : 0 : qjei_Vbi_ei_Vtnode_GND=(+((+(+0.0*vde_t+0.0*vde_t_Vtnode_GND+cje0_t_Vtnode_GND*0.0+cje0_t*0.0)*y+0.0*y_Vtnode_GND+(((cje0_t_Vtnode_GND*vde_t)+(cje0_t*vde_t_Vtnode_GND)))*y_Vbi_ei+(cje0_t*vde_t)*y_Vbi_ei_Vtnode_GND)/x-(((cje0_t*vde_t)*y_Vbi_ei)*x_Vtnode_GND+((((((cje0_t_Vtnode_GND*vde_t)+(cje0_t*vde_t_Vtnode_GND)))*y)+((cje0_t*vde_t)*y_Vtnode_GND)))*0.0+((cje0_t*vde_t)*y)*0.0)/x/x+2*((cje0_t*vde_t)*y)*0.0*x_Vtnode_GND/x/x/x)+(+(+0.0*cje0_t+0.0*cje0_t_Vtnode_GND+aje_t_Vtnode_GND*0.0+aje_t*0.0)*(Vbiei-v_j)+0.0*(-v_j_Vtnode_GND)+(((aje_t_Vtnode_GND*cje0_t)+(aje_t*cje0_t_Vtnode_GND)))*(Vbiei_Vbi_ei-v_j_Vbi_ei)+(aje_t*cje0_t)*(+0.0-v_j_Vbi_ei_Vtnode_GND)));
4057 : 0 : qjei_Vbi_ei_Vbi_ei=(+((+(+0.0*vde_t+0.0*0.0+0.0*0.0+cje0_t*0.0)*y+0.0*y_Vbi_ei+0.0*y_Vbi_ei+(cje0_t*vde_t)*y_Vbi_ei_Vbi_ei)/x-(((cje0_t*vde_t)*y_Vbi_ei)*0.0+(((cje0_t*vde_t)*y_Vbi_ei))*0.0+((cje0_t*vde_t)*y)*0.0)/x/x+2*((cje0_t*vde_t)*y)*0.0*0.0/x/x/x)+(+(+0.0*cje0_t+0.0*0.0+0.0*0.0+aje_t*0.0)*(Vbiei-v_j)+0.0*(Vbiei_Vbi_ei-v_j_Vbi_ei)+0.0*(Vbiei_Vbi_ei-v_j_Vbi_ei)+(aje_t*cje0_t)*(+Vbiei_Vbi_ei_Vbi_ei-v_j_Vbi_ei_Vbi_ei)));
4058 : 0 : qjei_Vbi_ei_Vbi_ci=(+((+(+0.0*vde_t+0.0*0.0+0.0*0.0+cje0_t*0.0)*y+0.0*y_Vbi_ci+0.0*y_Vbi_ei+(cje0_t*vde_t)*y_Vbi_ei_Vbi_ci)/x-(((cje0_t*vde_t)*y_Vbi_ei)*0.0+(((cje0_t*vde_t)*y_Vbi_ci))*0.0+((cje0_t*vde_t)*y)*0.0)/x/x+2*((cje0_t*vde_t)*y)*0.0*0.0/x/x/x)+(+(+0.0*cje0_t+0.0*0.0+0.0*0.0+aje_t*0.0)*(Vbiei-v_j)+0.0*(-v_j_Vbi_ci)+0.0*(Vbiei_Vbi_ei-v_j_Vbi_ei)+(aje_t*cje0_t)*(+0.0-v_j_Vbi_ei_Vbi_ci)));
4059 : 0 : qjei_Vbi_ei_Vb_ci=(+((+(+0.0*vde_t+0.0*0.0+0.0*0.0+cje0_t*0.0)*y+0.0*y_Vb_ci+0.0*y_Vbi_ei+(cje0_t*vde_t)*y_Vbi_ei_Vb_ci)/x-(((cje0_t*vde_t)*y_Vbi_ei)*0.0+(((cje0_t*vde_t)*y_Vb_ci))*0.0+((cje0_t*vde_t)*y)*0.0)/x/x+2*((cje0_t*vde_t)*y)*0.0*0.0/x/x/x)+(+(+0.0*cje0_t+0.0*0.0+0.0*0.0+aje_t*0.0)*(Vbiei-v_j)+0.0*(-v_j_Vb_ci)+0.0*(Vbiei_Vbi_ei-v_j_Vbi_ei)+(aje_t*cje0_t)*(+0.0-v_j_Vbi_ei_Vb_ci)));
4060 : : #endif
4061 : 0 : qjei_Vbi_ci=((((cje0_t*vde_t)*y_Vbi_ci)/x)+((aje_t*cje0_t)*(-v_j_Vbi_ci)));
4062 : : #if defined(_DERIVATE)
4063 : 0 : qjei_Vbi_ci_Vtnode_GND=(+((+(+0.0*vde_t+0.0*vde_t_Vtnode_GND+cje0_t_Vtnode_GND*0.0+cje0_t*0.0)*y+0.0*y_Vtnode_GND+(((cje0_t_Vtnode_GND*vde_t)+(cje0_t*vde_t_Vtnode_GND)))*y_Vbi_ci+(cje0_t*vde_t)*y_Vbi_ci_Vtnode_GND)/x-(((cje0_t*vde_t)*y_Vbi_ci)*x_Vtnode_GND+((((((cje0_t_Vtnode_GND*vde_t)+(cje0_t*vde_t_Vtnode_GND)))*y)+((cje0_t*vde_t)*y_Vtnode_GND)))*0.0+((cje0_t*vde_t)*y)*0.0)/x/x+2*((cje0_t*vde_t)*y)*0.0*x_Vtnode_GND/x/x/x)+(+(+0.0*cje0_t+0.0*cje0_t_Vtnode_GND+aje_t_Vtnode_GND*0.0+aje_t*0.0)*(Vbiei-v_j)+0.0*(-v_j_Vtnode_GND)+(((aje_t_Vtnode_GND*cje0_t)+(aje_t*cje0_t_Vtnode_GND)))*(-v_j_Vbi_ci)+(aje_t*cje0_t)*(+0.0-v_j_Vbi_ci_Vtnode_GND)));
4064 : 0 : qjei_Vbi_ci_Vbi_ei=(+((+(+0.0*vde_t+0.0*0.0+0.0*0.0+cje0_t*0.0)*y+0.0*y_Vbi_ei+0.0*y_Vbi_ci+(cje0_t*vde_t)*y_Vbi_ci_Vbi_ei)/x-(((cje0_t*vde_t)*y_Vbi_ci)*0.0+(((cje0_t*vde_t)*y_Vbi_ei))*0.0+((cje0_t*vde_t)*y)*0.0)/x/x+2*((cje0_t*vde_t)*y)*0.0*0.0/x/x/x)+(+(+0.0*cje0_t+0.0*0.0+0.0*0.0+aje_t*0.0)*(Vbiei-v_j)+0.0*(Vbiei_Vbi_ei-v_j_Vbi_ei)+0.0*(-v_j_Vbi_ci)+(aje_t*cje0_t)*(+0.0-v_j_Vbi_ci_Vbi_ei)));
4065 : 0 : qjei_Vbi_ci_Vbi_ci=(+((+(+0.0*vde_t+0.0*0.0+0.0*0.0+cje0_t*0.0)*y+0.0*y_Vbi_ci+0.0*y_Vbi_ci+(cje0_t*vde_t)*y_Vbi_ci_Vbi_ci)/x-(((cje0_t*vde_t)*y_Vbi_ci)*0.0+(((cje0_t*vde_t)*y_Vbi_ci))*0.0+((cje0_t*vde_t)*y)*0.0)/x/x+2*((cje0_t*vde_t)*y)*0.0*0.0/x/x/x)+(+(+0.0*cje0_t+0.0*0.0+0.0*0.0+aje_t*0.0)*(Vbiei-v_j)+0.0*(-v_j_Vbi_ci)+0.0*(-v_j_Vbi_ci)+(aje_t*cje0_t)*(+0.0-v_j_Vbi_ci_Vbi_ci)));
4066 : 0 : qjei_Vbi_ci_Vb_ci=(+((+(+0.0*vde_t+0.0*0.0+0.0*0.0+cje0_t*0.0)*y+0.0*y_Vb_ci+0.0*y_Vbi_ci+(cje0_t*vde_t)*y_Vbi_ci_Vb_ci)/x-(((cje0_t*vde_t)*y_Vbi_ci)*0.0+(((cje0_t*vde_t)*y_Vb_ci))*0.0+((cje0_t*vde_t)*y)*0.0)/x/x+2*((cje0_t*vde_t)*y)*0.0*0.0/x/x/x)+(+(+0.0*cje0_t+0.0*0.0+0.0*0.0+aje_t*0.0)*(Vbiei-v_j)+0.0*(-v_j_Vb_ci)+0.0*(-v_j_Vbi_ci)+(aje_t*cje0_t)*(+0.0-v_j_Vbi_ci_Vb_ci)));
4067 : : #endif
4068 : : #if defined(_DERIVATE)
4069 : 0 : qjei_Vb_ci=((((cje0_t*vde_t)*y_Vb_ci)/x)+((aje_t*cje0_t)*(-v_j_Vb_ci)));
4070 : : #endif
4071 : : #endif
4072 : 0 : qjei=((((cje0_t*vde_t)*y)/x)+((aje_t*cje0_t)*(Vbiei-v_j)));
4073 : : }
4074 : : else
4075 : : {
4076 : : #if defined(_DERIVATEFORDDX)
4077 : : #if defined(_DERIVATE)
4078 : 0 : qjei_Vtnode_GND=0.0;
4079 : : #endif
4080 : 0 : qjei_Vbi_ei=0.0;
4081 : : #if defined(_DERIVATE)
4082 : 0 : qjei_Vbi_ei_Vtnode_GND=0.0;
4083 : 0 : qjei_Vbi_ei_Vbi_ei=0.0;
4084 : 0 : qjei_Vbi_ei_Vbi_ci=0.0;
4085 : 0 : qjei_Vbi_ei_Vb_ci=0.0;
4086 : : #endif
4087 : 0 : qjei_Vbi_ci=0.0;
4088 : : #if defined(_DERIVATE)
4089 : 0 : qjei_Vbi_ci_Vtnode_GND=0.0;
4090 : 0 : qjei_Vbi_ci_Vbi_ei=0.0;
4091 : 0 : qjei_Vbi_ci_Vbi_ci=0.0;
4092 : 0 : qjei_Vbi_ci_Vb_ci=0.0;
4093 : : #endif
4094 : : #if defined(_DERIVATE)
4095 : 0 : qjei_Vb_ci=0.0;
4096 : : #endif
4097 : : #endif
4098 : 0 : qjei=0.0;
4099 : : }
4100 : : #if defined(_DYNAMIC)
4101 : : #if defined(_DDX)
4102 : 0 : cjei=+(qjei_Vbi_ei)+(qjei_Vbi_ci);
4103 : : #endif
4104 : : #endif
4105 : : #if defined(_DERIVATE)
4106 : 0 : vc_Vci_ei=Vciei_Vci_ei;
4107 : 0 : vc_Vtnode_GND=(-vces_t_Vtnode_GND);
4108 : : #endif
4109 : 0 : vc=(Vciei-vces_t);
4110 : : #if defined(_DERIVATE)
4111 : 0 : uvc_Vci_ei=(vc_Vci_ei/VT);
4112 : 0 : uvc_Vtnode_GND=((vc_Vtnode_GND*VT-vc*VT_Vtnode_GND)/VT/VT);
4113 : : #endif
4114 : 0 : uvc=((vc/VT)-1);
4115 : : {
4116 : 0 : double m00_sqrt(d00_sqrt0,((uvc*uvc)+1.921812))
4117 : : #if defined(_DERIVATE)
4118 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((uvc*uvc)+1.921812))
4119 : : #endif
4120 : : #if defined(_DERIVATE)
4121 : 0 : vceff_Vtnode_GND=((VT_Vtnode_GND*(1+(0.5*(uvc+d00_sqrt0))))+(VT*(0.5*(uvc_Vtnode_GND+((uvc_Vtnode_GND*uvc)+(uvc*uvc_Vtnode_GND))*d10_sqrt0))));
4122 : 0 : vceff_Vci_ei=(VT*(0.5*(uvc_Vci_ei+((uvc_Vci_ei*uvc)+(uvc*uvc_Vci_ei))*d10_sqrt0)));
4123 : : #endif
4124 : 0 : vceff=(VT*(1+(0.5*(uvc+d00_sqrt0))));
4125 : : }
4126 : : #if defined(_DERIVATE)
4127 : 0 : x_Vtnode_GND=((vceff_Vtnode_GND-vlim_t_Vtnode_GND)/vpt);
4128 : 0 : x_Vci_ei=(vceff_Vci_ei/vpt);
4129 : : #endif
4130 : 0 : x=((vceff-vlim_t)/vpt);
4131 : : {
4132 : 0 : double m00_sqrt(d00_sqrt0,((x*x)+1e-3))
4133 : 0 : double m00_sqrt(d00_sqrt1,(1+(((vceff*vceff)/vlim_t)/vlim_t)))
4134 : : #if defined(_DERIVATE)
4135 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((x*x)+1e-3))
4136 : 0 : double m10_sqrt(d10_sqrt1,d00_sqrt1,(1+(((vceff*vceff)/vlim_t)/vlim_t)))
4137 : : #endif
4138 : : #if defined(_DERIVATE)
4139 : 0 : ick_Vtnode_GND=((((((vceff_Vtnode_GND*(1+(0.5*(x+d00_sqrt0))))+(vceff*(0.5*(x_Vtnode_GND+((x_Vtnode_GND*x)+(x*x_Vtnode_GND))*d10_sqrt0))))*rci0_t-(vceff*(1+(0.5*(x+d00_sqrt0))))*rci0_t_Vtnode_GND)/rci0_t/rci0_t)*d00_sqrt1-((vceff*(1+(0.5*(x+d00_sqrt0))))/rci0_t)*((((((vceff_Vtnode_GND*vceff)+(vceff*vceff_Vtnode_GND))*vlim_t-(vceff*vceff)*vlim_t_Vtnode_GND)/vlim_t/vlim_t)*vlim_t-((vceff*vceff)/vlim_t)*vlim_t_Vtnode_GND)/vlim_t/vlim_t)*d10_sqrt1)/d00_sqrt1/d00_sqrt1);
4140 : 0 : ick_Vci_ei=(((((vceff_Vci_ei*(1+(0.5*(x+d00_sqrt0))))+(vceff*(0.5*(x_Vci_ei+((x_Vci_ei*x)+(x*x_Vci_ei))*d10_sqrt0))))/rci0_t)*d00_sqrt1-((vceff*(1+(0.5*(x+d00_sqrt0))))/rci0_t)*((((vceff_Vci_ei*vceff)+(vceff*vceff_Vci_ei))/vlim_t)/vlim_t)*d10_sqrt1)/d00_sqrt1/d00_sqrt1);
4141 : : #endif
4142 : 0 : ick=(((vceff*(1+(0.5*(x+d00_sqrt0))))/rci0_t)/d00_sqrt1);
4143 : : }
4144 : : #if defined(_DERIVATE)
4145 : 0 : cc_Vtnode_GND=((cjci0_t_ii_Vtnode_GND*cjcii-cjci0_t_ii*cjcii_Vtnode_GND)/cjcii/cjcii);
4146 : 0 : cc_Vbi_ci=(-cjci0_t_ii*cjcii_Vbi_ci/cjcii/cjcii);
4147 : 0 : cc_Vb_ci=(-cjci0_t_ii*cjcii_Vb_ci/cjcii/cjcii);
4148 : : #endif
4149 : 0 : cc=(cjci0_t_ii/cjcii);
4150 : : #if defined(_DERIVATE)
4151 : 0 : qjci_Vbi_ci=(qjci_Vbi_ci/cjci0_t_ii);
4152 : 0 : qjci_Vtnode_GND=((qjci_Vtnode_GND*cjci0_t_ii-qjci*cjci0_t_ii_Vtnode_GND)/cjci0_t_ii/cjci0_t_ii);
4153 : 0 : qjci_Vb_ci=(qjci_Vb_ci/cjci0_t_ii);
4154 : : #endif
4155 : 0 : qjci=(qjci/cjci0_t_ii);
4156 : : #if defined(_DERIVATE)
4157 : 0 : qj_2_Vbi_ci=((qjci_Vbi_ci/vef)/2);
4158 : 0 : qj_2_Vtnode_GND=((qjci_Vtnode_GND/vef)/2);
4159 : 0 : qj_2_Vb_ci=((qjci_Vb_ci/vef)/2);
4160 : : #endif
4161 : 0 : qj_2=((1+(qjci/vef))/2);
4162 : : #if defined(_DYNAMIC)
4163 : : #if defined(_DERIVATE)
4164 : 0 : tf0_Vtnode_GND=((t0_t_Vtnode_GND+(dt0h*cc_Vtnode_GND))+(tbvl*(-1*cc_Vtnode_GND/cc/cc)));
4165 : 0 : tf0_Vbi_ci=((dt0h*cc_Vbi_ci)+(tbvl*(-1*cc_Vbi_ci/cc/cc)));
4166 : 0 : tf0_Vb_ci=((dt0h*cc_Vb_ci)+(tbvl*(-1*cc_Vb_ci/cc/cc)));
4167 : : #endif
4168 : 0 : tf0=((t0_t+(dt0h*(cc-1)))+(tbvl*((1/cc)-1)));
4169 : : #endif
4170 : 0 : ickf=iqf;
4171 : 0 : ickr=iqr;
4172 : : #if defined(_DERIVATE)
4173 : 0 : arg1_Vbi_ei=(Vbiei_Vbi_ei/(mcf*VT));
4174 : 0 : arg1_Vtnode_GND=(-Vbiei*(mcf*VT_Vtnode_GND)/(mcf*VT)/(mcf*VT));
4175 : : #endif
4176 : 0 : arg1=(Vbiei/(mcf*VT));
4177 [ # # ]: 0 : if
4178 : : (arg1>80)
4179 : : {
4180 : : #if defined(_DERIVATE)
4181 : 0 : le1_Vbi_ei=arg1_Vbi_ei;
4182 : 0 : le1_Vtnode_GND=arg1_Vtnode_GND;
4183 : : #endif
4184 : 0 : le1=(1+(arg1-80));
4185 : : #if defined(_DERIVATE)
4186 : 0 : arg1_Vbi_ei=0.0;
4187 : 0 : arg1_Vtnode_GND=0.0;
4188 : : #endif
4189 : 0 : arg1=80;
4190 : : }
4191 : : else
4192 : : {
4193 : : #if defined(_DERIVATE)
4194 : 0 : le1_Vbi_ei=0.0;
4195 : 0 : le1_Vtnode_GND=0.0;
4196 : : #endif
4197 : 0 : le1=1;
4198 : : }
4199 : : {
4200 [ # # ]: 0 : double m00_limexp(d00_limexp0,arg1)
4201 : : #if defined(_DERIVATE)
4202 [ # # ]: 0 : double m10_limexp(d10_limexp0,d00_limexp0,arg1)
4203 : : #endif
4204 : : #if defined(_DERIVATE)
4205 : 0 : le1_Vbi_ei=((le1_Vbi_ei*d00_limexp0)+(le1*arg1_Vbi_ei*d10_limexp0));
4206 : 0 : le1_Vtnode_GND=((le1_Vtnode_GND*d00_limexp0)+(le1*arg1_Vtnode_GND*d10_limexp0));
4207 : : #endif
4208 : 0 : le1=(le1*d00_limexp0);
4209 : : }
4210 : : #if defined(_DERIVATE)
4211 : 0 : itfi_Vtnode_GND=((is_t_Vtnode_GND*le1)+(is_t*le1_Vtnode_GND));
4212 : 0 : itfi_Vbi_ei=(is_t*le1_Vbi_ei);
4213 : : #endif
4214 : 0 : itfi=(is_t*le1);
4215 : : #if defined(_DERIVATE)
4216 : 0 : arg2_Vbi_ci=(Vbici_Vbi_ci/(mcr*VT));
4217 : 0 : arg2_Vtnode_GND=(-Vbici*(mcr*VT_Vtnode_GND)/(mcr*VT)/(mcr*VT));
4218 : : #endif
4219 : 0 : arg2=(Vbici/(mcr*VT));
4220 [ # # ]: 0 : if
4221 : : (arg2>80)
4222 : : {
4223 : : #if defined(_DERIVATE)
4224 : 0 : le2_Vbi_ci=arg2_Vbi_ci;
4225 : 0 : le2_Vtnode_GND=arg2_Vtnode_GND;
4226 : : #endif
4227 : 0 : le2=(1+(arg2-80));
4228 : : #if defined(_DERIVATE)
4229 : 0 : arg2_Vbi_ci=0.0;
4230 : 0 : arg2_Vtnode_GND=0.0;
4231 : : #endif
4232 : 0 : arg2=80;
4233 : : }
4234 : : else
4235 : : {
4236 : : #if defined(_DERIVATE)
4237 : 0 : le2_Vbi_ci=0.0;
4238 : 0 : le2_Vtnode_GND=0.0;
4239 : : #endif
4240 : 0 : le2=1;
4241 : : }
4242 : : {
4243 [ # # ]: 0 : double m00_limexp(d00_limexp0,arg2)
4244 : : #if defined(_DERIVATE)
4245 [ # # ]: 0 : double m10_limexp(d10_limexp0,d00_limexp0,arg2)
4246 : : #endif
4247 : : #if defined(_DERIVATE)
4248 : 0 : le2_Vbi_ci=((le2_Vbi_ci*d00_limexp0)+(le2*arg2_Vbi_ci*d10_limexp0));
4249 : 0 : le2_Vtnode_GND=((le2_Vtnode_GND*d00_limexp0)+(le2*arg2_Vtnode_GND*d10_limexp0));
4250 : : #endif
4251 : 0 : le2=(le2*d00_limexp0);
4252 : : }
4253 : : #if defined(_DERIVATE)
4254 : 0 : itri_Vtnode_GND=((is_t_Vtnode_GND*le2)+(is_t*le2_Vtnode_GND));
4255 : 0 : itri_Vbi_ci=(is_t*le2_Vbi_ci);
4256 : : #endif
4257 : 0 : itri=(is_t*le2);
4258 : : #if defined(_DERIVATE)
4259 : 0 : qm_Vtnode_GND=((itfi_Vtnode_GND/ickf)+(itri_Vtnode_GND/ickr));
4260 : 0 : qm_Vbi_ei=(itfi_Vbi_ei/ickf);
4261 : 0 : qm_Vbi_ci=(itri_Vbi_ci/ickr);
4262 : : #endif
4263 : 0 : qm=((itfi/ickf)+(itri/ickr));
4264 : : {
4265 : 0 : double m00_sqrt(d00_sqrt0,((qj_2*qj_2)+qm))
4266 : : #if defined(_DERIVATE)
4267 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((qj_2*qj_2)+qm))
4268 : : #endif
4269 : : #if defined(_DERIVATE)
4270 : 0 : qpt_Vbi_ci=(qj_2_Vbi_ci+(((qj_2_Vbi_ci*qj_2)+(qj_2*qj_2_Vbi_ci))+qm_Vbi_ci)*d10_sqrt0);
4271 : 0 : qpt_Vtnode_GND=(qj_2_Vtnode_GND+(((qj_2_Vtnode_GND*qj_2)+(qj_2*qj_2_Vtnode_GND))+qm_Vtnode_GND)*d10_sqrt0);
4272 : 0 : qpt_Vb_ci=(qj_2_Vb_ci+((qj_2_Vb_ci*qj_2)+(qj_2*qj_2_Vb_ci))*d10_sqrt0);
4273 : 0 : qpt_Vbi_ei=qm_Vbi_ei*d10_sqrt0;
4274 : : #endif
4275 : 0 : qpt=(qj_2+d00_sqrt0);
4276 : : }
4277 [ # # ]: 0 : if
4278 : : (qpt<=1e-20)
4279 : : {
4280 : : #if defined(_DERIVATE)
4281 : 0 : qpt_Vbi_ci=0.0;
4282 : 0 : qpt_Vtnode_GND=0.0;
4283 : 0 : qpt_Vb_ci=0.0;
4284 : 0 : qpt_Vbi_ei=0.0;
4285 : : #endif
4286 : 0 : qpt=1e-20;
4287 : : }
4288 : : #if defined(_DERIVATE)
4289 : 0 : itfl_Vtnode_GND=((itfi_Vtnode_GND*qpt-itfi*qpt_Vtnode_GND)/qpt/qpt);
4290 : 0 : itfl_Vbi_ei=((itfi_Vbi_ei*qpt-itfi*qpt_Vbi_ei)/qpt/qpt);
4291 : 0 : itfl_Vbi_ci=(-itfi*qpt_Vbi_ci/qpt/qpt);
4292 : 0 : itfl_Vb_ci=(-itfi*qpt_Vb_ci/qpt/qpt);
4293 : : #endif
4294 : 0 : itfl=(itfi/qpt);
4295 : : #if defined(_DERIVATE)
4296 : 0 : itrl_Vtnode_GND=((itri_Vtnode_GND*qpt-itri*qpt_Vtnode_GND)/qpt/qpt);
4297 : 0 : itrl_Vbi_ci=((itri_Vbi_ci*qpt-itri*qpt_Vbi_ci)/qpt/qpt);
4298 : 0 : itrl_Vb_ci=(-itri*qpt_Vb_ci/qpt/qpt);
4299 : 0 : itrl_Vbi_ei=(-itri*qpt_Vbi_ei/qpt/qpt);
4300 : : #endif
4301 : 0 : itrl=(itri/qpt);
4302 [ # # ]: 0 : if
4303 : : (itfl<=1e-20)
4304 : : {
4305 : : #if defined(_DERIVATE)
4306 : 0 : itfl_Vtnode_GND=0.0;
4307 : 0 : itfl_Vbi_ei=0.0;
4308 : 0 : itfl_Vbi_ci=0.0;
4309 : 0 : itfl_Vb_ci=0.0;
4310 : : #endif
4311 : 0 : itfl=1e-20;
4312 : : }
4313 : : #if defined(_DERIVATE)
4314 : 0 : al_Vtnode_GND=(-((ick_Vtnode_GND*itfl-ick*itfl_Vtnode_GND)/itfl/itfl));
4315 : 0 : al_Vci_ei=(-(ick_Vci_ei/itfl));
4316 : 0 : al_Vbi_ei=(-(-ick*itfl_Vbi_ei/itfl/itfl));
4317 : 0 : al_Vbi_ci=(-(-ick*itfl_Vbi_ci/itfl/itfl));
4318 : 0 : al_Vb_ci=(-(-ick*itfl_Vb_ci/itfl/itfl));
4319 : : #endif
4320 : 0 : al=(1-(ick/itfl));
4321 : : {
4322 : 0 : double m00_sqrt(d00_sqrt0,((al*al)+ahc))
4323 : : #if defined(_DERIVATE)
4324 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((al*al)+ahc))
4325 : : #endif
4326 : : #if defined(_DERIVATE)
4327 : 0 : s3l_Vtnode_GND=((al_Vtnode_GND*al)+(al*al_Vtnode_GND))*d10_sqrt0;
4328 : 0 : s3l_Vci_ei=((al_Vci_ei*al)+(al*al_Vci_ei))*d10_sqrt0;
4329 : 0 : s3l_Vbi_ei=((al_Vbi_ei*al)+(al*al_Vbi_ei))*d10_sqrt0;
4330 : 0 : s3l_Vbi_ci=((al_Vbi_ci*al)+(al*al_Vbi_ci))*d10_sqrt0;
4331 : 0 : s3l_Vb_ci=((al_Vb_ci*al)+(al*al_Vb_ci))*d10_sqrt0;
4332 : : #endif
4333 : 0 : s3l=d00_sqrt0;
4334 : : }
4335 : : {
4336 : 0 : double m00_sqrt(d00_sqrt0,(1+ahc))
4337 : : #if defined(_DERIVATE)
4338 : 0 : wl_Vtnode_GND=((al_Vtnode_GND+s3l_Vtnode_GND)/(1+d00_sqrt0));
4339 : 0 : wl_Vci_ei=((al_Vci_ei+s3l_Vci_ei)/(1+d00_sqrt0));
4340 : 0 : wl_Vbi_ei=((al_Vbi_ei+s3l_Vbi_ei)/(1+d00_sqrt0));
4341 : 0 : wl_Vbi_ci=((al_Vbi_ci+s3l_Vbi_ci)/(1+d00_sqrt0));
4342 : 0 : wl_Vb_ci=((al_Vb_ci+s3l_Vb_ci)/(1+d00_sqrt0));
4343 : : #endif
4344 : 0 : wl=((al+s3l)/(1+d00_sqrt0));
4345 : : }
4346 : : #if defined(_DERIVATE)
4347 : 0 : d_qfh_Vtnode_GND=((((((wl_Vtnode_GND*wl)+(wl*wl_Vtnode_GND))+(((tfh*itfl_Vtnode_GND)*ick-(tfh*itfl)*ick_Vtnode_GND)/ick/ick))*itfl)+(((wl*wl)+((tfh*itfl)/ick))*itfl_Vtnode_GND))/iqfh);
4348 : 0 : d_qfh_Vci_ei=((((wl_Vci_ei*wl)+(wl*wl_Vci_ei))+(-(tfh*itfl)*ick_Vci_ei/ick/ick))*itfl/iqfh);
4349 : 0 : d_qfh_Vbi_ei=((((((wl_Vbi_ei*wl)+(wl*wl_Vbi_ei))+((tfh*itfl_Vbi_ei)/ick))*itfl)+(((wl*wl)+((tfh*itfl)/ick))*itfl_Vbi_ei))/iqfh);
4350 : 0 : d_qfh_Vbi_ci=((((((wl_Vbi_ci*wl)+(wl*wl_Vbi_ci))+((tfh*itfl_Vbi_ci)/ick))*itfl)+(((wl*wl)+((tfh*itfl)/ick))*itfl_Vbi_ci))/iqfh);
4351 : 0 : d_qfh_Vb_ci=((((((wl_Vb_ci*wl)+(wl*wl_Vb_ci))+((tfh*itfl_Vb_ci)/ick))*itfl)+(((wl*wl)+((tfh*itfl)/ick))*itfl_Vb_ci))/iqfh);
4352 : : #endif
4353 : 0 : d_qfh=((((wl*wl)+((tfh*itfl)/ick))*itfl)/iqfh);
4354 : : #if defined(_DERIVATE)
4355 : 0 : facl_Vtnode_GND=(-1*((d_qfh_Vtnode_GND*qpt-d_qfh*qpt_Vtnode_GND)/qpt/qpt)/(1+(d_qfh/qpt))/(1+(d_qfh/qpt)));
4356 : 0 : facl_Vci_ei=(-1*(d_qfh_Vci_ei/qpt)/(1+(d_qfh/qpt))/(1+(d_qfh/qpt)));
4357 : 0 : facl_Vbi_ei=(-1*((d_qfh_Vbi_ei*qpt-d_qfh*qpt_Vbi_ei)/qpt/qpt)/(1+(d_qfh/qpt))/(1+(d_qfh/qpt)));
4358 : 0 : facl_Vbi_ci=(-1*((d_qfh_Vbi_ci*qpt-d_qfh*qpt_Vbi_ci)/qpt/qpt)/(1+(d_qfh/qpt))/(1+(d_qfh/qpt)));
4359 : 0 : facl_Vb_ci=(-1*((d_qfh_Vb_ci*qpt-d_qfh*qpt_Vb_ci)/qpt/qpt)/(1+(d_qfh/qpt))/(1+(d_qfh/qpt)));
4360 : : #endif
4361 : 0 : facl=(1/(1+(d_qfh/qpt)));
4362 : : #if defined(_DERIVATE)
4363 : 0 : itf_Vtnode_GND=((itfl_Vtnode_GND*facl)+(itfl*facl_Vtnode_GND));
4364 : 0 : itf_Vbi_ei=((itfl_Vbi_ei*facl)+(itfl*facl_Vbi_ei));
4365 : 0 : itf_Vbi_ci=((itfl_Vbi_ci*facl)+(itfl*facl_Vbi_ci));
4366 : 0 : itf_Vb_ci=((itfl_Vb_ci*facl)+(itfl*facl_Vb_ci));
4367 : 0 : itf_Vci_ei=(itfl*facl_Vci_ei);
4368 : : #endif
4369 : 0 : itf=(itfl*facl);
4370 : : #if defined(_DERIVATE)
4371 : 0 : itr_Vtnode_GND=((itrl_Vtnode_GND*facl)+(itrl*facl_Vtnode_GND));
4372 : 0 : itr_Vbi_ci=((itrl_Vbi_ci*facl)+(itrl*facl_Vbi_ci));
4373 : 0 : itr_Vb_ci=((itrl_Vb_ci*facl)+(itrl*facl_Vb_ci));
4374 : 0 : itr_Vbi_ei=((itrl_Vbi_ei*facl)+(itrl*facl_Vbi_ei));
4375 : 0 : itr_Vci_ei=(itrl*facl_Vci_ei);
4376 : : #endif
4377 : 0 : itr=(itrl*facl);
4378 [ # # ]: 0 : if
4379 : : (itf<=1e-20)
4380 : : {
4381 : : #if defined(_DERIVATE)
4382 : 0 : itf_Vtnode_GND=0.0;
4383 : 0 : itf_Vbi_ei=0.0;
4384 : 0 : itf_Vbi_ci=0.0;
4385 : 0 : itf_Vb_ci=0.0;
4386 : 0 : itf_Vci_ei=0.0;
4387 : : #endif
4388 : 0 : itf=1e-20;
4389 : : }
4390 : : #if defined(_DERIVATE)
4391 : 0 : it_Vtnode_GND=(itf_Vtnode_GND-itr_Vtnode_GND);
4392 : 0 : it_Vbi_ei=(itf_Vbi_ei-itr_Vbi_ei);
4393 : 0 : it_Vbi_ci=(itf_Vbi_ci-itr_Vbi_ci);
4394 : 0 : it_Vb_ci=(itf_Vb_ci-itr_Vb_ci);
4395 : 0 : it_Vci_ei=(itf_Vci_ei-itr_Vci_ei);
4396 : : #endif
4397 : 0 : it=(itf-itr);
4398 : : #if defined(_DYNAMIC)
4399 : : #if defined(_DERIVATE)
4400 : 0 : qf0_Vtnode_GND=((tf0_Vtnode_GND*itf)+(tf0*itf_Vtnode_GND));
4401 : 0 : qf0_Vbi_ci=((tf0_Vbi_ci*itf)+(tf0*itf_Vbi_ci));
4402 : 0 : qf0_Vb_ci=((tf0_Vb_ci*itf)+(tf0*itf_Vb_ci));
4403 : 0 : qf0_Vbi_ei=(tf0*itf_Vbi_ei);
4404 : 0 : qf0_Vci_ei=(tf0*itf_Vci_ei);
4405 : : #endif
4406 : 0 : qf0=(tf0*itf);
4407 : : #endif
4408 : : #if defined(_DYNAMIC)
4409 : : #if defined(_DERIVATE)
4410 : 0 : a_Vci_ei=(-((ick_Vci_ei*itf-ick*itf_Vci_ei)/itf/itf));
4411 : 0 : a_Vbi_ei=(-(-ick*itf_Vbi_ei/itf/itf));
4412 : 0 : a_Vbi_ci=(-(-ick*itf_Vbi_ci/itf/itf));
4413 : 0 : a_Vb_ci=(-(-ick*itf_Vb_ci/itf/itf));
4414 : 0 : a_Vtnode_GND=(-((ick_Vtnode_GND*itf-ick*itf_Vtnode_GND)/itf/itf));
4415 : : #endif
4416 : 0 : a=(1-(ick/itf));
4417 : : #endif
4418 : : #if defined(_DYNAMIC)
4419 : : {
4420 : 0 : double m00_sqrt(d00_sqrt0,((a*a)+ahc))
4421 : : #if defined(_DERIVATE)
4422 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((a*a)+ahc))
4423 : : #endif
4424 : : #if defined(_DERIVATE)
4425 : 0 : s3_Vci_ei=((a_Vci_ei*a)+(a*a_Vci_ei))*d10_sqrt0;
4426 : 0 : s3_Vbi_ei=((a_Vbi_ei*a)+(a*a_Vbi_ei))*d10_sqrt0;
4427 : 0 : s3_Vbi_ci=((a_Vbi_ci*a)+(a*a_Vbi_ci))*d10_sqrt0;
4428 : 0 : s3_Vb_ci=((a_Vb_ci*a)+(a*a_Vb_ci))*d10_sqrt0;
4429 : 0 : s3_Vtnode_GND=((a_Vtnode_GND*a)+(a*a_Vtnode_GND))*d10_sqrt0;
4430 : : #endif
4431 : 0 : s3=d00_sqrt0;
4432 : : }
4433 : : #endif
4434 : : #if defined(_DYNAMIC)
4435 : : {
4436 : 0 : double m00_sqrt(d00_sqrt0,(1+ahc))
4437 : : #if defined(_DERIVATE)
4438 : 0 : w_Vci_ei=((a_Vci_ei+s3_Vci_ei)/(1+d00_sqrt0));
4439 : 0 : w_Vbi_ei=((a_Vbi_ei+s3_Vbi_ei)/(1+d00_sqrt0));
4440 : 0 : w_Vbi_ci=((a_Vbi_ci+s3_Vbi_ci)/(1+d00_sqrt0));
4441 : 0 : w_Vb_ci=((a_Vb_ci+s3_Vb_ci)/(1+d00_sqrt0));
4442 : 0 : w_Vtnode_GND=((a_Vtnode_GND+s3_Vtnode_GND)/(1+d00_sqrt0));
4443 : : #endif
4444 : 0 : w=((a+s3)/(1+d00_sqrt0));
4445 : : }
4446 : : #endif
4447 : : #if defined(_DYNAMIC)
4448 : : #if defined(_DERIVATE)
4449 : 0 : tww_Vtnode_GND=((((thcs_t_Vtnode_GND*w)+(thcs_t*w_Vtnode_GND))*w)+((thcs_t*w)*w_Vtnode_GND));
4450 : 0 : tww_Vci_ei=(((thcs_t*w_Vci_ei)*w)+((thcs_t*w)*w_Vci_ei));
4451 : 0 : tww_Vbi_ei=(((thcs_t*w_Vbi_ei)*w)+((thcs_t*w)*w_Vbi_ei));
4452 : 0 : tww_Vbi_ci=(((thcs_t*w_Vbi_ci)*w)+((thcs_t*w)*w_Vbi_ci));
4453 : 0 : tww_Vb_ci=(((thcs_t*w_Vb_ci)*w)+((thcs_t*w)*w_Vb_ci));
4454 : : #endif
4455 : 0 : tww=((thcs_t*w)*w);
4456 : : #endif
4457 : : #if defined(_DYNAMIC)
4458 : : #if defined(_DERIVATE)
4459 : 0 : dqfh_Vtnode_GND=((tww_Vtnode_GND*itf)+(tww*itf_Vtnode_GND));
4460 : 0 : dqfh_Vci_ei=((tww_Vci_ei*itf)+(tww*itf_Vci_ei));
4461 : 0 : dqfh_Vbi_ei=((tww_Vbi_ei*itf)+(tww*itf_Vbi_ei));
4462 : 0 : dqfh_Vbi_ci=((tww_Vbi_ci*itf)+(tww*itf_Vbi_ci));
4463 : 0 : dqfh_Vb_ci=((tww_Vb_ci*itf)+(tww*itf_Vb_ci));
4464 : : #endif
4465 : 0 : dqfh=(tww*itf);
4466 : : #endif
4467 : : #if defined(_DYNAMIC)
4468 : 0 : dtfh=(tww*(1+(((2*ick)/itf)/s3)));
4469 : : #endif
4470 : : #if defined(_DYNAMIC)
4471 : : {
4472 : 0 : double m00_logE(d00_logE0,(itf/ick))
4473 : 0 : double m00_exp(d00_exp1,(gte*d00_logE0))
4474 : : #if defined(_DERIVATE)
4475 : 0 : double m10_logE(d10_logE0,d00_logE0,(itf/ick))
4476 : : #define d10_exp1 d00_exp1
4477 : : #endif
4478 : : #if defined(_DERIVATE)
4479 : 0 : dtef_Vtnode_GND=((tef0_t_Vtnode_GND*d00_exp1)+(tef0_t*(gte*((itf_Vtnode_GND*ick-itf*ick_Vtnode_GND)/ick/ick)*d10_logE0)*d10_exp1));
4480 : 0 : dtef_Vbi_ei=(tef0_t*(gte*(itf_Vbi_ei/ick)*d10_logE0)*d10_exp1);
4481 : 0 : dtef_Vbi_ci=(tef0_t*(gte*(itf_Vbi_ci/ick)*d10_logE0)*d10_exp1);
4482 : 0 : dtef_Vb_ci=(tef0_t*(gte*(itf_Vb_ci/ick)*d10_logE0)*d10_exp1);
4483 : 0 : dtef_Vci_ei=(tef0_t*(gte*((itf_Vci_ei*ick-itf*ick_Vci_ei)/ick/ick)*d10_logE0)*d10_exp1);
4484 : : #endif
4485 : 0 : dtef=(tef0_t*d00_exp1);
4486 : : }
4487 : : #endif
4488 : : #if defined(_DYNAMIC)
4489 : : #if defined(_DERIVATE)
4490 : 0 : dqef_Vtnode_GND=(((dtef_Vtnode_GND*itf)+(dtef*itf_Vtnode_GND))/(gte+1.0));
4491 : 0 : dqef_Vbi_ei=(((dtef_Vbi_ei*itf)+(dtef*itf_Vbi_ei))/(gte+1.0));
4492 : 0 : dqef_Vbi_ci=(((dtef_Vbi_ci*itf)+(dtef*itf_Vbi_ci))/(gte+1.0));
4493 : 0 : dqef_Vb_ci=(((dtef_Vb_ci*itf)+(dtef*itf_Vb_ci))/(gte+1.0));
4494 : 0 : dqef_Vci_ei=(((dtef_Vci_ei*itf)+(dtef*itf_Vci_ei))/(gte+1.0));
4495 : : #endif
4496 : 0 : dqef=((dtef*itf)/(gte+1.0));
4497 : : #endif
4498 : : #if defined(_DYNAMIC)
4499 : : #if defined(_DERIVATE)
4500 : 0 : qf_Vtnode_GND=((qf0_Vtnode_GND+dqef_Vtnode_GND)+dqfh_Vtnode_GND);
4501 : 0 : qf_Vbi_ci=((qf0_Vbi_ci+dqef_Vbi_ci)+dqfh_Vbi_ci);
4502 : 0 : qf_Vb_ci=((qf0_Vb_ci+dqef_Vb_ci)+dqfh_Vb_ci);
4503 : 0 : qf_Vbi_ei=((qf0_Vbi_ei+dqef_Vbi_ei)+dqfh_Vbi_ei);
4504 : 0 : qf_Vci_ei=((qf0_Vci_ei+dqef_Vci_ei)+dqfh_Vci_ei);
4505 : : #endif
4506 : 0 : qf=((qf0+dqef)+dqfh);
4507 : : #endif
4508 : : #if defined(_DYNAMIC)
4509 : 0 : tf=((tf0+dtfh)+dtef);
4510 : : #endif
4511 : : #if defined(_DYNAMIC)
4512 : : #if defined(_DERIVATE)
4513 : 0 : qr_Vtnode_GND=(tr*itr_Vtnode_GND);
4514 : 0 : qr_Vbi_ci=(tr*itr_Vbi_ci);
4515 : 0 : qr_Vb_ci=(tr*itr_Vb_ci);
4516 : 0 : qr_Vbi_ei=(tr*itr_Vbi_ei);
4517 : 0 : qr_Vci_ei=(tr*itr_Vci_ei);
4518 : : #endif
4519 : 0 : qr=(tr*itr);
4520 : : #endif
4521 : : #if defined(_DERIVATE)
4522 : 0 : DIOY_Vs_ci=0.0;
4523 : 0 : DIOY_Vbi_ci=0.0;
4524 : 0 : DIOY_Vbi_ei=(Vbiei_Vbi_ei/(mbe*VT));
4525 : 0 : DIOY_Vtnode_GND=(-Vbiei*(mbe*VT_Vtnode_GND)/(mbe*VT)/(mbe*VT));
4526 : : #endif
4527 : 0 : DIOY=(Vbiei/(mbe*VT));
4528 [ # # ]: 0 : if
4529 : : (ibes>0.0)
4530 : : {
4531 [ # # ]: 0 : if
4532 : : (DIOY>80)
4533 : : {
4534 : : #if defined(_DERIVATE)
4535 : 0 : le_Vs_ci=0.0;
4536 : 0 : le_Vbi_ci=0.0;
4537 : 0 : le_Vbi_ei=DIOY_Vbi_ei;
4538 : 0 : le_Vtnode_GND=DIOY_Vtnode_GND;
4539 : : #endif
4540 : 0 : le=(1+(DIOY-80));
4541 : : #if defined(_DERIVATE)
4542 : 0 : DIOY_Vs_ci=0.0;
4543 : 0 : DIOY_Vbi_ci=0.0;
4544 : 0 : DIOY_Vbi_ei=0.0;
4545 : 0 : DIOY_Vtnode_GND=0.0;
4546 : : #endif
4547 : 0 : DIOY=80;
4548 : : }
4549 : : else
4550 : : {
4551 : : #if defined(_DERIVATE)
4552 : 0 : le_Vs_ci=0.0;
4553 : 0 : le_Vbi_ci=0.0;
4554 : 0 : le_Vbi_ei=0.0;
4555 : 0 : le_Vtnode_GND=0.0;
4556 : : #endif
4557 : 0 : le=1;
4558 : : }
4559 : : {
4560 [ # # ]: 0 : double m00_limexp(d00_limexp0,DIOY)
4561 : : #if defined(_DERIVATE)
4562 [ # # ]: 0 : double m10_limexp(d10_limexp0,d00_limexp0,DIOY)
4563 : : #endif
4564 : : #if defined(_DERIVATE)
4565 : 0 : le_Vs_ci=0.0;
4566 : 0 : le_Vbi_ci=0.0;
4567 : 0 : le_Vbi_ei=((le_Vbi_ei*d00_limexp0)+(le*DIOY_Vbi_ei*d10_limexp0));
4568 : 0 : le_Vtnode_GND=((le_Vtnode_GND*d00_limexp0)+(le*DIOY_Vtnode_GND*d10_limexp0));
4569 : : #endif
4570 : 0 : le=(le*d00_limexp0);
4571 : : }
4572 : : #if defined(_DERIVATE)
4573 : 0 : ibe_Vtnode_GND=((ibes_t_Vtnode_GND*(le-1.0))+(ibes_t*le_Vtnode_GND));
4574 : 0 : ibe_Vbi_ei=(ibes_t*le_Vbi_ei);
4575 : : #endif
4576 : 0 : ibe=(ibes_t*(le-1.0));
4577 [ # # ]: 0 : if
4578 : : (DIOY<=(-14.0))
4579 : : {
4580 : : #if defined(_DERIVATE)
4581 : 0 : ibe_Vtnode_GND=(-ibes_t_Vtnode_GND);
4582 : 0 : ibe_Vbi_ei=0.0;
4583 : : #endif
4584 : 0 : ibe=(-ibes_t);
4585 : : }
4586 : : }
4587 : : else
4588 : : {
4589 : : #if defined(_DERIVATE)
4590 : 0 : ibe_Vtnode_GND=0.0;
4591 : 0 : ibe_Vbi_ei=0.0;
4592 : : #endif
4593 : 0 : ibe=0.0;
4594 : : }
4595 : : #if defined(_DERIVATE)
4596 : 0 : DIOY_Vs_ci=0.0;
4597 : 0 : DIOY_Vbi_ci=0.0;
4598 : 0 : DIOY_Vbi_ei=(Vbiei_Vbi_ei/(mre*VT));
4599 : 0 : DIOY_Vtnode_GND=(-Vbiei*(mre*VT_Vtnode_GND)/(mre*VT)/(mre*VT));
4600 : : #endif
4601 : 0 : DIOY=(Vbiei/(mre*VT));
4602 [ # # ]: 0 : if
4603 : : (ires>0.0)
4604 : : {
4605 [ # # ]: 0 : if
4606 : : (DIOY>80)
4607 : : {
4608 : : #if defined(_DERIVATE)
4609 : 0 : le_Vs_ci=0.0;
4610 : 0 : le_Vbi_ci=0.0;
4611 : 0 : le_Vbi_ei=DIOY_Vbi_ei;
4612 : 0 : le_Vtnode_GND=DIOY_Vtnode_GND;
4613 : : #endif
4614 : 0 : le=(1+(DIOY-80));
4615 : : #if defined(_DERIVATE)
4616 : 0 : DIOY_Vs_ci=0.0;
4617 : 0 : DIOY_Vbi_ci=0.0;
4618 : 0 : DIOY_Vbi_ei=0.0;
4619 : 0 : DIOY_Vtnode_GND=0.0;
4620 : : #endif
4621 : 0 : DIOY=80;
4622 : : }
4623 : : else
4624 : : {
4625 : : #if defined(_DERIVATE)
4626 : 0 : le_Vs_ci=0.0;
4627 : 0 : le_Vbi_ci=0.0;
4628 : 0 : le_Vbi_ei=0.0;
4629 : 0 : le_Vtnode_GND=0.0;
4630 : : #endif
4631 : 0 : le=1;
4632 : : }
4633 : : {
4634 [ # # ]: 0 : double m00_limexp(d00_limexp0,DIOY)
4635 : : #if defined(_DERIVATE)
4636 [ # # ]: 0 : double m10_limexp(d10_limexp0,d00_limexp0,DIOY)
4637 : : #endif
4638 : : #if defined(_DERIVATE)
4639 : 0 : le_Vs_ci=0.0;
4640 : 0 : le_Vbi_ci=0.0;
4641 : 0 : le_Vbi_ei=((le_Vbi_ei*d00_limexp0)+(le*DIOY_Vbi_ei*d10_limexp0));
4642 : 0 : le_Vtnode_GND=((le_Vtnode_GND*d00_limexp0)+(le*DIOY_Vtnode_GND*d10_limexp0));
4643 : : #endif
4644 : 0 : le=(le*d00_limexp0);
4645 : : }
4646 : : #if defined(_DERIVATE)
4647 : 0 : ire_Vtnode_GND=((ires_t_Vtnode_GND*(le-1.0))+(ires_t*le_Vtnode_GND));
4648 : 0 : ire_Vbi_ei=(ires_t*le_Vbi_ei);
4649 : : #endif
4650 : 0 : ire=(ires_t*(le-1.0));
4651 [ # # ]: 0 : if
4652 : : (DIOY<=(-14.0))
4653 : : {
4654 : : #if defined(_DERIVATE)
4655 : 0 : ire_Vtnode_GND=(-ires_t_Vtnode_GND);
4656 : 0 : ire_Vbi_ei=0.0;
4657 : : #endif
4658 : 0 : ire=(-ires_t);
4659 : : }
4660 : : }
4661 : : else
4662 : : {
4663 : : #if defined(_DERIVATE)
4664 : 0 : ire_Vtnode_GND=0.0;
4665 : 0 : ire_Vbi_ei=0.0;
4666 : : #endif
4667 : 0 : ire=0.0;
4668 : : }
4669 : : #if defined(_DERIVATE)
4670 : 0 : ijbe_Vtnode_GND=(ibe_Vtnode_GND+ire_Vtnode_GND);
4671 : 0 : ijbe_Vbi_ei=(ibe_Vbi_ei+ire_Vbi_ei);
4672 : : #endif
4673 : 0 : ijbe=(ibe+ire);
4674 : : #if defined(_DERIVATE)
4675 : 0 : DIOY_Vs_ci=0.0;
4676 : 0 : DIOY_Vbi_ci=(Vbici_Vbi_ci/(mbc*VT));
4677 : 0 : DIOY_Vbi_ei=0.0;
4678 : 0 : DIOY_Vtnode_GND=(-Vbici*(mbc*VT_Vtnode_GND)/(mbc*VT)/(mbc*VT));
4679 : : #endif
4680 : 0 : DIOY=(Vbici/(mbc*VT));
4681 [ # # ]: 0 : if
4682 : : (ibcs>0.0)
4683 : : {
4684 [ # # ]: 0 : if
4685 : : (DIOY>80)
4686 : : {
4687 : : #if defined(_DERIVATE)
4688 : 0 : le_Vs_ci=0.0;
4689 : 0 : le_Vbi_ci=DIOY_Vbi_ci;
4690 : 0 : le_Vbi_ei=DIOY_Vbi_ei;
4691 : 0 : le_Vtnode_GND=DIOY_Vtnode_GND;
4692 : : #endif
4693 : 0 : le=(1+(DIOY-80));
4694 : : #if defined(_DERIVATE)
4695 : 0 : DIOY_Vs_ci=0.0;
4696 : 0 : DIOY_Vbi_ci=0.0;
4697 : 0 : DIOY_Vbi_ei=0.0;
4698 : 0 : DIOY_Vtnode_GND=0.0;
4699 : : #endif
4700 : 0 : DIOY=80;
4701 : : }
4702 : : else
4703 : : {
4704 : : #if defined(_DERIVATE)
4705 : 0 : le_Vs_ci=0.0;
4706 : 0 : le_Vbi_ci=0.0;
4707 : 0 : le_Vbi_ei=0.0;
4708 : 0 : le_Vtnode_GND=0.0;
4709 : : #endif
4710 : 0 : le=1;
4711 : : }
4712 : : {
4713 [ # # ]: 0 : double m00_limexp(d00_limexp0,DIOY)
4714 : : #if defined(_DERIVATE)
4715 [ # # ]: 0 : double m10_limexp(d10_limexp0,d00_limexp0,DIOY)
4716 : : #endif
4717 : : #if defined(_DERIVATE)
4718 : 0 : le_Vs_ci=0.0;
4719 : 0 : le_Vbi_ci=((le_Vbi_ci*d00_limexp0)+(le*DIOY_Vbi_ci*d10_limexp0));
4720 : 0 : le_Vbi_ei=((le_Vbi_ei*d00_limexp0)+(le*DIOY_Vbi_ei*d10_limexp0));
4721 : 0 : le_Vtnode_GND=((le_Vtnode_GND*d00_limexp0)+(le*DIOY_Vtnode_GND*d10_limexp0));
4722 : : #endif
4723 : 0 : le=(le*d00_limexp0);
4724 : : }
4725 : : #if defined(_DERIVATE)
4726 : 0 : ijbc_Vtnode_GND=((ibcs_t_Vtnode_GND*(le-1.0))+(ibcs_t*le_Vtnode_GND));
4727 : 0 : ijbc_Vbi_ci=(ibcs_t*le_Vbi_ci);
4728 : 0 : ijbc_Vbi_ei=(ibcs_t*le_Vbi_ei);
4729 : : #endif
4730 : 0 : ijbc=(ibcs_t*(le-1.0));
4731 [ # # ]: 0 : if
4732 : : (DIOY<=(-14.0))
4733 : : {
4734 : : #if defined(_DERIVATE)
4735 : 0 : ijbc_Vtnode_GND=(-ibcs_t_Vtnode_GND);
4736 : 0 : ijbc_Vbi_ci=0.0;
4737 : 0 : ijbc_Vbi_ei=0.0;
4738 : : #endif
4739 : 0 : ijbc=(-ibcs_t);
4740 : : }
4741 : : }
4742 : : else
4743 : : {
4744 : : #if defined(_DERIVATE)
4745 : 0 : ijbc_Vtnode_GND=0.0;
4746 : 0 : ijbc_Vbi_ci=0.0;
4747 : 0 : ijbc_Vbi_ei=0.0;
4748 : : #endif
4749 : 0 : ijbc=0.0;
4750 : : }
4751 : : #if defined(_DERIVATE)
4752 : 0 : ibi_Vtnode_GND=(ijbe_Vtnode_GND+ijbc_Vtnode_GND);
4753 : 0 : ibi_Vbi_ei=(ijbe_Vbi_ei+ijbc_Vbi_ei);
4754 : 0 : ibi_Vbi_ci=ijbc_Vbi_ci;
4755 : : #endif
4756 : 0 : ibi=(ijbe+ijbc);
4757 [ # # ]: 0 : if
4758 : : (Vbici<0)
4759 : : {
4760 : : #if defined(_DERIVATE)
4761 : 0 : v_bord_Vtnode_GND=((eavl_t_Vtnode_GND*vdci_t)+(eavl_t*vdci_t_Vtnode_GND));
4762 : : #endif
4763 : 0 : v_bord=(eavl_t*vdci_t);
4764 [ # # ]: 0 : if
4765 : : ((vdci_t-Vbici)>v_bord)
4766 : : {
4767 : : {
4768 : 0 : double m00_exp(d00_exp0,(-cc))
4769 : : #if defined(_DERIVATE)
4770 : : #define d10_exp0 d00_exp0
4771 : : #endif
4772 : : #if defined(_DERIVATE)
4773 : 0 : a_iavl_Vtnode_GND=((((kavl_t_Vtnode_GND*vdci_t-kavl_t*vdci_t_Vtnode_GND)/vdci_t/vdci_t)*d00_exp0)+((kavl_t/vdci_t)*(-cc_Vtnode_GND)*d10_exp0));
4774 : 0 : a_iavl_Vbi_ci=((kavl_t/vdci_t)*(-cc_Vbi_ci)*d10_exp0);
4775 : 0 : a_iavl_Vb_ci=((kavl_t/vdci_t)*(-cc_Vb_ci)*d10_exp0);
4776 : : #endif
4777 : 0 : a_iavl=((kavl_t/vdci_t)*d00_exp0);
4778 : : }
4779 : : #if defined(_DERIVATE)
4780 : 0 : iavl_Vtnode_GND=((((itf_Vtnode_GND*a_iavl)+(itf*a_iavl_Vtnode_GND))*(v_bord+((1+cc)*((vdci_t-Vbici)-v_bord))))+((itf*a_iavl)*(v_bord_Vtnode_GND+((cc_Vtnode_GND*((vdci_t-Vbici)-v_bord))+((1+cc)*(vdci_t_Vtnode_GND-v_bord_Vtnode_GND))))));
4781 : 0 : iavl_Vbi_ei=itf_Vbi_ei*a_iavl*(v_bord+((1+cc)*((vdci_t-Vbici)-v_bord)));
4782 : 0 : iavl_Vbi_ci=((((itf_Vbi_ci*a_iavl)+(itf*a_iavl_Vbi_ci))*(v_bord+((1+cc)*((vdci_t-Vbici)-v_bord))))+((itf*a_iavl)*((cc_Vbi_ci*((vdci_t-Vbici)-v_bord))+((1+cc)*(-Vbici_Vbi_ci)))));
4783 : 0 : iavl_Vb_ci=((((itf_Vb_ci*a_iavl)+(itf*a_iavl_Vb_ci))*(v_bord+((1+cc)*((vdci_t-Vbici)-v_bord))))+((itf*a_iavl)*cc_Vb_ci*((vdci_t-Vbici)-v_bord)));
4784 : 0 : iavl_Vci_ei=itf_Vci_ei*a_iavl*(v_bord+((1+cc)*((vdci_t-Vbici)-v_bord)));
4785 : : #endif
4786 : 0 : iavl=((itf*a_iavl)*(v_bord+((1+cc)*((vdci_t-Vbici)-v_bord))));
4787 : : }
4788 : : else
4789 : : {
4790 : : {
4791 : 0 : double m00_logE(d00_logE0,(1/cc))
4792 : : #if defined(_DERIVATE)
4793 : 0 : double m10_logE(d10_logE0,d00_logE0,(1/cc))
4794 : : #endif
4795 : : #if defined(_DERIVATE)
4796 : 0 : lncc_Vtnode_GND=(-1*cc_Vtnode_GND/cc/cc)*d10_logE0;
4797 : 0 : lncc_Vbi_ci=(-1*cc_Vbi_ci/cc/cc)*d10_logE0;
4798 : 0 : lncc_Vb_ci=(-1*cc_Vb_ci/cc/cc)*d10_logE0;
4799 : : #endif
4800 : 0 : lncc=d00_logE0;
4801 : : }
4802 : : {
4803 : 0 : double m00_exp(d00_exp0,(((1/zci)-1)*lncc))
4804 : 0 : double m00_exp(d00_exp1,((((-1)/zci)*lncc)-(eavl_t*d00_exp0)))
4805 : : #if defined(_DERIVATE)
4806 : : #define d10_exp0 d00_exp0
4807 : : #define d10_exp1 d00_exp1
4808 : : #endif
4809 : : #if defined(_DERIVATE)
4810 : 0 : iavl_Vtnode_GND=((((kavl_t_Vtnode_GND*itf)+(kavl_t*itf_Vtnode_GND))*d00_exp1)+((kavl_t*itf)*((((-1)/zci)*lncc_Vtnode_GND)-((eavl_t_Vtnode_GND*d00_exp0)+(eavl_t*(((1/zci)-1)*lncc_Vtnode_GND)*d10_exp0)))*d10_exp1));
4811 : 0 : iavl_Vbi_ei=(kavl_t*itf_Vbi_ei)*d00_exp1;
4812 : 0 : iavl_Vbi_ci=(((kavl_t*itf_Vbi_ci)*d00_exp1)+((kavl_t*itf)*((((-1)/zci)*lncc_Vbi_ci)-(eavl_t*(((1/zci)-1)*lncc_Vbi_ci)*d10_exp0))*d10_exp1));
4813 : 0 : iavl_Vb_ci=(((kavl_t*itf_Vb_ci)*d00_exp1)+((kavl_t*itf)*((((-1)/zci)*lncc_Vb_ci)-(eavl_t*(((1/zci)-1)*lncc_Vb_ci)*d10_exp0))*d10_exp1));
4814 : 0 : iavl_Vci_ei=(kavl_t*itf_Vci_ei)*d00_exp1;
4815 : : #endif
4816 : 0 : iavl=((kavl_t*itf)*d00_exp1);
4817 : : }
4818 : : }
4819 : : }
4820 : : else
4821 : : {
4822 : : #if defined(_DERIVATE)
4823 : 0 : iavl_Vtnode_GND=0.0;
4824 : 0 : iavl_Vbi_ei=0.0;
4825 : 0 : iavl_Vbi_ci=0.0;
4826 : 0 : iavl_Vb_ci=0.0;
4827 : 0 : iavl_Vci_ei=0.0;
4828 : : #endif
4829 : 0 : iavl=0;
4830 : : }
4831 [ # # ]: 0 : if
4832 : : (rbi0_t>0.0)
4833 : : {
4834 : : #if defined(_DERIVATE)
4835 : 0 : qje_Vtnode_GND=((qjei_Vtnode_GND*cje0_t-qjei*cje0_t_Vtnode_GND)/cje0_t/cje0_t);
4836 : 0 : qje_Vbi_ei=(qjei_Vbi_ei/cje0_t);
4837 : 0 : qje_Vbi_ci=(qjei_Vbi_ci/cje0_t);
4838 : 0 : qje_Vb_ci=(qjei_Vb_ci/cje0_t);
4839 : : #endif
4840 : 0 : qje=(qjei/cje0_t);
4841 : : #if defined(_DERIVATE)
4842 : 0 : Qz_nom_Vtnode_GND=((((qje_Vtnode_GND/vr0e)+(qjci_Vtnode_GND/vr0c))+(itf_Vtnode_GND/ickf))+(itr_Vtnode_GND/ickr));
4843 : 0 : Qz_nom_Vbi_ei=(((qje_Vbi_ei/vr0e)+(itf_Vbi_ei/ickf))+(itr_Vbi_ei/ickr));
4844 : 0 : Qz_nom_Vbi_ci=((((qje_Vbi_ci/vr0e)+(qjci_Vbi_ci/vr0c))+(itf_Vbi_ci/ickf))+(itr_Vbi_ci/ickr));
4845 : 0 : Qz_nom_Vb_ci=((((qje_Vb_ci/vr0e)+(qjci_Vb_ci/vr0c))+(itf_Vb_ci/ickf))+(itr_Vb_ci/ickr));
4846 : 0 : Qz_nom_Vci_ei=((itf_Vci_ei/ickf)+(itr_Vci_ei/ickr));
4847 : : #endif
4848 : 0 : Qz_nom=((((1+(qje/vr0e))+(qjci/vr0c))+(itf/ickf))+(itr/ickr));
4849 : : {
4850 : 0 : double m00_sqrt(d00_sqrt0,((Qz_nom*Qz_nom)+0.01))
4851 : : #if defined(_DERIVATE)
4852 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((Qz_nom*Qz_nom)+0.01))
4853 : : #endif
4854 : : #if defined(_DERIVATE)
4855 : 0 : fQz_Vtnode_GND=(0.5*(Qz_nom_Vtnode_GND+((Qz_nom_Vtnode_GND*Qz_nom)+(Qz_nom*Qz_nom_Vtnode_GND))*d10_sqrt0));
4856 : 0 : fQz_Vbi_ei=(0.5*(Qz_nom_Vbi_ei+((Qz_nom_Vbi_ei*Qz_nom)+(Qz_nom*Qz_nom_Vbi_ei))*d10_sqrt0));
4857 : 0 : fQz_Vbi_ci=(0.5*(Qz_nom_Vbi_ci+((Qz_nom_Vbi_ci*Qz_nom)+(Qz_nom*Qz_nom_Vbi_ci))*d10_sqrt0));
4858 : 0 : fQz_Vb_ci=(0.5*(Qz_nom_Vb_ci+((Qz_nom_Vb_ci*Qz_nom)+(Qz_nom*Qz_nom_Vb_ci))*d10_sqrt0));
4859 : 0 : fQz_Vci_ei=(0.5*(Qz_nom_Vci_ei+((Qz_nom_Vci_ei*Qz_nom)+(Qz_nom*Qz_nom_Vci_ei))*d10_sqrt0));
4860 : : #endif
4861 : 0 : fQz=(0.5*(Qz_nom+d00_sqrt0));
4862 : : }
4863 : : #if defined(_DERIVATE)
4864 : 0 : rbi_Vtnode_GND=((rbi0_t_Vtnode_GND*fQz-rbi0_t*fQz_Vtnode_GND)/fQz/fQz);
4865 : 0 : rbi_Vbi_ei=(-rbi0_t*fQz_Vbi_ei/fQz/fQz);
4866 : 0 : rbi_Vbi_ci=(-rbi0_t*fQz_Vbi_ci/fQz/fQz);
4867 : 0 : rbi_Vb_ci=(-rbi0_t*fQz_Vb_ci/fQz/fQz);
4868 : 0 : rbi_Vci_ei=(-rbi0_t*fQz_Vci_ei/fQz/fQz);
4869 : : #endif
4870 : 0 : rbi=(rbi0_t/fQz);
4871 [ # # ]: 0 : if
4872 : : (ibi>0.0)
4873 : : {
4874 : : #if defined(_DERIVATE)
4875 : 0 : eta_Vtnode_GND=(((((fgeo*rbi_Vtnode_GND)*ibi)+((fgeo*rbi)*ibi_Vtnode_GND))*VT-((fgeo*rbi)*ibi)*VT_Vtnode_GND)/VT/VT);
4876 : 0 : eta_Vbi_ei=((((fgeo*rbi_Vbi_ei)*ibi)+((fgeo*rbi)*ibi_Vbi_ei))/VT);
4877 : 0 : eta_Vbi_ci=((((fgeo*rbi_Vbi_ci)*ibi)+((fgeo*rbi)*ibi_Vbi_ci))/VT);
4878 : 0 : eta_Vb_ci=((fgeo*rbi_Vb_ci)*ibi/VT);
4879 : 0 : eta_Vci_ei=((fgeo*rbi_Vci_ei)*ibi/VT);
4880 : : #endif
4881 : 0 : eta=(((fgeo*rbi)*ibi)/VT);
4882 [ # # ]: 0 : if
4883 : : (eta<1e-6)
4884 : : {
4885 : : #if defined(_DERIVATE)
4886 : 0 : rbi_Vtnode_GND=((rbi_Vtnode_GND*(1-(0.5*eta)))+(rbi*(-(0.5*eta_Vtnode_GND))));
4887 : 0 : rbi_Vbi_ei=((rbi_Vbi_ei*(1-(0.5*eta)))+(rbi*(-(0.5*eta_Vbi_ei))));
4888 : 0 : rbi_Vbi_ci=((rbi_Vbi_ci*(1-(0.5*eta)))+(rbi*(-(0.5*eta_Vbi_ci))));
4889 : 0 : rbi_Vb_ci=((rbi_Vb_ci*(1-(0.5*eta)))+(rbi*(-(0.5*eta_Vb_ci))));
4890 : 0 : rbi_Vci_ei=((rbi_Vci_ei*(1-(0.5*eta)))+(rbi*(-(0.5*eta_Vci_ei))));
4891 : : #endif
4892 : 0 : rbi=(rbi*(1-(0.5*eta)));
4893 : : }
4894 : : else
4895 : : {
4896 : : {
4897 : 0 : double m00_logE(d00_logE0,(eta+1))
4898 : : #if defined(_DERIVATE)
4899 : 0 : double m10_logE(d10_logE0,d00_logE0,(eta+1))
4900 : : #endif
4901 : : #if defined(_DERIVATE)
4902 : 0 : rbi_Vtnode_GND=((((rbi_Vtnode_GND*d00_logE0)+(rbi*eta_Vtnode_GND*d10_logE0))*eta-(rbi*d00_logE0)*eta_Vtnode_GND)/eta/eta);
4903 : 0 : rbi_Vbi_ei=((((rbi_Vbi_ei*d00_logE0)+(rbi*eta_Vbi_ei*d10_logE0))*eta-(rbi*d00_logE0)*eta_Vbi_ei)/eta/eta);
4904 : 0 : rbi_Vbi_ci=((((rbi_Vbi_ci*d00_logE0)+(rbi*eta_Vbi_ci*d10_logE0))*eta-(rbi*d00_logE0)*eta_Vbi_ci)/eta/eta);
4905 : 0 : rbi_Vb_ci=((((rbi_Vb_ci*d00_logE0)+(rbi*eta_Vb_ci*d10_logE0))*eta-(rbi*d00_logE0)*eta_Vb_ci)/eta/eta);
4906 : 0 : rbi_Vci_ei=((((rbi_Vci_ei*d00_logE0)+(rbi*eta_Vci_ei*d10_logE0))*eta-(rbi*d00_logE0)*eta_Vci_ei)/eta/eta);
4907 : : #endif
4908 : 0 : rbi=((rbi*d00_logE0)/eta);
4909 : : }
4910 : : }
4911 : : }
4912 : : }
4913 : : else
4914 : : {
4915 : : #if defined(_DERIVATE)
4916 : 0 : rbi_Vtnode_GND=0.0;
4917 : 0 : rbi_Vbi_ei=0.0;
4918 : 0 : rbi_Vbi_ci=0.0;
4919 : 0 : rbi_Vb_ci=0.0;
4920 : 0 : rbi_Vci_ei=0.0;
4921 : : #endif
4922 : 0 : rbi=0.0;
4923 : : }
4924 : : #if defined(_DERIVATE)
4925 : 0 : rb_Vtnode_GND=(rbi_Vtnode_GND+rbx_t_Vtnode_GND);
4926 : 0 : rb_Vbi_ei=rbi_Vbi_ei;
4927 : 0 : rb_Vbi_ci=rbi_Vbi_ci;
4928 : 0 : rb_Vb_ci=rbi_Vb_ci;
4929 : 0 : rb_Vci_ei=rbi_Vci_ei;
4930 : : #endif
4931 : 0 : rb=(rbi+rbx_t);
4932 [ # # ]: 0 : if
4933 : : (itss>0.0)
4934 : : {
4935 : : #if defined(_DERIVATE)
4936 : 0 : HSUM_Vtnode_GND=(msf*VT_Vtnode_GND);
4937 : : #endif
4938 : 0 : HSUM=(msf*VT);
4939 : : {
4940 [ # # ]: 0 : double m00_limexp(d00_limexp0,(Vbci/HSUM))
4941 : : #if defined(_DERIVATE)
4942 [ # # ]: 0 : double m10_limexp(d10_limexp0,d00_limexp0,(Vbci/HSUM))
4943 : : #endif
4944 : : #if defined(_DERIVATE)
4945 : 0 : HSa_Vb_ci=(Vbci_Vb_ci/HSUM)*d10_limexp0;
4946 : 0 : HSa_Vtnode_GND=(-Vbci*HSUM_Vtnode_GND/HSUM/HSUM)*d10_limexp0;
4947 : : #endif
4948 : 0 : HSa=d00_limexp0;
4949 : : }
4950 : : {
4951 [ # # ]: 0 : double m00_limexp(d00_limexp0,(Vsci/HSUM))
4952 : : #if defined(_DERIVATE)
4953 [ # # ]: 0 : double m10_limexp(d10_limexp0,d00_limexp0,(Vsci/HSUM))
4954 : : #endif
4955 : : #if defined(_DERIVATE)
4956 : 0 : HSb_Vs_ci=(Vsci_Vs_ci/HSUM)*d10_limexp0;
4957 : 0 : HSb_Vtnode_GND=(-Vsci*HSUM_Vtnode_GND/HSUM/HSUM)*d10_limexp0;
4958 : : #endif
4959 : 0 : HSb=d00_limexp0;
4960 : : }
4961 : : #if defined(_DERIVATE)
4962 : 0 : HSI_Tsu_Vtnode_GND=((itss_t_Vtnode_GND*(HSa-HSb))+(itss_t*(HSa_Vtnode_GND-HSb_Vtnode_GND)));
4963 : 0 : HSI_Tsu_Vb_ci=(itss_t*HSa_Vb_ci);
4964 : 0 : HSI_Tsu_Vs_ci=(itss_t*(-HSb_Vs_ci));
4965 : : #endif
4966 : 0 : HSI_Tsu=(itss_t*(HSa-HSb));
4967 : : }
4968 : : else
4969 : : {
4970 : : #if defined(_DERIVATE)
4971 : 0 : HSI_Tsu_Vtnode_GND=0.0;
4972 : 0 : HSI_Tsu_Vb_ci=0.0;
4973 : 0 : HSI_Tsu_Vs_ci=0.0;
4974 : : #endif
4975 : 0 : HSI_Tsu=0.0;
4976 : : }
4977 : : #if defined(_DERIVATE)
4978 : 0 : DIOY_Vs_ci=(Vsci_Vs_ci/(msc*VT));
4979 : 0 : DIOY_Vbi_ci=0.0;
4980 : 0 : DIOY_Vbi_ei=0.0;
4981 : 0 : DIOY_Vtnode_GND=(-Vsci*(msc*VT_Vtnode_GND)/(msc*VT)/(msc*VT));
4982 : : #endif
4983 : 0 : DIOY=(Vsci/(msc*VT));
4984 [ # # ]: 0 : if
4985 : : (iscs>0.0)
4986 : : {
4987 [ # # ]: 0 : if
4988 : : (DIOY>80)
4989 : : {
4990 : : #if defined(_DERIVATE)
4991 : 0 : le_Vs_ci=DIOY_Vs_ci;
4992 : 0 : le_Vbi_ci=DIOY_Vbi_ci;
4993 : 0 : le_Vbi_ei=DIOY_Vbi_ei;
4994 : 0 : le_Vtnode_GND=DIOY_Vtnode_GND;
4995 : : #endif
4996 : 0 : le=(1+(DIOY-80));
4997 : : #if defined(_DERIVATE)
4998 : 0 : DIOY_Vs_ci=0.0;
4999 : 0 : DIOY_Vbi_ci=0.0;
5000 : 0 : DIOY_Vbi_ei=0.0;
5001 : 0 : DIOY_Vtnode_GND=0.0;
5002 : : #endif
5003 : 0 : DIOY=80;
5004 : : }
5005 : : else
5006 : : {
5007 : : #if defined(_DERIVATE)
5008 : 0 : le_Vs_ci=0.0;
5009 : 0 : le_Vbi_ci=0.0;
5010 : 0 : le_Vbi_ei=0.0;
5011 : 0 : le_Vtnode_GND=0.0;
5012 : : #endif
5013 : 0 : le=1;
5014 : : }
5015 : : {
5016 [ # # ]: 0 : double m00_limexp(d00_limexp0,DIOY)
5017 : : #if defined(_DERIVATE)
5018 [ # # ]: 0 : double m10_limexp(d10_limexp0,d00_limexp0,DIOY)
5019 : : #endif
5020 : : #if defined(_DERIVATE)
5021 : 0 : le_Vs_ci=((le_Vs_ci*d00_limexp0)+(le*DIOY_Vs_ci*d10_limexp0));
5022 : 0 : le_Vbi_ci=((le_Vbi_ci*d00_limexp0)+(le*DIOY_Vbi_ci*d10_limexp0));
5023 : 0 : le_Vbi_ei=((le_Vbi_ei*d00_limexp0)+(le*DIOY_Vbi_ei*d10_limexp0));
5024 : 0 : le_Vtnode_GND=((le_Vtnode_GND*d00_limexp0)+(le*DIOY_Vtnode_GND*d10_limexp0));
5025 : : #endif
5026 : 0 : le=(le*d00_limexp0);
5027 : : }
5028 : : #if defined(_DERIVATE)
5029 : 0 : ijsc_Vtnode_GND=((iscs_t_Vtnode_GND*(le-1.0))+(iscs_t*le_Vtnode_GND));
5030 : 0 : ijsc_Vs_ci=(iscs_t*le_Vs_ci);
5031 : 0 : ijsc_Vbi_ci=(iscs_t*le_Vbi_ci);
5032 : 0 : ijsc_Vbi_ei=(iscs_t*le_Vbi_ei);
5033 : : #endif
5034 : 0 : ijsc=(iscs_t*(le-1.0));
5035 [ # # ]: 0 : if
5036 : : (DIOY<=(-14.0))
5037 : : {
5038 : : #if defined(_DERIVATE)
5039 : 0 : ijsc_Vtnode_GND=(-iscs_t_Vtnode_GND);
5040 : 0 : ijsc_Vs_ci=0.0;
5041 : 0 : ijsc_Vbi_ci=0.0;
5042 : 0 : ijsc_Vbi_ei=0.0;
5043 : : #endif
5044 : 0 : ijsc=(-iscs_t);
5045 : : }
5046 : : }
5047 : : else
5048 : : {
5049 : : #if defined(_DERIVATE)
5050 : 0 : ijsc_Vtnode_GND=0.0;
5051 : 0 : ijsc_Vs_ci=0.0;
5052 : 0 : ijsc_Vbi_ci=0.0;
5053 : 0 : ijsc_Vbi_ei=0.0;
5054 : : #endif
5055 : 0 : ijsc=0.0;
5056 : : }
5057 : : #ifdef _DYNAMIC
5058 [ # # ]: 0 : if
5059 : : (vpts<1.0e2)
5060 : : {
5061 : : #ifdef _DYNAMIC
5062 [ # # ]: 0 : if
5063 : : (cjs0_t>0.0)
5064 : : {
5065 : : #if defined(_DYNAMIC)
5066 : 0 : zr=(zs/4.0);
5067 : : #endif
5068 : : #if defined(_DYNAMIC)
5069 : : #if defined(_DERIVATE)
5070 : 0 : vp_Vtnode_GND=(-vds_t_Vtnode_GND);
5071 : : #endif
5072 : 0 : vp=(vpts-vds_t);
5073 : : #endif
5074 : : #if defined(_DYNAMIC)
5075 : : {
5076 : 0 : double m00_logE(d00_logE0,2.4)
5077 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zs))
5078 : : #if defined(_DERIVATE)
5079 : 0 : vf_Vtnode_GND=vds_t_Vtnode_GND*(1.0-d00_exp1);
5080 : : #endif
5081 : 0 : vf=(vds_t*(1.0-d00_exp1));
5082 : : }
5083 : : #endif
5084 : : #if defined(_DYNAMIC)
5085 : : #if defined(_DERIVATE)
5086 : 0 : cmax_Vtnode_GND=(2.4*cjs0_t_Vtnode_GND);
5087 : : #endif
5088 : 0 : cmax=(2.4*cjs0_t);
5089 : : #endif
5090 : : #if defined(_DYNAMIC)
5091 : : {
5092 : 0 : double m00_logE(d00_logE0,(vds_t/vpts))
5093 : 0 : double m00_exp(d00_exp1,((zs-zr)*d00_logE0))
5094 : : #if defined(_DERIVATE)
5095 : 0 : double m10_logE(d10_logE0,d00_logE0,(vds_t/vpts))
5096 : : #define d10_exp1 d00_exp1
5097 : : #endif
5098 : : #if defined(_DERIVATE)
5099 : 0 : cr_Vtnode_GND=((cjs0_t_Vtnode_GND*d00_exp1)+(cjs0_t*((zs-zr)*(vds_t_Vtnode_GND/vpts)*d10_logE0)*d10_exp1));
5100 : : #endif
5101 : 0 : cr=(cjs0_t*d00_exp1);
5102 : : }
5103 : : #endif
5104 : : #if defined(_DYNAMIC)
5105 : : #if defined(_DERIVATE)
5106 : 0 : a_Vci_ei=0.0;
5107 : 0 : a_Vbi_ei=0.0;
5108 : 0 : a_Vbi_ci=0.0;
5109 : 0 : a_Vb_ci=0.0;
5110 : 0 : a_Vtnode_GND=VT_Vtnode_GND;
5111 : : #endif
5112 : 0 : a=VT;
5113 : : #endif
5114 : : #if defined(_DYNAMIC)
5115 : : #if defined(_DERIVATE)
5116 : 0 : ve_Vs_ci=((-Vsci_Vs_ci)/a);
5117 : 0 : ve_Vci_ei=(-(vf-Vsci)*a_Vci_ei/a/a);
5118 : 0 : ve_Vbi_ei=(-(vf-Vsci)*a_Vbi_ei/a/a);
5119 : 0 : ve_Vbi_ci=(-(vf-Vsci)*a_Vbi_ci/a/a);
5120 : 0 : ve_Vtnode_GND=((vf_Vtnode_GND*a-(vf-Vsci)*a_Vtnode_GND)/a/a);
5121 : 0 : ve_Vb_ci=(-(vf-Vsci)*a_Vb_ci/a/a);
5122 : : #endif
5123 : 0 : ve=((vf-Vsci)/a);
5124 : : #endif
5125 : : #ifdef _DYNAMIC
5126 [ # # ]: 0 : if
5127 : : (ve<=80.0)
5128 : : {
5129 : : #if defined(_DYNAMIC)
5130 : : {
5131 : 0 : double m00_exp(d00_exp0,ve)
5132 : : #if defined(_DERIVATE)
5133 : : #define d10_exp0 d00_exp0
5134 : : #endif
5135 : : #if defined(_DERIVATE)
5136 : 0 : ex1_Vs_ci=ve_Vs_ci*d10_exp0;
5137 : 0 : ex1_Vci_ei=ve_Vci_ei*d10_exp0;
5138 : 0 : ex1_Vbi_ei=ve_Vbi_ei*d10_exp0;
5139 : 0 : ex1_Vbi_ci=ve_Vbi_ci*d10_exp0;
5140 : 0 : ex1_Vtnode_GND=ve_Vtnode_GND*d10_exp0;
5141 : 0 : ex1_Vb_ci=ve_Vb_ci*d10_exp0;
5142 : : #endif
5143 : 0 : ex1=d00_exp0;
5144 : : }
5145 : : #endif
5146 : : #if defined(_DYNAMIC)
5147 : : #if defined(_DERIVATE)
5148 : 0 : ee1_Vs_ci=ex1_Vs_ci;
5149 : 0 : ee1_Vci_ei=ex1_Vci_ei;
5150 : 0 : ee1_Vbi_ei=ex1_Vbi_ei;
5151 : 0 : ee1_Vbi_ci=ex1_Vbi_ci;
5152 : 0 : ee1_Vtnode_GND=ex1_Vtnode_GND;
5153 : 0 : ee1_Vb_ci=ex1_Vb_ci;
5154 : : #endif
5155 : 0 : ee1=(1.0+ex1);
5156 : : #endif
5157 : : #if defined(_DYNAMIC)
5158 : : {
5159 : 0 : double m00_logE(d00_logE0,ee1)
5160 : : #if defined(_DERIVATE)
5161 : 0 : double m10_logE(d10_logE0,d00_logE0,ee1)
5162 : : #endif
5163 : : #if defined(_DERIVATE)
5164 : 0 : vj1_Vci_ei=(-((a_Vci_ei*d00_logE0)+(a*ee1_Vci_ei*d10_logE0)));
5165 : 0 : vj1_Vbi_ei=(-((a_Vbi_ei*d00_logE0)+(a*ee1_Vbi_ei*d10_logE0)));
5166 : 0 : vj1_Vs_ci=(-(a*ee1_Vs_ci*d10_logE0));
5167 : 0 : vj1_Vbi_ci=(-((a_Vbi_ci*d00_logE0)+(a*ee1_Vbi_ci*d10_logE0)));
5168 : 0 : vj1_Vtnode_GND=(vf_Vtnode_GND-((a_Vtnode_GND*d00_logE0)+(a*ee1_Vtnode_GND*d10_logE0)));
5169 : 0 : vj1_Vb_ci=(-((a_Vb_ci*d00_logE0)+(a*ee1_Vb_ci*d10_logE0)));
5170 : : #endif
5171 : 0 : vj1=(vf-(a*d00_logE0));
5172 : : }
5173 : : #endif
5174 : : }
5175 : : else
5176 : : {
5177 : : #if defined(_DYNAMIC)
5178 : : #if defined(_DERIVATE)
5179 : 0 : vj1_Vci_ei=0.0;
5180 : 0 : vj1_Vbi_ei=0.0;
5181 : 0 : vj1_Vs_ci=Vsci_Vs_ci;
5182 : 0 : vj1_Vbi_ci=0.0;
5183 : 0 : vj1_Vtnode_GND=0.0;
5184 : 0 : vj1_Vb_ci=0.0;
5185 : : #endif
5186 : 0 : vj1=Vsci;
5187 : : #endif
5188 : : }
5189 : : #endif /* if (...) */
5190 : : #if defined(_DYNAMIC)
5191 : : #if defined(_DERIVATE)
5192 : 0 : a_Vci_ei=0.0;
5193 : 0 : a_Vbi_ei=0.0;
5194 : 0 : a_Vbi_ci=0.0;
5195 : 0 : a_Vb_ci=0.0;
5196 : 0 : a_Vtnode_GND=((0.1*vp_Vtnode_GND)+(4.0*VT_Vtnode_GND));
5197 : : #endif
5198 : 0 : a=((0.1*vp)+(4.0*VT));
5199 : : #endif
5200 : : #if defined(_DYNAMIC)
5201 : : #if defined(_DERIVATE)
5202 : 0 : vr_Vci_ei=((vj1_Vci_ei*a-(vp+vj1)*a_Vci_ei)/a/a);
5203 : 0 : vr_Vbi_ei=((vj1_Vbi_ei*a-(vp+vj1)*a_Vbi_ei)/a/a);
5204 : 0 : vr_Vs_ci=(vj1_Vs_ci/a);
5205 : 0 : vr_Vbi_ci=((vj1_Vbi_ci*a-(vp+vj1)*a_Vbi_ci)/a/a);
5206 : 0 : vr_Vtnode_GND=(((vp_Vtnode_GND+vj1_Vtnode_GND)*a-(vp+vj1)*a_Vtnode_GND)/a/a);
5207 : 0 : vr_Vb_ci=((vj1_Vb_ci*a-(vp+vj1)*a_Vb_ci)/a/a);
5208 : : #endif
5209 : 0 : vr=((vp+vj1)/a);
5210 : : #endif
5211 : : #ifdef _DYNAMIC
5212 [ # # ]: 0 : if
5213 : : (vr<=80.0)
5214 : : {
5215 : : #if defined(_DYNAMIC)
5216 : : {
5217 : 0 : double m00_exp(d00_exp0,vr)
5218 : : #if defined(_DERIVATE)
5219 : : #define d10_exp0 d00_exp0
5220 : : #endif
5221 : : #if defined(_DERIVATE)
5222 : 0 : ex1_Vs_ci=vr_Vs_ci*d10_exp0;
5223 : 0 : ex1_Vci_ei=vr_Vci_ei*d10_exp0;
5224 : 0 : ex1_Vbi_ei=vr_Vbi_ei*d10_exp0;
5225 : 0 : ex1_Vbi_ci=vr_Vbi_ci*d10_exp0;
5226 : 0 : ex1_Vtnode_GND=vr_Vtnode_GND*d10_exp0;
5227 : 0 : ex1_Vb_ci=vr_Vb_ci*d10_exp0;
5228 : : #endif
5229 : 0 : ex1=d00_exp0;
5230 : : }
5231 : : #endif
5232 : : #if defined(_DYNAMIC)
5233 : : #if defined(_DERIVATE)
5234 : 0 : ee1_Vs_ci=ex1_Vs_ci;
5235 : 0 : ee1_Vci_ei=ex1_Vci_ei;
5236 : 0 : ee1_Vbi_ei=ex1_Vbi_ei;
5237 : 0 : ee1_Vbi_ci=ex1_Vbi_ci;
5238 : 0 : ee1_Vtnode_GND=ex1_Vtnode_GND;
5239 : 0 : ee1_Vb_ci=ex1_Vb_ci;
5240 : : #endif
5241 : 0 : ee1=(1.0+ex1);
5242 : : #endif
5243 : : #if defined(_DYNAMIC)
5244 : : {
5245 : 0 : double m00_logE(d00_logE0,ee1)
5246 : : #if defined(_DERIVATE)
5247 : 0 : double m10_logE(d10_logE0,d00_logE0,ee1)
5248 : : #endif
5249 : : #if defined(_DERIVATE)
5250 : 0 : vj2_Vci_ei=((a_Vci_ei*d00_logE0)+(a*ee1_Vci_ei*d10_logE0));
5251 : 0 : vj2_Vbi_ei=((a_Vbi_ei*d00_logE0)+(a*ee1_Vbi_ei*d10_logE0));
5252 : 0 : vj2_Vs_ci=(a*ee1_Vs_ci*d10_logE0);
5253 : 0 : vj2_Vbi_ci=((a_Vbi_ci*d00_logE0)+(a*ee1_Vbi_ci*d10_logE0));
5254 : 0 : vj2_Vtnode_GND=((-vp_Vtnode_GND)+((a_Vtnode_GND*d00_logE0)+(a*ee1_Vtnode_GND*d10_logE0)));
5255 : 0 : vj2_Vb_ci=((a_Vb_ci*d00_logE0)+(a*ee1_Vb_ci*d10_logE0));
5256 : : #endif
5257 : 0 : vj2=((-vp)+(a*d00_logE0));
5258 : : }
5259 : : #endif
5260 : : }
5261 : : else
5262 : : {
5263 : : #if defined(_DYNAMIC)
5264 : : #if defined(_DERIVATE)
5265 : 0 : vj2_Vci_ei=vj1_Vci_ei;
5266 : 0 : vj2_Vbi_ei=vj1_Vbi_ei;
5267 : 0 : vj2_Vs_ci=vj1_Vs_ci;
5268 : 0 : vj2_Vbi_ci=vj1_Vbi_ci;
5269 : 0 : vj2_Vtnode_GND=vj1_Vtnode_GND;
5270 : 0 : vj2_Vb_ci=vj1_Vb_ci;
5271 : : #endif
5272 : 0 : vj2=vj1;
5273 : : #endif
5274 : : }
5275 : : #endif /* if (...) */
5276 : : #if defined(_DYNAMIC)
5277 : : #if defined(_DERIVATE)
5278 : 0 : vj4_Vs_ci=(Vsci_Vs_ci-vj1_Vs_ci);
5279 : 0 : vj4_Vci_ei=(-vj1_Vci_ei);
5280 : 0 : vj4_Vbi_ei=(-vj1_Vbi_ei);
5281 : 0 : vj4_Vbi_ci=(-vj1_Vbi_ci);
5282 : 0 : vj4_Vb_ci=(-vj1_Vb_ci);
5283 : 0 : vj4_Vtnode_GND=(-vj1_Vtnode_GND);
5284 : : #endif
5285 : 0 : vj4=(Vsci-vj1);
5286 : : #endif
5287 : : #if defined(_DYNAMIC)
5288 : 0 : ez=(1.0-zs);
5289 : : #endif
5290 : : #if defined(_DYNAMIC)
5291 : 0 : ezr=(1.0-zr);
5292 : : #endif
5293 : : #if defined(_DYNAMIC)
5294 : : {
5295 : 0 : double m00_logE(d00_logE0,(1.0-(vj1/vds_t)))
5296 : : #if defined(_DERIVATE)
5297 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(vj1/vds_t)))
5298 : : #endif
5299 : : #if defined(_DERIVATE)
5300 : 0 : vdj1_Vci_ei=(-(vj1_Vci_ei/vds_t))*d10_logE0;
5301 : 0 : vdj1_Vbi_ei=(-(vj1_Vbi_ei/vds_t))*d10_logE0;
5302 : 0 : vdj1_Vs_ci=(-(vj1_Vs_ci/vds_t))*d10_logE0;
5303 : 0 : vdj1_Vbi_ci=(-(vj1_Vbi_ci/vds_t))*d10_logE0;
5304 : 0 : vdj1_Vtnode_GND=(-((vj1_Vtnode_GND*vds_t-vj1*vds_t_Vtnode_GND)/vds_t/vds_t))*d10_logE0;
5305 : 0 : vdj1_Vb_ci=(-(vj1_Vb_ci/vds_t))*d10_logE0;
5306 : : #endif
5307 : 0 : vdj1=d00_logE0;
5308 : : }
5309 : : #endif
5310 : : #if defined(_DYNAMIC)
5311 : : {
5312 : 0 : double m00_logE(d00_logE0,(1.0-(vj2/vds_t)))
5313 : : #if defined(_DERIVATE)
5314 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(vj2/vds_t)))
5315 : : #endif
5316 : : #if defined(_DERIVATE)
5317 : 0 : vdj2_Vci_ei=(-(vj2_Vci_ei/vds_t))*d10_logE0;
5318 : 0 : vdj2_Vbi_ei=(-(vj2_Vbi_ei/vds_t))*d10_logE0;
5319 : 0 : vdj2_Vs_ci=(-(vj2_Vs_ci/vds_t))*d10_logE0;
5320 : 0 : vdj2_Vbi_ci=(-(vj2_Vbi_ci/vds_t))*d10_logE0;
5321 : 0 : vdj2_Vtnode_GND=(-((vj2_Vtnode_GND*vds_t-vj2*vds_t_Vtnode_GND)/vds_t/vds_t))*d10_logE0;
5322 : 0 : vdj2_Vb_ci=(-(vj2_Vb_ci/vds_t))*d10_logE0;
5323 : : #endif
5324 : 0 : vdj2=d00_logE0;
5325 : : }
5326 : : #endif
5327 : : #if defined(_DYNAMIC)
5328 : : {
5329 : 0 : double m00_exp(d00_exp0,(vdj2*ez))
5330 : : #if defined(_DERIVATE)
5331 : : #define d10_exp0 d00_exp0
5332 : : #endif
5333 : : #if defined(_DERIVATE)
5334 : 0 : qj1_Vci_ei=((cjs0_t*(-vdj2_Vci_ei*ez*d10_exp0))/ez);
5335 : 0 : qj1_Vbi_ei=((cjs0_t*(-vdj2_Vbi_ei*ez*d10_exp0))/ez);
5336 : 0 : qj1_Vs_ci=((cjs0_t*(-vdj2_Vs_ci*ez*d10_exp0))/ez);
5337 : 0 : qj1_Vbi_ci=((cjs0_t*(-vdj2_Vbi_ci*ez*d10_exp0))/ez);
5338 : 0 : qj1_Vtnode_GND=(((cjs0_t_Vtnode_GND*(1.0-d00_exp0))+(cjs0_t*(-vdj2_Vtnode_GND*ez*d10_exp0)))/ez);
5339 : 0 : qj1_Vb_ci=((cjs0_t*(-vdj2_Vb_ci*ez*d10_exp0))/ez);
5340 : : #endif
5341 : 0 : qj1=((cjs0_t*(1.0-d00_exp0))/ez);
5342 : : }
5343 : : #endif
5344 : : #if defined(_DYNAMIC)
5345 : : {
5346 : 0 : double m00_exp(d00_exp0,(vdj1*ezr))
5347 : : #if defined(_DERIVATE)
5348 : : #define d10_exp0 d00_exp0
5349 : : #endif
5350 : : #if defined(_DERIVATE)
5351 : 0 : qj2_Vci_ei=((cr*(-vdj1_Vci_ei*ezr*d10_exp0))/ezr);
5352 : 0 : qj2_Vbi_ei=((cr*(-vdj1_Vbi_ei*ezr*d10_exp0))/ezr);
5353 : 0 : qj2_Vs_ci=((cr*(-vdj1_Vs_ci*ezr*d10_exp0))/ezr);
5354 : 0 : qj2_Vbi_ci=((cr*(-vdj1_Vbi_ci*ezr*d10_exp0))/ezr);
5355 : 0 : qj2_Vtnode_GND=(((cr_Vtnode_GND*(1.0-d00_exp0))+(cr*(-vdj1_Vtnode_GND*ezr*d10_exp0)))/ezr);
5356 : 0 : qj2_Vb_ci=((cr*(-vdj1_Vb_ci*ezr*d10_exp0))/ezr);
5357 : : #endif
5358 : 0 : qj2=((cr*(1.0-d00_exp0))/ezr);
5359 : : }
5360 : : #endif
5361 : : #if defined(_DYNAMIC)
5362 : : {
5363 : 0 : double m00_exp(d00_exp0,(vdj2*ezr))
5364 : : #if defined(_DERIVATE)
5365 : : #define d10_exp0 d00_exp0
5366 : : #endif
5367 : : #if defined(_DERIVATE)
5368 : 0 : qj3_Vci_ei=((cr*(-vdj2_Vci_ei*ezr*d10_exp0))/ezr);
5369 : 0 : qj3_Vbi_ei=((cr*(-vdj2_Vbi_ei*ezr*d10_exp0))/ezr);
5370 : 0 : qj3_Vs_ci=((cr*(-vdj2_Vs_ci*ezr*d10_exp0))/ezr);
5371 : 0 : qj3_Vbi_ci=((cr*(-vdj2_Vbi_ci*ezr*d10_exp0))/ezr);
5372 : 0 : qj3_Vtnode_GND=(((cr_Vtnode_GND*(1.0-d00_exp0))+(cr*(-vdj2_Vtnode_GND*ezr*d10_exp0)))/ezr);
5373 : 0 : qj3_Vb_ci=((cr*(-vdj2_Vb_ci*ezr*d10_exp0))/ezr);
5374 : : #endif
5375 : 0 : qj3=((cr*(1.0-d00_exp0))/ezr);
5376 : : }
5377 : : #endif
5378 : : #if defined(_DYNAMIC)
5379 : : #if defined(_DERIVATE)
5380 : 0 : qjs_Vci_ei=(((qj1_Vci_ei+qj2_Vci_ei)-qj3_Vci_ei)*vds_t+(cmax*vj4_Vci_ei));
5381 : 0 : qjs_Vbi_ei=(((qj1_Vbi_ei+qj2_Vbi_ei)-qj3_Vbi_ei)*vds_t+(cmax*vj4_Vbi_ei));
5382 : 0 : qjs_Vs_ci=(((qj1_Vs_ci+qj2_Vs_ci)-qj3_Vs_ci)*vds_t+(cmax*vj4_Vs_ci));
5383 : 0 : qjs_Vbi_ci=(((qj1_Vbi_ci+qj2_Vbi_ci)-qj3_Vbi_ci)*vds_t+(cmax*vj4_Vbi_ci));
5384 : 0 : qjs_Vtnode_GND=(((((qj1_Vtnode_GND+qj2_Vtnode_GND)-qj3_Vtnode_GND)*vds_t)+(((qj1+qj2)-qj3)*vds_t_Vtnode_GND))+((cmax_Vtnode_GND*vj4)+(cmax*vj4_Vtnode_GND)));
5385 : 0 : qjs_Vb_ci=(((qj1_Vb_ci+qj2_Vb_ci)-qj3_Vb_ci)*vds_t+(cmax*vj4_Vb_ci));
5386 : : #endif
5387 : 0 : qjs=((((qj1+qj2)-qj3)*vds_t)+(cmax*vj4));
5388 : : #endif
5389 : : }
5390 : : else
5391 : : {
5392 : : #if defined(_DYNAMIC)
5393 : : #if defined(_DERIVATE)
5394 : 0 : qjs_Vci_ei=0.0;
5395 : 0 : qjs_Vbi_ei=0.0;
5396 : 0 : qjs_Vs_ci=0.0;
5397 : 0 : qjs_Vbi_ci=0.0;
5398 : 0 : qjs_Vtnode_GND=0.0;
5399 : 0 : qjs_Vb_ci=0.0;
5400 : : #endif
5401 : 0 : qjs=0.0;
5402 : : #endif
5403 : : }
5404 : : #endif /* if (...) */
5405 : : }
5406 : : else
5407 : : {
5408 : : #ifdef _DYNAMIC
5409 [ # # ]: 0 : if
5410 : : (cjs0_t>0.0)
5411 : : {
5412 : : #if defined(_DYNAMIC)
5413 : : {
5414 : 0 : double m00_logE(d00_logE0,2.4)
5415 : 0 : double m00_exp(d00_exp1,((-d00_logE0)/zs))
5416 : : #if defined(_DERIVATE)
5417 : 0 : vf_Vtnode_GND=vds_t_Vtnode_GND*(1.0-d00_exp1);
5418 : : #endif
5419 : 0 : vf=(vds_t*(1.0-d00_exp1));
5420 : : }
5421 : : #endif
5422 : : #if defined(_DYNAMIC)
5423 : : #if defined(_DERIVATEFORDDX)
5424 : : #if defined(_DERIVATE)
5425 : 0 : xvf_Vs_ci=((-Vsci_Vs_ci)/VT);
5426 : : #endif
5427 : 0 : xvf_Vbi_ei=0.0;
5428 : : #if defined(_DERIVATE)
5429 : 0 : xvf_Vbi_ei_Vs_ci=0.0;
5430 : 0 : xvf_Vbi_ei_Vbi_ei=0.0;
5431 : 0 : xvf_Vbi_ei_Vbi_ci=0.0;
5432 : 0 : xvf_Vbi_ei_Vtnode_GND=0.0;
5433 : 0 : xvf_Vbi_ei_Vb_ci=0.0;
5434 : : #endif
5435 : 0 : xvf_Vbi_ci=0.0;
5436 : : #if defined(_DERIVATE)
5437 : 0 : xvf_Vbi_ci_Vs_ci=0.0;
5438 : 0 : xvf_Vbi_ci_Vbi_ei=0.0;
5439 : 0 : xvf_Vbi_ci_Vbi_ci=0.0;
5440 : 0 : xvf_Vbi_ci_Vtnode_GND=0.0;
5441 : 0 : xvf_Vbi_ci_Vb_ci=0.0;
5442 : : #endif
5443 : : #if defined(_DERIVATE)
5444 : 0 : xvf_Vtnode_GND=((vf_Vtnode_GND*VT-(vf-Vsci)*VT_Vtnode_GND)/VT/VT);
5445 : : #endif
5446 : : #if defined(_DERIVATE)
5447 : 0 : xvf_Vb_ci=0.0;
5448 : : #endif
5449 : : #endif
5450 : 0 : xvf=((vf-Vsci)/VT);
5451 : : #endif
5452 : : #if defined(_DYNAMIC)
5453 : : {
5454 : 0 : double m00_sqrt(d00_sqrt0,((xvf*xvf)+1.921812))
5455 : : #if defined(_DERIVATEFORDDX)
5456 : 0 : double m10_sqrt(d10_sqrt0,d00_sqrt0,((xvf*xvf)+1.921812))
5457 : : #endif
5458 : : #if defined(_DERIVATEFORDDX)
5459 : : #if defined(_DERIVATE)
5460 : 0 : xvf2_Vs_ci=((xvf_Vs_ci*xvf)+(xvf*xvf_Vs_ci))*d10_sqrt0;
5461 : : #endif
5462 : 0 : xvf2_Vbi_ei=((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))*d10_sqrt0;
5463 : : #if defined(_DERIVATE)
5464 : 0 : xvf2_Vbi_ei_Vs_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vs_ci*xvf)+(xvf*xvf_Vs_ci)))*((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))+d10_sqrt0*(+(+xvf_Vbi_ei_Vs_ci*xvf+xvf_Vbi_ei*xvf_Vs_ci+xvf_Vs_ci*xvf_Vbi_ei+xvf*xvf_Vbi_ei_Vs_ci)+0.0));
5465 : 0 : xvf2_Vbi_ei_Vbi_ei=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei)))*((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))+d10_sqrt0*(+(+xvf_Vbi_ei_Vbi_ei*xvf+xvf_Vbi_ei*xvf_Vbi_ei+xvf_Vbi_ei*xvf_Vbi_ei+xvf*xvf_Vbi_ei_Vbi_ei)+0.0));
5466 : 0 : xvf2_Vbi_ei_Vbi_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci)))*((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))+d10_sqrt0*(+(+xvf_Vbi_ei_Vbi_ci*xvf+xvf_Vbi_ei*xvf_Vbi_ci+xvf_Vbi_ci*xvf_Vbi_ei+xvf*xvf_Vbi_ei_Vbi_ci)+0.0));
5467 : 0 : xvf2_Vbi_ei_Vtnode_GND=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND)))*((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))+d10_sqrt0*(+(+xvf_Vbi_ei_Vtnode_GND*xvf+xvf_Vbi_ei*xvf_Vtnode_GND+xvf_Vtnode_GND*xvf_Vbi_ei+xvf*xvf_Vbi_ei_Vtnode_GND)+0.0));
5468 : 0 : xvf2_Vbi_ei_Vb_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci)))*((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei))+d10_sqrt0*(+(+xvf_Vbi_ei_Vb_ci*xvf+xvf_Vbi_ei*xvf_Vb_ci+xvf_Vb_ci*xvf_Vbi_ei+xvf*xvf_Vbi_ei_Vb_ci)+0.0));
5469 : : #endif
5470 : 0 : xvf2_Vbi_ci=((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))*d10_sqrt0;
5471 : : #if defined(_DERIVATE)
5472 : 0 : xvf2_Vbi_ci_Vs_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vs_ci*xvf)+(xvf*xvf_Vs_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vs_ci*xvf+xvf_Vbi_ci*xvf_Vs_ci+xvf_Vs_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vs_ci)+0.0));
5473 : 0 : xvf2_Vbi_ci_Vbi_ei=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ei*xvf)+(xvf*xvf_Vbi_ei)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ei*xvf+xvf_Vbi_ci*xvf_Vbi_ei+xvf_Vbi_ei*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ei)+0.0));
5474 : 0 : xvf2_Vbi_ci_Vbi_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vbi_ci*xvf+xvf_Vbi_ci*xvf_Vbi_ci+xvf_Vbi_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vbi_ci)+0.0));
5475 : 0 : xvf2_Vbi_ci_Vtnode_GND=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vtnode_GND*xvf+xvf_Vbi_ci*xvf_Vtnode_GND+xvf_Vtnode_GND*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vtnode_GND)+0.0));
5476 : 0 : xvf2_Vbi_ci_Vb_ci=(m20_sqrt(((xvf*xvf)+1.921812))*(((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci)))*((xvf_Vbi_ci*xvf)+(xvf*xvf_Vbi_ci))+d10_sqrt0*(+(+xvf_Vbi_ci_Vb_ci*xvf+xvf_Vbi_ci*xvf_Vb_ci+xvf_Vb_ci*xvf_Vbi_ci+xvf*xvf_Vbi_ci_Vb_ci)+0.0));
5477 : : #endif
5478 : : #if defined(_DERIVATE)
5479 : 0 : xvf2_Vtnode_GND=((xvf_Vtnode_GND*xvf)+(xvf*xvf_Vtnode_GND))*d10_sqrt0;
5480 : : #endif
5481 : : #if defined(_DERIVATE)
5482 : 0 : xvf2_Vb_ci=((xvf_Vb_ci*xvf)+(xvf*xvf_Vb_ci))*d10_sqrt0;
5483 : : #endif
5484 : : #endif
5485 : 0 : xvf2=d00_sqrt0;
5486 : : }
5487 : : #endif
5488 : : #if defined(_DYNAMIC)
5489 : : #if defined(_DERIVATEFORDDX)
5490 : : #if defined(_DERIVATE)
5491 : 0 : v_j_Vs_ci=(-(VT*(xvf_Vs_ci+xvf2_Vs_ci))*0.5);
5492 : : #endif
5493 : 0 : v_j_Vbi_ei=(-(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.5);
5494 : : #if defined(_DERIVATE)
5495 : 0 : v_j_Vbi_ei_Vs_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vs_ci+xvf2_Vs_ci)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+VT*(+xvf_Vbi_ei_Vs_ci+xvf2_Vbi_ei_Vs_ci))*0.5+(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.0+((VT*(xvf_Vs_ci+xvf2_Vs_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
5496 : 0 : v_j_Vbi_ei_Vbi_ei=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+VT*(+xvf_Vbi_ei_Vbi_ei+xvf2_Vbi_ei_Vbi_ei))*0.5+(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.0+((VT*(xvf_Vbi_ei+xvf2_Vbi_ei)))*0.0+(VT*(xvf+xvf2))*0.0));
5497 : 0 : v_j_Vbi_ei_Vbi_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+VT*(+xvf_Vbi_ei_Vbi_ci+xvf2_Vbi_ei_Vbi_ci))*0.5+(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.0+((VT*(xvf_Vbi_ci+xvf2_Vbi_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
5498 : 0 : v_j_Vbi_ei_Vtnode_GND=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vtnode_GND+xvf2_Vtnode_GND)+VT_Vtnode_GND*(xvf_Vbi_ei+xvf2_Vbi_ei)+VT*(+xvf_Vbi_ei_Vtnode_GND+xvf2_Vbi_ei_Vtnode_GND))*0.5+(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.0+(((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND))))*0.0+(VT*(xvf+xvf2))*0.0));
5499 : 0 : v_j_Vbi_ei_Vb_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vb_ci+xvf2_Vb_ci)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+VT*(+xvf_Vbi_ei_Vb_ci+xvf2_Vbi_ei_Vb_ci))*0.5+(VT*(xvf_Vbi_ei+xvf2_Vbi_ei))*0.0+((VT*(xvf_Vb_ci+xvf2_Vb_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
5500 : : #endif
5501 : 0 : v_j_Vbi_ci=(-(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.5);
5502 : : #if defined(_DERIVATE)
5503 : 0 : v_j_Vbi_ci_Vs_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vs_ci+xvf2_Vs_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vs_ci+xvf2_Vbi_ci_Vs_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vs_ci+xvf2_Vs_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
5504 : 0 : v_j_Vbi_ci_Vbi_ei=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ei+xvf2_Vbi_ei)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ei+xvf2_Vbi_ci_Vbi_ei))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ei+xvf2_Vbi_ei)))*0.0+(VT*(xvf+xvf2))*0.0));
5505 : 0 : v_j_Vbi_ci_Vbi_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vbi_ci+xvf2_Vbi_ci_Vbi_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vbi_ci+xvf2_Vbi_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
5506 : 0 : v_j_Vbi_ci_Vtnode_GND=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vtnode_GND+xvf2_Vtnode_GND)+VT_Vtnode_GND*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vtnode_GND+xvf2_Vbi_ci_Vtnode_GND))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+(((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND))))*0.0+(VT*(xvf+xvf2))*0.0));
5507 : 0 : v_j_Vbi_ci_Vb_ci=(+0.0-(+(+0.0*(xvf+xvf2)+0.0*(xvf_Vb_ci+xvf2_Vb_ci)+0.0*(xvf_Vbi_ci+xvf2_Vbi_ci)+VT*(+xvf_Vbi_ci_Vb_ci+xvf2_Vbi_ci_Vb_ci))*0.5+(VT*(xvf_Vbi_ci+xvf2_Vbi_ci))*0.0+((VT*(xvf_Vb_ci+xvf2_Vb_ci)))*0.0+(VT*(xvf+xvf2))*0.0));
5508 : : #endif
5509 : : #if defined(_DERIVATE)
5510 : 0 : v_j_Vtnode_GND=(vf_Vtnode_GND-((VT_Vtnode_GND*(xvf+xvf2))+(VT*(xvf_Vtnode_GND+xvf2_Vtnode_GND)))*0.5);
5511 : : #endif
5512 : : #if defined(_DERIVATE)
5513 : 0 : v_j_Vb_ci=(-(VT*(xvf_Vb_ci+xvf2_Vb_ci))*0.5);
5514 : : #endif
5515 : : #endif
5516 : 0 : v_j=(vf-((VT*(xvf+xvf2))*0.5));
5517 : : #endif
5518 : : #if defined(_DYNAMIC)
5519 : : #if defined(_DERIVATE)
5520 : 0 : x_Vtnode_GND=0.0;
5521 : 0 : x_Vci_ei=0.0;
5522 : : #endif
5523 : 0 : x=(1.0-zs);
5524 : : #endif
5525 : : #if defined(_DYNAMIC)
5526 : : {
5527 : 0 : double m00_logE(d00_logE0,(1.0-(v_j/vds_t)))
5528 : 0 : double m00_exp(d00_exp1,(x*d00_logE0))
5529 : : #if defined(_DERIVATEFORDDX)
5530 : 0 : double m10_logE(d10_logE0,d00_logE0,(1.0-(v_j/vds_t)))
5531 : : #define d10_exp1 d00_exp1
5532 : : #endif
5533 : : #if defined(_DERIVATEFORDDX)
5534 : : #if defined(_DERIVATE)
5535 : 0 : y_Vci_ei=(-x_Vci_ei*d00_logE0*d10_exp1);
5536 : : #endif
5537 : : #if defined(_DERIVATE)
5538 : 0 : y_Vs_ci=(-(x*(-(v_j_Vs_ci/vds_t))*d10_logE0)*d10_exp1);
5539 : : #endif
5540 : 0 : y_Vbi_ei=(-(x*(-(v_j_Vbi_ei/vds_t))*d10_logE0)*d10_exp1);
5541 : : #if defined(_DERIVATE)
5542 : 0 : y_Vbi_ei_Vci_ei=(+0.0-(m20_exp((x*d00_logE0))*(x_Vci_ei*d00_logE0)*(x*(-(v_j_Vbi_ei/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*0.0+x_Vci_ei*(-(v_j_Vbi_ei/vds_t))*d10_logE0+x*0.0)));
5543 : 0 : y_Vbi_ei_Vs_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vs_ci/vds_t))*d10_logE0))*(x*(-(v_j_Vbi_ei/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vs_ci/vds_t))*d10_logE0+0.0*(-(v_j_Vbi_ei/vds_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vds_t)))*(-(v_j_Vs_ci/vds_t))*(-(v_j_Vbi_ei/vds_t))+d10_logE0*(+0.0-(v_j_Vbi_ei_Vs_ci/vds_t-(v_j_Vbi_ei*0.0+v_j_Vs_ci*0.0+v_j*0.0)/vds_t/vds_t+2*v_j*0.0*0.0/vds_t/vds_t/vds_t))))));
5544 : 0 : y_Vbi_ei_Vbi_ei=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ei/vds_t))*d10_logE0))*(x*(-(v_j_Vbi_ei/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ei/vds_t))*d10_logE0+0.0*(-(v_j_Vbi_ei/vds_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vds_t)))*(-(v_j_Vbi_ei/vds_t))*(-(v_j_Vbi_ei/vds_t))+d10_logE0*(+0.0-(v_j_Vbi_ei_Vbi_ei/vds_t-(v_j_Vbi_ei*0.0+v_j_Vbi_ei*0.0+v_j*0.0)/vds_t/vds_t+2*v_j*0.0*0.0/vds_t/vds_t/vds_t))))));
5545 : 0 : y_Vbi_ei_Vbi_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ci/vds_t))*d10_logE0))*(x*(-(v_j_Vbi_ei/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ci/vds_t))*d10_logE0+0.0*(-(v_j_Vbi_ei/vds_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vds_t)))*(-(v_j_Vbi_ci/vds_t))*(-(v_j_Vbi_ei/vds_t))+d10_logE0*(+0.0-(v_j_Vbi_ei_Vbi_ci/vds_t-(v_j_Vbi_ei*0.0+v_j_Vbi_ci*0.0+v_j*0.0)/vds_t/vds_t+2*v_j*0.0*0.0/vds_t/vds_t/vds_t))))));
5546 : 0 : y_Vbi_ei_Vtnode_GND=(+0.0-(m20_exp((x*d00_logE0))*(((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vds_t-v_j*vds_t_Vtnode_GND)/vds_t/vds_t))*d10_logE0)))*(x*(-(v_j_Vbi_ei/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-((v_j_Vtnode_GND*vds_t-v_j*vds_t_Vtnode_GND)/vds_t/vds_t))*d10_logE0+x_Vtnode_GND*(-(v_j_Vbi_ei/vds_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vds_t)))*(-((v_j_Vtnode_GND*vds_t-v_j*vds_t_Vtnode_GND)/vds_t/vds_t))*(-(v_j_Vbi_ei/vds_t))+d10_logE0*(+0.0-(v_j_Vbi_ei_Vtnode_GND/vds_t-(v_j_Vbi_ei*vds_t_Vtnode_GND+v_j_Vtnode_GND*0.0+v_j*0.0)/vds_t/vds_t+2*v_j*0.0*vds_t_Vtnode_GND/vds_t/vds_t/vds_t))))));
5547 : 0 : y_Vbi_ei_Vb_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vb_ci/vds_t))*d10_logE0))*(x*(-(v_j_Vbi_ei/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vb_ci/vds_t))*d10_logE0+0.0*(-(v_j_Vbi_ei/vds_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vds_t)))*(-(v_j_Vb_ci/vds_t))*(-(v_j_Vbi_ei/vds_t))+d10_logE0*(+0.0-(v_j_Vbi_ei_Vb_ci/vds_t-(v_j_Vbi_ei*0.0+v_j_Vb_ci*0.0+v_j*0.0)/vds_t/vds_t+2*v_j*0.0*0.0/vds_t/vds_t/vds_t))))));
5548 : : #endif
5549 : 0 : y_Vbi_ci=(-(x*(-(v_j_Vbi_ci/vds_t))*d10_logE0)*d10_exp1);
5550 : : #if defined(_DERIVATE)
5551 : 0 : y_Vbi_ci_Vci_ei=(+0.0-(m20_exp((x*d00_logE0))*(x_Vci_ei*d00_logE0)*(x*(-(v_j_Vbi_ci/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*0.0+x_Vci_ei*(-(v_j_Vbi_ci/vds_t))*d10_logE0+x*0.0)));
5552 : 0 : y_Vbi_ci_Vs_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vs_ci/vds_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vs_ci/vds_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vds_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vds_t)))*(-(v_j_Vs_ci/vds_t))*(-(v_j_Vbi_ci/vds_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vs_ci/vds_t-(v_j_Vbi_ci*0.0+v_j_Vs_ci*0.0+v_j*0.0)/vds_t/vds_t+2*v_j*0.0*0.0/vds_t/vds_t/vds_t))))));
5553 : 0 : y_Vbi_ci_Vbi_ei=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ei/vds_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ei/vds_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vds_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vds_t)))*(-(v_j_Vbi_ei/vds_t))*(-(v_j_Vbi_ci/vds_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vbi_ei/vds_t-(v_j_Vbi_ci*0.0+v_j_Vbi_ei*0.0+v_j*0.0)/vds_t/vds_t+2*v_j*0.0*0.0/vds_t/vds_t/vds_t))))));
5554 : 0 : y_Vbi_ci_Vbi_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vbi_ci/vds_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vbi_ci/vds_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vds_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vds_t)))*(-(v_j_Vbi_ci/vds_t))*(-(v_j_Vbi_ci/vds_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vbi_ci/vds_t-(v_j_Vbi_ci*0.0+v_j_Vbi_ci*0.0+v_j*0.0)/vds_t/vds_t+2*v_j*0.0*0.0/vds_t/vds_t/vds_t))))));
5555 : 0 : y_Vbi_ci_Vtnode_GND=(+0.0-(m20_exp((x*d00_logE0))*(((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vds_t-v_j*vds_t_Vtnode_GND)/vds_t/vds_t))*d10_logE0)))*(x*(-(v_j_Vbi_ci/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-((v_j_Vtnode_GND*vds_t-v_j*vds_t_Vtnode_GND)/vds_t/vds_t))*d10_logE0+x_Vtnode_GND*(-(v_j_Vbi_ci/vds_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vds_t)))*(-((v_j_Vtnode_GND*vds_t-v_j*vds_t_Vtnode_GND)/vds_t/vds_t))*(-(v_j_Vbi_ci/vds_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vtnode_GND/vds_t-(v_j_Vbi_ci*vds_t_Vtnode_GND+v_j_Vtnode_GND*0.0+v_j*0.0)/vds_t/vds_t+2*v_j*0.0*vds_t_Vtnode_GND/vds_t/vds_t/vds_t))))));
5556 : 0 : y_Vbi_ci_Vb_ci=(+0.0-(m20_exp((x*d00_logE0))*((x*(-(v_j_Vb_ci/vds_t))*d10_logE0))*(x*(-(v_j_Vbi_ci/vds_t))*d10_logE0)+d10_exp1*(+0.0*d00_logE0+0.0*(-(v_j_Vb_ci/vds_t))*d10_logE0+0.0*(-(v_j_Vbi_ci/vds_t))*d10_logE0+x*(m20_logE((1.0-(v_j/vds_t)))*(-(v_j_Vb_ci/vds_t))*(-(v_j_Vbi_ci/vds_t))+d10_logE0*(+0.0-(v_j_Vbi_ci_Vb_ci/vds_t-(v_j_Vbi_ci*0.0+v_j_Vb_ci*0.0+v_j*0.0)/vds_t/vds_t+2*v_j*0.0*0.0/vds_t/vds_t/vds_t))))));
5557 : : #endif
5558 : : #if defined(_DERIVATE)
5559 : 0 : y_Vtnode_GND=(-((x_Vtnode_GND*d00_logE0)+(x*(-((v_j_Vtnode_GND*vds_t-v_j*vds_t_Vtnode_GND)/vds_t/vds_t))*d10_logE0))*d10_exp1);
5560 : : #endif
5561 : : #if defined(_DERIVATE)
5562 : 0 : y_Vb_ci=(-(x*(-(v_j_Vb_ci/vds_t))*d10_logE0)*d10_exp1);
5563 : : #endif
5564 : : #endif
5565 : 0 : y=(1.0-d00_exp1);
5566 : : }
5567 : : #endif
5568 : : #if defined(_DYNAMIC)
5569 : : #if defined(_DERIVATE)
5570 : 0 : qjs_Vci_ei=((((cjs0_t*vds_t)*y_Vci_ei)*x-((cjs0_t*vds_t)*y)*x_Vci_ei)/x/x);
5571 : 0 : qjs_Vbi_ei=((((cjs0_t*vds_t)*y_Vbi_ei)/x)+((2.4*cjs0_t)*(-v_j_Vbi_ei)));
5572 : 0 : qjs_Vs_ci=((((cjs0_t*vds_t)*y_Vs_ci)/x)+((2.4*cjs0_t)*(Vsci_Vs_ci-v_j_Vs_ci)));
5573 : 0 : qjs_Vbi_ci=((((cjs0_t*vds_t)*y_Vbi_ci)/x)+((2.4*cjs0_t)*(-v_j_Vbi_ci)));
5574 : 0 : qjs_Vtnode_GND=(((((((cjs0_t_Vtnode_GND*vds_t)+(cjs0_t*vds_t_Vtnode_GND))*y)+((cjs0_t*vds_t)*y_Vtnode_GND))*x-((cjs0_t*vds_t)*y)*x_Vtnode_GND)/x/x)+(((2.4*cjs0_t_Vtnode_GND)*(Vsci-v_j))+((2.4*cjs0_t)*(-v_j_Vtnode_GND))));
5575 : 0 : qjs_Vb_ci=((((cjs0_t*vds_t)*y_Vb_ci)/x)+((2.4*cjs0_t)*(-v_j_Vb_ci)));
5576 : : #endif
5577 : 0 : qjs=((((cjs0_t*vds_t)*y)/x)+((2.4*cjs0_t)*(Vsci-v_j)));
5578 : : #endif
5579 : : }
5580 : : else
5581 : : {
5582 : : #if defined(_DYNAMIC)
5583 : : #if defined(_DERIVATE)
5584 : 0 : qjs_Vci_ei=0.0;
5585 : 0 : qjs_Vbi_ei=0.0;
5586 : 0 : qjs_Vs_ci=0.0;
5587 : 0 : qjs_Vbi_ci=0.0;
5588 : 0 : qjs_Vtnode_GND=0.0;
5589 : 0 : qjs_Vb_ci=0.0;
5590 : : #endif
5591 : 0 : qjs=0.0;
5592 : : #endif
5593 : : }
5594 : : #endif /* if (...) */
5595 : : }
5596 : : #endif /* if (...) */
5597 [ # # ][ # # ]: 0 : if
5598 : : ((flsh==1)&&(rth>=0.001))
5599 : : {
5600 : : #if defined(_DERIVATE)
5601 : 0 : pterm_Vci_c=0.0;
5602 : 0 : pterm_Vei_e=0.0;
5603 : 0 : pterm_Vb_bi=0.0;
5604 : 0 : pterm_Vs_ci=0.0;
5605 : 0 : pterm_Vtnode_GND=(it_Vtnode_GND*Vciei+((iavl_Vtnode_GND*(vdci_t-Vbici))+(iavl*vdci_t_Vtnode_GND)));
5606 : 0 : pterm_Vbi_ei=(it_Vbi_ei*Vciei+iavl_Vbi_ei*(vdci_t-Vbici));
5607 : 0 : pterm_Vbi_ci=(it_Vbi_ci*Vciei+((iavl_Vbi_ci*(vdci_t-Vbici))+(iavl*(-Vbici_Vbi_ci))));
5608 : 0 : pterm_Vb_ci=(it_Vb_ci*Vciei+iavl_Vb_ci*(vdci_t-Vbici));
5609 : 0 : pterm_Vci_ei=(((it_Vci_ei*Vciei)+(it*Vciei_Vci_ei))+iavl_Vci_ei*(vdci_t-Vbici));
5610 : : #endif
5611 : 0 : pterm=((it*Vciei)+(iavl*(vdci_t-Vbici)));
5612 : : }
5613 : : else
5614 : : {
5615 [ # # ][ # # ]: 0 : if
5616 : : ((flsh==2)&&(rth>=0.001))
5617 : : {
5618 : : #if defined(_DERIVATE)
5619 : 0 : pterm_Vci_c=0.0;
5620 : 0 : pterm_Vei_e=0.0;
5621 : 0 : pterm_Vb_bi=0.0;
5622 : 0 : pterm_Vs_ci=((ijsc_Vs_ci*Vsci)+(ijsc*Vsci_Vs_ci));
5623 : 0 : pterm_Vtnode_GND=(((((Vciei*it_Vtnode_GND)+((vdci_t_Vtnode_GND*iavl)+((vdci_t-Vbici)*iavl_Vtnode_GND)))+ijbe_Vtnode_GND*Vbiei)+ijbc_Vtnode_GND*Vbici)+ijsc_Vtnode_GND*Vsci);
5624 : 0 : pterm_Vbi_ei=(((((Vciei*it_Vbi_ei)+((vdci_t-Vbici)*iavl_Vbi_ei))+((ijbe_Vbi_ei*Vbiei)+(ijbe*Vbiei_Vbi_ei)))+ijbc_Vbi_ei*Vbici)+ijsc_Vbi_ei*Vsci);
5625 : 0 : pterm_Vbi_ci=((((Vciei*it_Vbi_ci)+(((-Vbici_Vbi_ci)*iavl)+((vdci_t-Vbici)*iavl_Vbi_ci)))+((ijbc_Vbi_ci*Vbici)+(ijbc*Vbici_Vbi_ci)))+ijsc_Vbi_ci*Vsci);
5626 : 0 : pterm_Vb_ci=((Vciei*it_Vb_ci)+((vdci_t-Vbici)*iavl_Vb_ci));
5627 : 0 : pterm_Vci_ei=(((Vciei_Vci_ei*it)+(Vciei*it_Vci_ei))+((vdci_t-Vbici)*iavl_Vci_ei));
5628 : : #endif
5629 : 0 : pterm=(((((Vciei*it)+((vdci_t-Vbici)*iavl))+(ijbe*Vbiei))+(ijbc*Vbici))+(ijsc*Vsci));
5630 [ # # ]: 0 : if
5631 : : (rb>=0.001)
5632 : : {
5633 : : #if defined(_DERIVATE)
5634 : 0 : pterm_Vci_c=0.0;
5635 : 0 : pterm_Vei_e=0.0;
5636 : 0 : pterm_Vb_bi=(pterm_Vb_bi+(((Vbbi_Vb_bi*Vbbi)+(Vbbi*Vbbi_Vb_bi))/rb));
5637 : 0 : pterm_Vs_ci=pterm_Vs_ci;
5638 : 0 : pterm_Vtnode_GND=(pterm_Vtnode_GND+(-(Vbbi*Vbbi)*rb_Vtnode_GND/rb/rb));
5639 : 0 : pterm_Vbi_ei=(pterm_Vbi_ei+(-(Vbbi*Vbbi)*rb_Vbi_ei/rb/rb));
5640 : 0 : pterm_Vbi_ci=(pterm_Vbi_ci+(-(Vbbi*Vbbi)*rb_Vbi_ci/rb/rb));
5641 : 0 : pterm_Vb_ci=(pterm_Vb_ci+(-(Vbbi*Vbbi)*rb_Vb_ci/rb/rb));
5642 : 0 : pterm_Vci_ei=(pterm_Vci_ei+(-(Vbbi*Vbbi)*rb_Vci_ei/rb/rb));
5643 : : #endif
5644 : 0 : pterm=(pterm+((Vbbi*Vbbi)/rb));
5645 : : }
5646 [ # # ]: 0 : if
5647 : : (re_t>=0.001)
5648 : : {
5649 : : #if defined(_DERIVATE)
5650 : 0 : pterm_Vci_c=0.0;
5651 : 0 : pterm_Vei_e=(pterm_Vei_e+(((Veie_Vei_e*Veie)+(Veie*Veie_Vei_e))/re_t));
5652 : 0 : pterm_Vb_bi=pterm_Vb_bi;
5653 : 0 : pterm_Vs_ci=pterm_Vs_ci;
5654 : 0 : pterm_Vtnode_GND=(pterm_Vtnode_GND+(-(Veie*Veie)*re_t_Vtnode_GND/re_t/re_t));
5655 : 0 : pterm_Vbi_ei=pterm_Vbi_ei;
5656 : 0 : pterm_Vbi_ci=pterm_Vbi_ci;
5657 : 0 : pterm_Vb_ci=pterm_Vb_ci;
5658 : 0 : pterm_Vci_ei=pterm_Vci_ei;
5659 : : #endif
5660 : 0 : pterm=(pterm+((Veie*Veie)/re_t));
5661 : : }
5662 [ # # ]: 0 : if
5663 : : (rcx_t>=0.001)
5664 : : {
5665 : : #if defined(_DERIVATE)
5666 : 0 : pterm_Vci_c=(pterm_Vci_c+(((Vcic_Vci_c*Vcic)+(Vcic*Vcic_Vci_c))/rcx_t));
5667 : 0 : pterm_Vei_e=pterm_Vei_e;
5668 : 0 : pterm_Vb_bi=pterm_Vb_bi;
5669 : 0 : pterm_Vs_ci=pterm_Vs_ci;
5670 : 0 : pterm_Vtnode_GND=(pterm_Vtnode_GND+(-(Vcic*Vcic)*rcx_t_Vtnode_GND/rcx_t/rcx_t));
5671 : 0 : pterm_Vbi_ei=pterm_Vbi_ei;
5672 : 0 : pterm_Vbi_ci=pterm_Vbi_ci;
5673 : 0 : pterm_Vb_ci=pterm_Vb_ci;
5674 : 0 : pterm_Vci_ei=pterm_Vci_ei;
5675 : : #endif
5676 : 0 : pterm=(pterm+((Vcic*Vcic)/rcx_t));
5677 : : }
5678 : : }
5679 : : }
5680 : : #if defined(_DERIVATE)
5681 : 0 : Ibici_Vtnode_GND=(ijbc_Vtnode_GND-iavl_Vtnode_GND);
5682 : 0 : Ibici_Vbi_ci=(ijbc_Vbi_ci-iavl_Vbi_ci);
5683 : 0 : Ibici_Vbi_ei=(ijbc_Vbi_ei-iavl_Vbi_ei);
5684 : 0 : Ibici_Vb_ci=(-iavl_Vb_ci);
5685 : 0 : Ibici_Vci_ei=(-iavl_Vci_ei);
5686 : : #endif
5687 : 0 : Ibici=(ijbc-iavl);
5688 : : #if defined(_DYNAMIC)
5689 : : #if defined(_DERIVATE)
5690 : 0 : Qbci_Vb_ci=(cbcpar*Vbci_Vb_ci);
5691 : : #endif
5692 : 0 : Qbci=(cbcpar*Vbci);
5693 : : #endif
5694 : : #if defined(_DYNAMIC)
5695 : : #if defined(_DERIVATE)
5696 : 0 : Qbe_Vb_e=(cbepar*Vbe_Vb_e);
5697 : : #endif
5698 : 0 : Qbe=(cbepar*Vbe);
5699 : : #endif
5700 : : #if defined(_DYNAMIC)
5701 : : #if defined(_DERIVATE)
5702 : 0 : Qbici_Vbi_ci=(qjcii_Vbi_ci+qr_Vbi_ci);
5703 : 0 : Qbici_Vtnode_GND=(qjcii_Vtnode_GND+qr_Vtnode_GND);
5704 : 0 : Qbici_Vb_ci=(qjcii_Vb_ci+qr_Vb_ci);
5705 : 0 : Qbici_Vbi_ei=qr_Vbi_ei;
5706 : 0 : Qbici_Vci_ei=qr_Vci_ei;
5707 : : #endif
5708 : 0 : Qbici=(qjcii+qr);
5709 : : #endif
5710 : : #if defined(_DYNAMIC)
5711 : : #if defined(_DERIVATE)
5712 : 0 : Qbiei_Vtnode_GND=(qjei_Vtnode_GND+qf_Vtnode_GND);
5713 : 0 : Qbiei_Vbi_ei=(qjei_Vbi_ei+qf_Vbi_ei);
5714 : 0 : Qbiei_Vbi_ci=(qjei_Vbi_ci+qf_Vbi_ci);
5715 : 0 : Qbiei_Vb_ci=(qjei_Vb_ci+qf_Vb_ci);
5716 : 0 : Qbiei_Vci_ei=qf_Vci_ei;
5717 : : #endif
5718 : 0 : Qbiei=(qjei+qf);
5719 : : #endif
5720 : : #if defined(_DERIVATE)
5721 : 0 : ijsc_Vtnode_GND=(HICUMtype*ijsc_Vtnode_GND);
5722 : 0 : ijsc_Vs_ci=(HICUMtype*ijsc_Vs_ci);
5723 : 0 : ijsc_Vbi_ci=(HICUMtype*ijsc_Vbi_ci);
5724 : 0 : ijsc_Vbi_ei=(HICUMtype*ijsc_Vbi_ei);
5725 : : #endif
5726 : 0 : ijsc=(HICUMtype*ijsc);
5727 : : #if defined(_DYNAMIC)
5728 : : #if defined(_DERIVATE)
5729 : 0 : qjs_Vci_ei=(HICUMtype*qjs_Vci_ei);
5730 : 0 : qjs_Vbi_ei=(HICUMtype*qjs_Vbi_ei);
5731 : 0 : qjs_Vs_ci=(HICUMtype*qjs_Vs_ci);
5732 : 0 : qjs_Vbi_ci=(HICUMtype*qjs_Vbi_ci);
5733 : 0 : qjs_Vtnode_GND=(HICUMtype*qjs_Vtnode_GND);
5734 : 0 : qjs_Vb_ci=(HICUMtype*qjs_Vb_ci);
5735 : : #endif
5736 : 0 : qjs=(HICUMtype*qjs);
5737 : : #endif
5738 : : #if defined(_DYNAMIC)
5739 : : #if defined(_DERIVATE)
5740 : 0 : qjcx_Vbi_ci=(HICUMtype*qjcx_Vbi_ci);
5741 : 0 : qjcx_Vtnode_GND=(HICUMtype*qjcx_Vtnode_GND);
5742 : 0 : qjcx_Vb_ci=(HICUMtype*qjcx_Vb_ci);
5743 : : #endif
5744 : 0 : qjcx=(HICUMtype*qjcx);
5745 : : #endif
5746 : : #if defined(_DYNAMIC)
5747 : : #if defined(_DERIVATE)
5748 : 0 : Qbci_Vb_ci=(HICUMtype*Qbci_Vb_ci);
5749 : : #endif
5750 : 0 : Qbci=(HICUMtype*Qbci);
5751 : : #endif
5752 : : #if defined(_DYNAMIC)
5753 : : #if defined(_DERIVATE)
5754 : 0 : Qbe_Vb_e=(HICUMtype*Qbe_Vb_e);
5755 : : #endif
5756 : 0 : Qbe=(HICUMtype*Qbe);
5757 : : #endif
5758 : : #if defined(_DERIVATE)
5759 : 0 : Ibici_Vtnode_GND=(HICUMtype*Ibici_Vtnode_GND);
5760 : 0 : Ibici_Vbi_ci=(HICUMtype*Ibici_Vbi_ci);
5761 : 0 : Ibici_Vbi_ei=(HICUMtype*Ibici_Vbi_ei);
5762 : 0 : Ibici_Vb_ci=(HICUMtype*Ibici_Vb_ci);
5763 : 0 : Ibici_Vci_ei=(HICUMtype*Ibici_Vci_ei);
5764 : : #endif
5765 : 0 : Ibici=(HICUMtype*Ibici);
5766 : : #if defined(_DYNAMIC)
5767 : : #if defined(_DERIVATE)
5768 : 0 : Qbici_Vbi_ci=(HICUMtype*Qbici_Vbi_ci);
5769 : 0 : Qbici_Vtnode_GND=(HICUMtype*Qbici_Vtnode_GND);
5770 : 0 : Qbici_Vb_ci=(HICUMtype*Qbici_Vb_ci);
5771 : 0 : Qbici_Vbi_ei=(HICUMtype*Qbici_Vbi_ei);
5772 : 0 : Qbici_Vci_ei=(HICUMtype*Qbici_Vci_ei);
5773 : : #endif
5774 : 0 : Qbici=(HICUMtype*Qbici);
5775 : : #endif
5776 : : #if defined(_DERIVATE)
5777 : 0 : ijbe_Vtnode_GND=(HICUMtype*ijbe_Vtnode_GND);
5778 : 0 : ijbe_Vbi_ei=(HICUMtype*ijbe_Vbi_ei);
5779 : : #endif
5780 : 0 : ijbe=(HICUMtype*ijbe);
5781 : : #if defined(_DYNAMIC)
5782 : : #if defined(_DERIVATE)
5783 : 0 : Qbiei_Vtnode_GND=(HICUMtype*Qbiei_Vtnode_GND);
5784 : 0 : Qbiei_Vbi_ei=(HICUMtype*Qbiei_Vbi_ei);
5785 : 0 : Qbiei_Vbi_ci=(HICUMtype*Qbiei_Vbi_ci);
5786 : 0 : Qbiei_Vb_ci=(HICUMtype*Qbiei_Vb_ci);
5787 : 0 : Qbiei_Vci_ei=(HICUMtype*Qbiei_Vci_ei);
5788 : : #endif
5789 : 0 : Qbiei=(HICUMtype*Qbiei);
5790 : : #endif
5791 : : #if defined(_DERIVATE)
5792 : 0 : it_Vtnode_GND=(HICUMtype*it_Vtnode_GND);
5793 : 0 : it_Vbi_ei=(HICUMtype*it_Vbi_ei);
5794 : 0 : it_Vbi_ci=(HICUMtype*it_Vbi_ci);
5795 : 0 : it_Vb_ci=(HICUMtype*it_Vb_ci);
5796 : 0 : it_Vci_ei=(HICUMtype*it_Vci_ei);
5797 : : #endif
5798 : 0 : it=(HICUMtype*it);
5799 [ # # ][ # # ]: 0 : _load_static_residual2(bi,ei,(1.0e-12*BP(bi,ei)));
5800 : : #if defined(_DERIVATE)
5801 [ # # ][ # # ]: 0 : _load_static_jacobian4(bi,ei,bi,ei,(1.0e-12));
[ # # ][ # # ]
[ # # ]
5802 : : #endif
5803 [ # # ][ # # ]: 0 : _load_static_residual2(bi,ci,(1.0e-12*BP(bi,ci)));
5804 : : #if defined(_DERIVATE)
5805 [ # # ][ # # ]: 0 : _load_static_jacobian4(bi,ci,bi,ci,(1.0e-12));
[ # # ][ # # ]
[ # # ]
5806 : : #endif
5807 : 0 : _load_static_residual2(b,s,HSI_Tsu);
5808 : : #if defined(_DERIVATE)
5809 [ # # ][ # # ]: 0 : _load_static_jacobian4(b,s,s,ci,HSI_Tsu_Vs_ci);
[ # # ][ # # ]
[ # # ]
5810 [ # # ][ # # ]: 0 : _load_static_jacobian4(b,s,b,ci,HSI_Tsu_Vb_ci);
[ # # ][ # # ]
[ # # ]
5811 [ # # ]: 0 : _load_static_jacobian2s(b,s,tnode,HSI_Tsu_Vtnode_GND);
5812 : : #endif
5813 : 0 : _load_static_residual2(s,ci,ijsc);
5814 : : #if defined(_DERIVATE)
5815 [ # # ][ # # ]: 0 : _load_static_jacobian4(s,ci,bi,ei,ijsc_Vbi_ei);
[ # # ][ # # ]
[ # # ]
5816 [ # # ][ # # ]: 0 : _load_static_jacobian4(s,ci,bi,ci,ijsc_Vbi_ci);
[ # # ][ # # ]
[ # # ]
5817 [ # # ][ # # ]: 0 : _load_static_jacobian4(s,ci,s,ci,ijsc_Vs_ci);
[ # # ][ # # ]
[ # # ]
5818 [ # # ]: 0 : _load_static_jacobian2s(s,ci,tnode,ijsc_Vtnode_GND);
5819 : : #endif
5820 : : #if defined(_DYNAMIC)
5821 [ # # ][ # # ]: 0 : _load_dynamic_residual2(s,ci,_DDT(qjs));
5822 : : #if defined(_DERIVATE)
5823 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(s,ci,b,ci,qjs_Vb_ci);
[ # # ][ # # ]
[ # # ]
5824 [ # # ][ # # ]: 0 : _load_dynamic_jacobian2s(s,ci,tnode,qjs_Vtnode_GND);
[ # # ]
5825 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(s,ci,bi,ci,qjs_Vbi_ci);
[ # # ][ # # ]
[ # # ]
5826 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(s,ci,s,ci,qjs_Vs_ci);
[ # # ][ # # ]
[ # # ]
5827 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(s,ci,bi,ei,qjs_Vbi_ei);
[ # # ][ # # ]
[ # # ]
5828 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(s,ci,ci,ei,qjs_Vci_ei);
[ # # ][ # # ]
[ # # ]
5829 : : #endif
5830 : : #endif
5831 : : #if defined(_DYNAMIC)
5832 [ # # ][ # # ]: 0 : _load_dynamic_residual2(b,ci,_DDT(qjcx));
5833 : : #if defined(_DERIVATE)
5834 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(b,ci,b,ci,qjcx_Vb_ci);
[ # # ][ # # ]
[ # # ]
5835 [ # # ][ # # ]: 0 : _load_dynamic_jacobian2s(b,ci,tnode,qjcx_Vtnode_GND);
[ # # ]
5836 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(b,ci,bi,ci,qjcx_Vbi_ci);
[ # # ][ # # ]
[ # # ]
5837 : : #endif
5838 : : #endif
5839 : : #if defined(_DYNAMIC)
5840 [ # # ][ # # ]: 0 : _load_dynamic_residual2(b,ci,_DDT(Qbci));
5841 : : #if defined(_DERIVATE)
5842 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(b,ci,b,ci,Qbci_Vb_ci);
[ # # ][ # # ]
[ # # ]
5843 : : #endif
5844 : : #endif
5845 : : #if defined(_DYNAMIC)
5846 [ # # ][ # # ]: 0 : _load_dynamic_residual2(b,e,_DDT(Qbe));
5847 : : #if defined(_DERIVATE)
5848 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(b,e,b,e,Qbe_Vb_e);
[ # # ][ # # ]
[ # # ]
5849 : : #endif
5850 : : #endif
5851 [ # # ]: 0 : if
5852 : : (re>=0.001)
5853 : : {
5854 : 0 : _load_static_residual2(ei,e,(Veie/re_t));
5855 : : #if defined(_DERIVATE)
5856 [ # # ]: 0 : _load_static_jacobian2s(ei,e,tnode,(-Veie*re_t_Vtnode_GND/re_t/re_t));
5857 [ # # ][ # # ]: 0 : _load_static_jacobian4(ei,e,ei,e,(Veie_Vei_e/re_t));
[ # # ][ # # ]
[ # # ]
5858 : : #endif
5859 : : }
5860 : : else
5861 : : {
5862 [ # # ][ # # ]: 0 : _load_static_residual2(ei,e,(BP(ei,e)/1e-6));
5863 : : #if defined(_DERIVATE)
5864 [ # # ][ # # ]: 0 : _load_static_jacobian4(ei,e,ei,e,(1/1e-6));
[ # # ][ # # ]
[ # # ]
5865 : : #endif
5866 : : }
5867 [ # # ]: 0 : if
5868 : : (rcx>=0.001)
5869 : : {
5870 : 0 : _load_static_residual2(ci,c,(Vcic/rcx_t));
5871 : : #if defined(_DERIVATE)
5872 [ # # ]: 0 : _load_static_jacobian2s(ci,c,tnode,(-Vcic*rcx_t_Vtnode_GND/rcx_t/rcx_t));
5873 [ # # ][ # # ]: 0 : _load_static_jacobian4(ci,c,ci,c,(Vcic_Vci_c/rcx_t));
[ # # ][ # # ]
[ # # ]
5874 : : #endif
5875 : : }
5876 : : else
5877 : : {
5878 [ # # ][ # # ]: 0 : _load_static_residual2(ci,c,(BP(ci,c)/1e-6));
5879 : : #if defined(_DERIVATE)
5880 [ # # ][ # # ]: 0 : _load_static_jacobian4(ci,c,ci,c,(1/1e-6));
[ # # ][ # # ]
[ # # ]
5881 : : #endif
5882 : : }
5883 [ # # ][ # # ]: 0 : if
5884 : : ((rbi0>=0.001)||(rbx>=0.001))
5885 : : {
5886 : 0 : _load_static_residual2(b,bi,(Vbbi/rb));
5887 : : #if defined(_DERIVATE)
5888 [ # # ][ # # ]: 0 : _load_static_jacobian4(b,bi,ci,ei,(-Vbbi*rb_Vci_ei/rb/rb));
[ # # ][ # # ]
[ # # ]
5889 [ # # ][ # # ]: 0 : _load_static_jacobian4(b,bi,b,ci,(-Vbbi*rb_Vb_ci/rb/rb));
[ # # ][ # # ]
[ # # ]
5890 [ # # ][ # # ]: 0 : _load_static_jacobian4(b,bi,bi,ci,(-Vbbi*rb_Vbi_ci/rb/rb));
[ # # ][ # # ]
[ # # ]
5891 [ # # ][ # # ]: 0 : _load_static_jacobian4(b,bi,bi,ei,(-Vbbi*rb_Vbi_ei/rb/rb));
[ # # ][ # # ]
[ # # ]
5892 [ # # ]: 0 : _load_static_jacobian2s(b,bi,tnode,(-Vbbi*rb_Vtnode_GND/rb/rb));
5893 [ # # ][ # # ]: 0 : _load_static_jacobian4(b,bi,b,bi,(Vbbi_Vb_bi/rb));
[ # # ][ # # ]
[ # # ]
5894 : : #endif
5895 : : }
5896 : : else
5897 : : {
5898 [ # # ][ # # ]: 0 : _load_static_residual2(b,bi,(BP(b,bi)/1e-6));
5899 : : #if defined(_DERIVATE)
5900 [ # # ][ # # ]: 0 : _load_static_jacobian4(b,bi,b,bi,(1/1e-6));
[ # # ][ # # ]
[ # # ]
5901 : : #endif
5902 : : }
5903 : 0 : _load_static_residual2(bi,ci,Ibici);
5904 : : #if defined(_DERIVATE)
5905 [ # # ][ # # ]: 0 : _load_static_jacobian4(bi,ci,ci,ei,Ibici_Vci_ei);
[ # # ][ # # ]
[ # # ]
5906 [ # # ][ # # ]: 0 : _load_static_jacobian4(bi,ci,b,ci,Ibici_Vb_ci);
[ # # ][ # # ]
[ # # ]
5907 [ # # ][ # # ]: 0 : _load_static_jacobian4(bi,ci,bi,ei,Ibici_Vbi_ei);
[ # # ][ # # ]
[ # # ]
5908 [ # # ][ # # ]: 0 : _load_static_jacobian4(bi,ci,bi,ci,Ibici_Vbi_ci);
[ # # ][ # # ]
[ # # ]
5909 [ # # ]: 0 : _load_static_jacobian2s(bi,ci,tnode,Ibici_Vtnode_GND);
5910 : : #endif
5911 : : #if defined(_DYNAMIC)
5912 [ # # ][ # # ]: 0 : _load_dynamic_residual2(bi,ci,_DDT(Qbici));
5913 : : #if defined(_DERIVATE)
5914 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(bi,ci,ci,ei,Qbici_Vci_ei);
[ # # ][ # # ]
[ # # ]
5915 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(bi,ci,bi,ei,Qbici_Vbi_ei);
[ # # ][ # # ]
[ # # ]
5916 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(bi,ci,b,ci,Qbici_Vb_ci);
[ # # ][ # # ]
[ # # ]
5917 [ # # ][ # # ]: 0 : _load_dynamic_jacobian2s(bi,ci,tnode,Qbici_Vtnode_GND);
[ # # ]
5918 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(bi,ci,bi,ci,Qbici_Vbi_ci);
[ # # ][ # # ]
[ # # ]
5919 : : #endif
5920 : : #endif
5921 : 0 : _load_static_residual2(bi,ei,ijbe);
5922 : : #if defined(_DERIVATE)
5923 [ # # ][ # # ]: 0 : _load_static_jacobian4(bi,ei,bi,ei,ijbe_Vbi_ei);
[ # # ][ # # ]
[ # # ]
5924 [ # # ]: 0 : _load_static_jacobian2s(bi,ei,tnode,ijbe_Vtnode_GND);
5925 : : #endif
5926 : : #if defined(_DYNAMIC)
5927 [ # # ][ # # ]: 0 : _load_dynamic_residual2(bi,ei,_DDT(Qbiei));
5928 : : #if defined(_DERIVATE)
5929 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(bi,ei,ci,ei,Qbiei_Vci_ei);
[ # # ][ # # ]
[ # # ]
5930 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(bi,ei,b,ci,Qbiei_Vb_ci);
[ # # ][ # # ]
[ # # ]
5931 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(bi,ei,bi,ci,Qbiei_Vbi_ci);
[ # # ][ # # ]
[ # # ]
5932 [ # # ][ # # ]: 0 : _load_dynamic_jacobian4(bi,ei,bi,ei,Qbiei_Vbi_ei);
[ # # ][ # # ]
[ # # ]
5933 [ # # ][ # # ]: 0 : _load_dynamic_jacobian2s(bi,ei,tnode,Qbiei_Vtnode_GND);
[ # # ]
5934 : : #endif
5935 : : #endif
5936 : 0 : _load_static_residual2(ci,ei,it);
5937 : : #if defined(_DERIVATE)
5938 [ # # ][ # # ]: 0 : _load_static_jacobian4(ci,ei,ci,ei,it_Vci_ei);
[ # # ][ # # ]
[ # # ]
5939 [ # # ][ # # ]: 0 : _load_static_jacobian4(ci,ei,b,ci,it_Vb_ci);
[ # # ][ # # ]
[ # # ]
5940 [ # # ][ # # ]: 0 : _load_static_jacobian4(ci,ei,bi,ci,it_Vbi_ci);
[ # # ][ # # ]
[ # # ]
5941 [ # # ][ # # ]: 0 : _load_static_jacobian4(ci,ei,bi,ei,it_Vbi_ei);
[ # # ][ # # ]
[ # # ]
5942 [ # # ]: 0 : _load_static_jacobian2s(ci,ei,tnode,it_Vtnode_GND);
5943 : : #endif
5944 [ # # ][ # # ]: 0 : if
5945 : : ((flsh==0)||(rth<0.001))
5946 : : {
5947 : 0 : _load_static_residual1(tnode,(Vrth/0.001));
5948 : : #if defined(_DERIVATE)
5949 [ # # ]: 0 : _load_static_jacobian1(tnode,tnode,(Vrth_Vtnode_GND/0.001));
5950 : : #endif
5951 : : }
5952 : : else
5953 : : {
5954 : 0 : _load_static_residual1(tnode,((Vrth/rth)-pterm));
5955 : : #if defined(_DERIVATE)
5956 [ # # ][ # # ]: 0 : _load_static_jacobian2p(tnode,ci,ei,(-pterm_Vci_ei));
[ # # ]
5957 [ # # ][ # # ]: 0 : _load_static_jacobian2p(tnode,b,ci,(-pterm_Vb_ci));
[ # # ]
5958 [ # # ][ # # ]: 0 : _load_static_jacobian2p(tnode,bi,ci,(-pterm_Vbi_ci));
[ # # ]
5959 [ # # ][ # # ]: 0 : _load_static_jacobian2p(tnode,bi,ei,(-pterm_Vbi_ei));
[ # # ]
5960 [ # # ][ # # ]: 0 : _load_static_jacobian2p(tnode,s,ci,(-pterm_Vs_ci));
[ # # ]
5961 [ # # ][ # # ]: 0 : _load_static_jacobian2p(tnode,b,bi,(-pterm_Vb_bi));
[ # # ]
5962 [ # # ][ # # ]: 0 : _load_static_jacobian2p(tnode,ei,e,(-pterm_Vei_e));
[ # # ]
5963 [ # # ][ # # ]: 0 : _load_static_jacobian2p(tnode,ci,c,(-pterm_Vci_c));
[ # # ]
5964 [ # # ]: 0 : _load_static_jacobian1(tnode,tnode,((Vrth_Vtnode_GND/rth)-pterm_Vtnode_GND));
5965 : : #endif
5966 : : #if defined(_DYNAMIC)
5967 [ # # ][ # # ]: 0 : _load_dynamic_residual1(tnode,_DDT((cth*Vrth)));
5968 : : #if defined(_DERIVATE)
5969 [ # # ][ # # ]: 0 : _load_dynamic_jacobian1(tnode,tnode,(cth*Vrth_Vtnode_GND));
[ # # ]
5970 : : #endif
5971 : : #endif
5972 : : }
5973 : : #if defined(_DERIVATE)
5974 : 0 : fourkt_Vtnode_GND=((4.0*1.3806503e-23)*Tdev_Vtnode_GND);
5975 : : #endif
5976 : 0 : fourkt=((4.0*1.3806503e-23)*Tdev);
5977 [ # # ][ # # ]: 0 : if
5978 : : ((rbx>=0.001)||(rbi0>=0.001))
5979 : : {
5980 : 0 : _save_whitenoise2(b,bi,(fourkt/rb),NULL);
5981 : : }
5982 [ # # ]: 0 : if
5983 : : (rcx>=0.001)
5984 : : {
5985 : 0 : _save_whitenoise2(ci,c,(fourkt/rcx_t),NULL);
5986 : : }
5987 [ # # ]: 0 : if
5988 : : (re>=0.001)
5989 : : {
5990 : 0 : _save_whitenoise2(ei,e,(fourkt/re_t),NULL);
5991 : : }
5992 : 0 : twoq=(2.0*1.602176462e-19);
5993 : 0 : _save_whitenoise2(bi,ei,(twoq*ijbe),NULL);
5994 : 0 : _save_whitenoise2(ci,ei,(twoq*it),NULL);
5995 : : {
5996 : 0 : double m00_pow(d00_pow0,ijbe,af)
5997 : : #if defined(_DERIVATE)
5998 [ # # ]: 0 : double m10_pow(d10_pow0,d00_pow0,ijbe,af)
5999 : : #endif
6000 : : #if defined(_DERIVATE)
6001 : 0 : flicker_Pwr_Vtnode_GND=(kf*(d10_pow0*ijbe_Vtnode_GND));
6002 : 0 : flicker_Pwr_Vbi_ei=(kf*(d10_pow0*ijbe_Vbi_ei));
6003 : : #endif
6004 : 0 : flicker_Pwr=(kf*d00_pow0);
6005 : : }
6006 : 0 : _save_flickernoise2(bi,ei,flicker_Pwr,1.0,NULL);
6007 : :
6008 : : /* ------------------ end of verilog analog equations --------------------- */
6009 : :
6010 : : /* ------------------ evaluate verilog noise equations -------------------- */
6011 : :
6012 : : /* ------------------- end of verilog noise equations --------------------- */
6013 : 0 : }
6014 : :
6015 : : /* Perform DC iteration. */
6016 : 0 : void hic0_full::calcDC (void)
6017 : : {
6018 : : // evaluate Verilog code
6019 : 0 : initVerilog ();
6020 : 0 : calcVerilog ();
6021 : :
6022 : : // fill right hand side and static jacobian
6023 [ # # ]: 0 : for (int i1 = 0; i1 < 8; i1++) {
6024 [ # # ]: 0 : setI (i1, _rhs[i1]);
6025 [ # # ]: 0 : for (int i2 = 0; i2 < 8; i2++) {
6026 [ # # ]: 0 : setY (i1, i2, _jstat[i1][i2]);
6027 : : }
6028 : : }
6029 : 0 : }
6030 : :
6031 : : /* Save operating points. */
6032 : 0 : void hic0_full::saveOperatingPoints (void)
6033 : : {
6034 : : // save global instance operating points
6035 : 0 : setOperatingPoint ("qjci", qjci);
6036 : 0 : setOperatingPoint ("qjei", qjei);
6037 : 0 : setOperatingPoint ("cjei", cjei);
6038 : 0 : setOperatingPoint ("it", it);
6039 : 0 : setOperatingPoint ("ijbc", ijbc);
6040 : 0 : setOperatingPoint ("iavl", iavl);
6041 : 0 : setOperatingPoint ("ijsc", ijsc);
6042 : 0 : setOperatingPoint ("Ieei", Ieei);
6043 : 0 : setOperatingPoint ("Icci", Icci);
6044 : 0 : setOperatingPoint ("Ibbi", Ibbi);
6045 : 0 : setOperatingPoint ("Ibici", Ibici);
6046 : 0 : setOperatingPoint ("ijbe", ijbe);
6047 : 0 : }
6048 : :
6049 : : /* Load operating points. */
6050 : 0 : void hic0_full::loadOperatingPoints (void)
6051 : : {
6052 : 0 : }
6053 : :
6054 : : /* Calculate operating points. */
6055 : 0 : void hic0_full::calcOperatingPoints (void)
6056 : : {
6057 : 0 : }
6058 : :
6059 : : /* Initialization of AC analysis. */
6060 : 0 : void hic0_full::initAC (void)
6061 : : {
6062 : 0 : allocMatrixMNA ();
6063 : 0 : }
6064 : :
6065 : : /* Perform AC calculations. */
6066 : 0 : void hic0_full::calcAC (nr_double_t frequency)
6067 : : {
6068 [ # # ]: 0 : setMatrixY (calcMatrixY (frequency));
6069 : 0 : }
6070 : :
6071 : : /* Compute Y-matrix for AC analysis. */
6072 : 0 : matrix hic0_full::calcMatrixY (nr_double_t frequency)
6073 : : {
6074 : 0 : _freq = frequency;
6075 : 0 : saveOperatingPoints ();
6076 : 0 : matrix y (8);
6077 : :
6078 [ # # ]: 0 : for (int i1 = 0; i1 < 8; i1++) {
6079 [ # # ]: 0 : for (int i2 = 0; i2 < 8; i2++) {
6080 : 0 : y (i1,i2) = nr_complex_t (_jstat[i1][i2], _jdyna[i1][i2] * 2 * M_PI * _freq);
6081 : : }
6082 : : }
6083 : :
6084 : 0 : return y;
6085 : : }
6086 : :
6087 : : /* Initialization of S-parameter analysis. */
6088 : 0 : void hic0_full::initSP (void)
6089 : : {
6090 : 0 : allocMatrixS ();
6091 : 0 : }
6092 : :
6093 : : /* Perform S-parameter calculations. */
6094 : 0 : void hic0_full::calcSP (nr_double_t frequency)
6095 : : {
6096 [ # # ][ # # ]: 0 : setMatrixS (ytos (calcMatrixY (frequency)));
[ # # ][ # # ]
[ # # ]
6097 : 0 : }
6098 : :
6099 : : /* Initialization of transient analysis. */
6100 : 0 : void hic0_full::initTR (void)
6101 : : {
6102 : 0 : setStates (2 * 8 * 8);
6103 : 0 : initDC ();
6104 : 0 : }
6105 : :
6106 : : /* Perform transient analysis iteration step. */
6107 : 0 : void hic0_full::calcTR (nr_double_t)
6108 : : {
6109 : 0 : doHB = 0;
6110 : 0 : doAC = 1;
6111 : 0 : doTR = 1;
6112 : 0 : calcDC ();
6113 : :
6114 : : int i1, i2, i3, i4, state;
6115 : :
6116 : : // 2-node charge integrations
6117 [ # # ]: 0 : for (i1 = 0; i1 < 8; i1++) {
6118 [ # # ]: 0 : for (i2 = 0; i2 < 8; i2++) {
6119 : 0 : state = 2 * (i2 + 8 * i1);
6120 [ # # ]: 0 : if (i1 != i2)
6121 [ # # ]: 0 : if (_charges[i1][i2] != 0.0)
6122 : 0 : transientCapacitanceQ (state, i1, i2, _charges[i1][i2]);
6123 : : } }
6124 : :
6125 : : // 1-node charge integrations
6126 [ # # ]: 0 : for (i1 = 0; i1 < 8; i1++) {
6127 : 0 : state = 2 * (i1 + 8 * i1);
6128 [ # # ]: 0 : if (_charges[i1][i1] != 0.0)
6129 : 0 : transientCapacitanceQ (state, i1, _charges[i1][i1]);
6130 : : }
6131 : :
6132 : : // charge: 2-node, voltage: 2-node
6133 [ # # ]: 0 : for (i1 = 0; i1 < 8; i1++) {
6134 [ # # ]: 0 : for (i2 = 0; i2 < 8; i2++) {
6135 [ # # ]: 0 : if (i1 != i2)
6136 [ # # ]: 0 : for (i3 = 0; i3 < 8; i3++) {
6137 [ # # ]: 0 : for (i4 = 0; i4 < 8; i4++) {
6138 [ # # ]: 0 : if (i3 != i4)
6139 [ # # ]: 0 : if (_caps[i1][i2][i3][i4] != 0.0)
6140 [ # # ][ # # ]: 0 : transientCapacitanceC (i1, i2, i3, i4, _caps[i1][i2][i3][i4], BP(i3,i4));
6141 : : } } } }
6142 : :
6143 : : // charge: 2-node, voltage: 1-node
6144 [ # # ]: 0 : for (i1 = 0; i1 < 8; i1++) {
6145 [ # # ]: 0 : for (i2 = 0; i2 < 8; i2++) {
6146 [ # # ]: 0 : if (i1 != i2)
6147 [ # # ]: 0 : for (i3 = 0; i3 < 8; i3++) {
6148 [ # # ]: 0 : if (_caps[i1][i2][i3][i3] != 0.0)
6149 [ # # ]: 0 : transientCapacitanceC2Q (i1, i2, i3, _caps[i1][i2][i3][i3], NP(i3));
6150 : : } } }
6151 : :
6152 : : // charge: 1-node, voltage: 2-node
6153 [ # # ]: 0 : for (i1 = 0; i1 < 8; i1++) {
6154 [ # # ]: 0 : for (i3 = 0; i3 < 8; i3++) {
6155 [ # # ]: 0 : for (i4 = 0; i4 < 8; i4++) {
6156 [ # # ]: 0 : if (i3 != i4)
6157 [ # # ]: 0 : if (_caps[i1][i1][i3][i4] != 0.0)
6158 [ # # ][ # # ]: 0 : transientCapacitanceC2V (i1, i3, i4, _caps[i1][i1][i3][i4], BP(i3,i4));
6159 : : } } }
6160 : :
6161 : : // charge: 1-node, voltage: 1-node
6162 [ # # ]: 0 : for (i1 = 0; i1 < 8; i1++) {
6163 [ # # ]: 0 : for (i3 = 0; i3 < 8; i3++) {
6164 [ # # ]: 0 : if (_caps[i1][i1][i3][i3] != 0.0)
6165 [ # # ]: 0 : transientCapacitanceC (i1, i3, _caps[i1][i1][i3][i3], NP(i3));
6166 : : } }
6167 : 0 : }
6168 : :
6169 : : /* Compute Cy-matrix for AC noise analysis. */
6170 : 0 : matrix hic0_full::calcMatrixCy (nr_double_t frequency)
6171 : : {
6172 : 0 : _freq = frequency;
6173 : 0 : matrix cy (8);
6174 : :
6175 : 0 : _load_flickernoise2 (bi,ei,_flicker_pwr[bi][ei],_flicker_exp[bi][ei]);
6176 : 0 : _load_whitenoise2 (ci,ei,_white_pwr[ci][ei]);
6177 : 0 : _load_whitenoise2 (b,bi,_white_pwr[b][bi]);
6178 : 0 : _load_whitenoise2 (ci,c,_white_pwr[ci][c]);
6179 : 0 : _load_whitenoise2 (ei,e,_white_pwr[ei][e]);
6180 : 0 : _load_whitenoise2 (bi,ei,_white_pwr[bi][ei]);
6181 : :
6182 : 0 : return cy;
6183 : : }
6184 : :
6185 : : /* Perform AC noise computations. */
6186 : 0 : void hic0_full::calcNoiseAC (nr_double_t frequency)
6187 : : {
6188 [ # # ]: 0 : setMatrixN (calcMatrixCy (frequency));
6189 : 0 : }
6190 : :
6191 : : /* Perform S-parameter noise computations. */
6192 : 0 : void hic0_full::calcNoiseSP (nr_double_t frequency)
6193 : : {
6194 [ # # ][ # # ]: 0 : setMatrixN (cytocs (calcMatrixCy (frequency) * z0, getMatrixS ()));
[ # # ][ # # ]
[ # # ][ # # ]
[ # # ]
6195 : 0 : }
6196 : :
6197 : : /* Initialization of HB analysis. */
6198 : 0 : void hic0_full::initHB (int)
6199 : : {
6200 : 0 : initDC ();
6201 : 0 : allocMatrixHB ();
6202 : 0 : }
6203 : :
6204 : : /* Perform HB analysis. */
6205 : 0 : void hic0_full::calcHB (int)
6206 : : {
6207 : 0 : doHB = 1;
6208 : 0 : doAC = 1;
6209 : 0 : doTR = 0;
6210 : :
6211 : : // jacobian dI/dV and currents get filled
6212 : 0 : calcDC ();
6213 : 0 : saveOperatingPoints ();
6214 : :
6215 : : // fill in HB matrices
6216 [ # # ]: 0 : for (int i1 = 0; i1 < 8; i1++) {
6217 [ # # ]: 0 : setQ (i1, _qhs[i1]); // charges
6218 [ # # ]: 0 : setCV (i1, _chs[i1]); // jacobian dQ/dV * V
6219 [ # # ]: 0 : setGV (i1, _ghs[i1]); // jacobian dI/dV * V
6220 [ # # ]: 0 : for (int i2 = 0; i2 < 8; i2++) {
6221 [ # # ]: 0 : setQV (i1, i2, _jdyna[i1][i2]); // jacobian dQ/dV
6222 : : }
6223 : : }
6224 : 0 : }
6225 : :
6226 : : #include "hic0_full.defs.h"
6227 : :
|
