Syntéza příčkové struktury LC filtru
Syntéza příčkové struktury NDP. Výpis kaskádní matice filtru a zbytkové matice (po realizaci) je proveden při volbě infolevel[syntfil] > 2 .
> | infolevel[syntfil]:=3: |
> | R1:=1: |
> | elems_NLP:=DroppNLP(common,R1,front,T,G,phi,zeros): |
Příčková struktura LC filtru výše vypočtené NLP.
Analýza výsledné LC struktury NDP - výpočet modulu přenosu NLP a jeho vykreslení. Přenos lze pro oboustranné zakončení ( , ) vypočítat jako poměrný výkonový (implicitně) nebo jako napěťový. Pro zakončení naprázdno ( ) nevo nakrátko ( ) je možné počítat pouze napěťový přenos. Dále je uveden výpočet modulu pro a .
> | H_NLP:=MakeH(elems_NLP); #for voltage transfer: MakeH(elems_NLP,V); |
> | mg_NLP:=MagnitudeHdB(H_NLP)(omega): |
> | plot(mg_NLP,omega=0..5,labels=["omega [1/s]","a [dB]"],thickness=2); |
> | check_ap:=evalf(subs(omega=1,mg_NLP)); |
> | H_NLP_infty:=limit(H_NLP,p=infinity); |
syntfil/MakeH_LC:
Voltage transfer:false
Impednční a kmitočtové odnormování - určení struktury a velikost prvků požadované pásmové propusti.
> | R:=100: |
> | elems_BP:=ElemsBP(elems_NLP,R,f_p,fp): #Alternative command: ElemsBP2(elems_NLP,R,fm,delta_fp): |
Výsledné LC struktura požadované pásmové propusti.
Následujícím příkazem lze vypočítat modifikovanou structuru zapojení.
> | ElemsBPm(elems_NLP,R,f_p,fp): |
Zapojení modifikované LC požadované PP.
Zahrnutí vlivu konečných činitelů jakosti (jednotlivých) induktorů pomocí odpovídajících, sériově řazených rezistorů.
> | Q:=50: #Alternativní zadání činitelů pro jednotlivé indultory zvlášť: Q:=[50,40,50,60,40,60,50]: |
> | elems_BPQ:=MakeRealL(elems_BP,Q,f_p,fp): #Alternativní příkaz s použitím geomerického středu propustného pásma: MakeRealL(elems_BP,Q,fm): |
Analýza LC struktur PP- vykreslení modulových charakteristik ideální a reálné struktury (se zahrnutím činitelů jakosti induktorů) výše vypočtených LC struktur.
> | infolevel[syntfil]:=1: |
> | H_BP:=MakeH(elems_BP): H_BPQ:=MakeH(elems_BPQ): |
> | mg_BP:=MagnitudeHdB(H_BP)(2*Pi*f): mg_BPQ:=MagnitudeHdB(H_BPQ)(2*Pi*f): |
> | plot([mg_BP,mg_BPQ],f=0.1*f_s..1.3*fs,color=[red,blue],labels=["f [Hz]","a [dB]"],thickness=2); |
> | check_ap1:=evalf(subs(f=f_p,mg_BP)),evalf(subs(f=f_p,mg_BPQ)); |
> | check_ap2:=evalf(subs(f=fp,mg_BP)),evalf(subs(f=fp,mg_BPQ)); |
> | check_as:=evalf(subs(f=fs,mg_BP)),evalf(subs(f=fs,mg_BPQ)); |
> | Cauer_asnew(N3); |