Vykreslení modulových charakteristik jednotlivých bloků a v kaskádní struktuře za jednotlivými bloky
> | k:=nops(op(eval(ARC_bs_id,1)))-1; |
> | leg:=[seq(convert(i,string),i=1..k)]: |
Výpočet modulů jednotlibých bloků a modulů přenosů za jednotlivými bloky v kaskádní struktuře filtru.
> | H_bs_ARC_B:=seq(MakeH(ARC_bs_id[i],p),i=1..k): |
> | mg_bs_ARC_B:=seq(MagnitudeHdB(H_bs_ARC_B[i])(2*Pi*f),i=1..k): |
> | mg_bs_ARC_Bp:=seq(sum(mg_bs_ARC_B['i'],'i'=1..j),j=1..k): |
Vykreslení modulových charakteristik jednotlivých bloků.
> | plot([mg_bs_ARC_B],f=0..f_p4*1.5,legend=leg); |
Vykreslení modulových charakteristik v kaskádní struktuře za jednotlivými bloky, čehož je patrná vyrovnaná dynamika.
> | plot([mg_bs_ARC_Bp],f=0..f_p4*1.5,M=-80..0,legend=leg); |