PKuk·HñB–Hmimetypetext/x-wxmathmlPKuk·H¼><©© content.xml peak limiting current mode control determine d e1: jc = j0 + m1 * d; (%o1) jc=d*m1+j0 determine j1 e2: j1 = jc + m2 * (1 - d); (%o2) j1=

1−d

*m2+jc
solve for j1 and d s1: linsolve([e1, e2], [j1, d]); (%o3) [j1=j0*m2−jc*m2+m1*

m2+jc

m1
,d=jc−j0m1]
ej1: s1[1]; (%o4) j1=j0*m2−jc*m2+m1*

m2+jc

m1
find the steady state j0, labeled J0 e3: ev(ej1, j1 = j0); (%o5) j0=j0*m2−jc*m2+m1*

m2+jc

m1
s2: linsolve(e3, j0); (%o6) [j0=−jc*m1+

m1−jc

*m2
m2−m1
]
J0: rhs(s2[1]); (%o7) −jc*m1+

m1−jc

*m2
m2−m1
introduce perturbations e4: ev(ej1, j1 = J0 + dj1, j0 = J0 + dj0); (%o8) dj1−jc*m1+

m1−jc

*m2
m2−m1
=−jc*m2+m1*

m2+jc

+m2*

dj0−jc*m1+

m1−jc

*m2
m2−m1

m1
solve for dj1 e4: ratsimp(e4); (%o9) −

jc+dj1

*m1+

m1−jc−dj1

*m2
m2−m1
=−jc*m12+

jc−dj0

*m1−m12

*m2+dj0*m22
m1*m2−m12
final result solve(e4, dj1); (%o10) [dj1=dj0*m2m1]
PKuk·HñB–HmimetypePKuk·H¼><©© 5content.xmlPKo