clc
clear
close all

%IIR
%lowpass
fs=1000;%Sample frequence
fpass=100;
fstop=40;
Wp = fpass/(0.5*fs); Ws = fstop/(0.5*fs);
Rp = 3; Rs = 60;
[n,Wn] = buttord(Wp,Ws,Rp,Rs)
[b,a]= butter(n,Wn,'high');
freqz(b,a,512,fs); title('butter highpass');