function[b,a]=u_chb1ap(N,Ap,OmegaC)
% 未歸一化的切比雪夫I型模擬低通濾波器原型
% b=G(s)分子多項式的系數
% a=G(s)分母多項式的系數
% OmegaC=截止頻率，rad/s
% Ap=通帶波動的+dB數
% N=濾波器的階次

[z,p,k]=cheb1ap(N,Ap);
a=real(poly(p));
aNn=a(N+1);
p=p*OmegaC;
a=real(poly(p));
aNu=a(N+1);
k=k*aNu/aNn;
b0=k;
B=real(poly(z));
b=k*B;