Výpočet některých ostatních aproximací

Při změně parametru infolevel[syntfil] , lze obdržet výpis důležitých parametrů aproximace. Od provozního činitele přenosu, charakteristické funkce a případně nul přenosové funkce (při hodnotě 2) až např. po hodnotu parametrů elipsy (pro Čebyševovu aproximaci) pro hodnotu 5.    

>    infolevel[syntfil]:=5:

>    Chebyshev(Nch1,p):

>    `************************************************************************************************************`;

>    InvChebyshev(Nch1,p):

>    `************************************************************************************************************`;

>    CauerB(Nc1,p):

>    infolevel[syntfil]:=1:

epsilon = .99762834511098350277

Ellipse: a = .17753027159678291964, b = 1.0156362524709461690

Zeros of Phi:

[.95105651629515357212*I, -.95105651629515357212*I, .58778525229247312916*I, -.58778525229247312916*I]

Poles of H:

[-.54859870939405955934e-1+.96592747609808312260*I, -.54859870939405955934e-1-.96592747609808312260*I, -.14362500673779741575+.59697601089601702947*I, -.14362500673779741575-.59697601089601702947*I, -.17753027159678291964]

Chebyshev:

G = .99999999999999999988+15.962053521775736044*p^5+9.1702001784564922338*p^4+22.586707027055199576*p^3+8.7621635941100202583*p^2+6.5119801184003956185*p

Phi = 15.962053521775736044*p^5+19.952566902219670055*p^3+4.9881417255549175136*p

`************************************************************************************************************`

epsilon = .99762834511098350277

Ellipse: a = 1.7311027433653946501, b = 1.9991790085150444649

k1 = .27624309392265193371e-2

Poles of H:

[-.27424213602728283815+.97473594742390784559*I, -.27424213602728283815-.97473594742390784559*I, -.83806360945698557312+.70318057029816116029*I, -.83806360945698557312-.70318057029816116029*I, -1.1553329273292287362]

InvChebyshev:

G = (51.199999999999999996+36.114146093017602798*p^5+122.06380650868490424*p^4+206.27059575236909242*p^3+216.84495862853055963*p^2+143.41033353130982787*p)/(51.200000000000000003+p^4+16.000000000000000001*p^2)

Phi = 36.114146093017602798*p^5/(51.200000000000000003+p^4+16.000000000000000001*p^2)

Zeros = [2.1029244484765344241*I, -2.1029244484765344241*I, 3.4026032334081597288*I, -3.4026032334081597288*I]

`************************************************************************************************************`

epsilon = .99762834511098350277

Zeros(A) of Phi:

[.40632951794422069731*I, -.40632951794422069731*I, .93318866761479593939*I, -.93318866761479593939*I]

Poles(A) of Phi:

[4.9221134859184708752*I, -4.9221134859184708752*I, 2.1431893350269071575*I, -2.1431893350269071575*I]

Zeros(A) of H:

[4.9221134859184708752*I, -4.9221134859184708752*I, 2.1431893350269071575*I, -2.1431893350269071575*I]

Poles(A) of H:

[-.21396146741328874092+.41983617383638412018*I, -.21396146741328874092-.41983617383638412018*I, -.75257146078295724312e-1+.95455335289146399189*I, -.75257146078295724312e-1-.95455335289146399189*I]

Zeros of Phi:

[.39921796137372546811*I, -.39921796137372546811*I, .93060485910209959897*I, -.93060485910209959897*I]

Poles of Phi:

[2.3310696139518620415*I, -2.3310696139518620415*I]

Poles of H:

[-.21159781175284440566+.41140014208084634786*I, -.21159781175284440566-.41140014208084634786*I, -.78037708153169224077e-1+.95237273448796445327*I, -.78037708153169224077e-1-.95237273448796445327*I]

CauerB:

G = (7.6755673456220578708+39.276111996431282952*p^4+22.751514235946387155*p^3+46.863386995919668753*p^2+16.489106811495340808*p)/(5.4338855450896831313+p^2)

Phi = (5.4209982438703151087+39.276111996431282952*p^4+40.273740341542266459*p^2)/(5.4338855450896831313+p^2)

Zeros = [2.3310696139518620415*I, -2.3310696139518620415*I]