Komplexně sdružená dvojice pólů a komlexně sdružená dvojice nul na imaginární ose s  `<`(omega__n, omega__0): eliptická horní propust (HP) 

Image                Image 

Přenosová funkce je opět ve tvaru: 

> Pqe;
simplify(%);
 

 

(8.2.1)
 

a stejné jsou samozřejmě i limitní hodnoty modulu přenosu pro DC a velmi vysoký kmitočet: 

> 'Pqe(infinity)'=limit(Pqe, p = infinity)
 

(8.2.2)
 

> 'Pqe(0)'=limit(Pqe, p = 0)
 

Pqe(0) = `/`(`*`(`^`(omega[n], 2), `*`(K)), `*`(`^`(omega[0], 2))) (8.2.3)
 

Ani jedna z hodnot není nulová (systém má nennulový přenos). Pokud platí jedná o HP, přičemž rozdíl mezi přenosem v propustném a nepropustném pásmu je dán opět podílem abs(`/`(`*`(`^`(omega[0], 2)), `*`(`^`(omega[n], 2)))). Násobná konstanta se obvykle udává ve tvaru K = H[infinity], což je přímo zisk v propustném pásmu.   

Image 

Hodnota převýšení modulové charakteristiky pro zlomový kmitočet omega[0]odpovídá přesně předchozímu případu, tj. je o něco menší než Q a fáze přenosu pro zlomový kmitočet omega[0]je zde +π/2 (změna znaménka souvisí s relací `<`(omega__n, omega__0)).  

> `Pqe(omega[0])`=simplify(evalc(abs(subs({p=I*omega[0],K = H[infinity]},Pqe)))) assuming Q>0, H[infinity]>0, omega[n]>0, omega[0]>omega[n];
subs({H[infinity]=1,omega[n]=1000,omega[0]=5000.,Q=4,p=I*omega},%);
 

> 'phi__Pqe(omega[0])'=simplify(evalc(argument(subs(p=I*omega[0],Pqe)))) assuming Q>1, K>0, omega[n]>0, omega[0]>omega[n];
 

 

 

(8.2.4)
 

Minimum modulové charakteristiky nastává opět při kmitočtu omega[n], kde se fáze přenosu mění skokově o Pi 

Např. pro Q = 4 a H[0] = 1 (tj. K = 1), dostaneme následující kmtičtové charakteristiky 

> Pf:=subs({K=1,omega[0]=5000,omega[n]=1000,Q=4,p=I*omega},Pqe):
semilogplot(20*log10(abs(Pf)),omega=100..100000,title=`Modulová charakteristika s logaritmickým měřítkem kmitočtu`,labels=[omega,typeset(20*log10(abs('Pqe'))," [dB]")],axes=FRAME,labelfont=[HELVETICA], axesfont=[HELVETICA,8],thickness=2,gridlines=true);
semilogplot(180/Pi*argument(Pf),omega=100..100000,title=`Fázová charakteristika s logaritmickým měřítkem kmitočtu`,labels=[omega,typeset(varphi['Pqe']," [°]")], axes=FRAME,labelfont=[HELVETICA], axesfont=[HELVETICA,8],thickness=2,gridlines=true);
 

 

Plot_2d
Plot_2d
 

Mmaximum modulové charakteristiky nastává pří kmitočtu omega__max a maximum je rovno H__max. Jejich vztahy jsou samozřejmě shodné se vztahy uvedenými v předchozím případě.   

> solve(diff(evalc(abs(subs(p=I*omega,Pqe))),omega),omega) assuming Q>1, K>0, omega[n]>0, omega[0]>omega[n];
evalf(subs({K=1,omega[n]=1000,omega[0]=5000,Q=4},[%]));
simplify(subs({p=I*(%%[2])},abs(Pqe))) assuming Q>1, K>0, omega[n]>0, omega[0]>omega[n];
evalf(subs({K=1,omega[n]=1000,omega[0]=5000,Q=4},[%]));
 

 

 

 

0, `/`(`*`(`^`(`*`(`+`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[0], 2)))), `-`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[n], 2))))), `-`(`*`(`^`(omega[0], 2)))), `*`(`+`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[0], 2...
0, `/`(`*`(`^`(`*`(`+`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[0], 2)))), `-`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[n], 2))))), `-`(`*`(`^`(omega[0], 2)))), `*`(`+`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[0], 2...
0, `/`(`*`(`^`(`*`(`+`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[0], 2)))), `-`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[n], 2))))), `-`(`*`(`^`(omega[0], 2)))), `*`(`+`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[0], 2...
[0., 5086.730950, -5086.730950, `+`(4960.783707, `*`(624.9999999, `*`(I))), `+`(`-`(4960.783707), `-`(`*`(624.9999999, `*`(I)))), `+`(4960.783708, `-`(`*`(625.0000000, `*`(I)))), `+`(`-`(4960.783708),...
[0., 5086.730950, -5086.730950, `+`(4960.783707, `*`(624.9999999, `*`(I))), `+`(`-`(4960.783707), `-`(`*`(624.9999999, `*`(I)))), `+`(4960.783708, `-`(`*`(625.0000000, `*`(I)))), `+`(`-`(4960.783708),...
`/`(`*`(K, `*`(Q, `*`(abs(`/`(`*`(`+`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[0], 2), `*`(omega[n])))), `-`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[n], 3))))), `-`(`*`(`^`(omega[0], 2), `*`(omega[n]))), `*`(`...
`/`(`*`(K, `*`(Q, `*`(abs(`/`(`*`(`+`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[0], 2), `*`(omega[n])))), `-`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[n], 3))))), `-`(`*`(`^`(omega[0], 2), `*`(omega[n]))), `*`(`...
`/`(`*`(K, `*`(Q, `*`(abs(`/`(`*`(`+`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[0], 2), `*`(omega[n])))), `-`(`*`(2, `*`(`^`(Q, 2), `*`(`^`(omega[n], 3))))), `-`(`*`(`^`(omega[0], 2), `*`(omega[n]))), `*`(`...
[3.875602154] (8.2.5)
 

Charakter časové odezvy odpovídá opět pouze pólům přenosu (omega__0 je vetší oproti předchozímu případu, proto je kmitočet odezvy větší).  

> Ptn:=invlaplace(subs({K=1,omega[n]=1000,omega[0]=5000,Q=4},Pqe), p, t);
plot(Ptn,t=0..0.03,title=`Impulzní charakteristika`,labels=[t,`Ptn `],labelfont=[HELVETICA],axesfont=[HELVETICA,8],thickness=2);
 

 

 

omega__0
Plot_2d
 

Jak bylo odvozeno výše, charakter odezvy je plně určen charakterem pólů přenosu, tj. kmitočet odezvy je dán imaginární částí pólu, zatímco tlumení je dáno jeho reálnou částí.  

> 'p12'=solve(subs({omega[0]=5000,Q=4},denom(Pqe)));
 

(8.2.6)
 

>