3

ty C:\Documents and Settings\student\Pulpit\impedancja.m

D^l

Text Debug Breakpoints Web Window Help

& % d ** &

m

(#4 f „

nr ja©

Stack:

File Edit View

1	-	elear; cle;
2	-	fz=50; fp=10; fs=1000;
3	-	Rz=l; Rp=l.006;
4	-	0mega_z=2*pi*(fz/fs);
5	-	0mega_p=2*pi*(fp/fs);
6	-	z=Rz*exp(j *0mega_z);
7	-	p=Rp*exp(j *0mega_p);
8	—	z=[z conj(z)];
9	-	p=[p conj(p)];
10
11	-	[b,a]=zp2tf(z^1,p^1,1);
12	-	[Hl,wl]=freqz(b,a,1024,fs);
13	-	x=zeros(1,512); x(l)=l;
14	-	y=filter(b,a,x);
15	-	subplot(2,l,l); plot(wl,abs(HI));
16		subplot(2,l,2); plot(y);

Ln 3 Col 15

script

	Workspace	Current Directory
| Command Hi story		MM

ty C:\Document...    Figurę No. 1

H

^:ile Edit View Insert

Help

Array Editor: b '3 Katedra Syst...    cps_lab6[l] -...    $ 2-Paint