>> H0=-2

H0 =

-2

>> Q=2

Q =

2

>> f0=100000

f0 =

100000

>> W0=2*pi*f0

W0 =

6.2832e+05

>> L=H0*W0*W0

L =

-7.8957e+11

>> M=[1 W0/Q W0*W0]

M =

1.0e+11 *

0.0000 0.0000 3.9478

>> W=logspace(2,6.5,200)

W =

1.0e+06 *

>> [Mod, F]=bode(L,M,W)

>> subplot(2,1,1)

>> semilogx(W/2/pi,20*log10(Mod));grid

>> title('Charakterystyka amplitudowa');

>> xlabel('Częstotliwość [Hz]')

>> ylabel('Faza')

>> ylabel('Ku[dB]')

>> subplot(2,1,2)

>> semilogx(W/2/pi,F)

>> grid

>> title('Charakterystyka fazowa')

>> xlabel('Częstotliwość[Hz]')

>> ylabel ('faza')