% filter study
% Loop filter model (2nd order)
%clear;
delta_q=2e-6;
TimeStep=1e-12;
SimTime=1e-7;
Cb = 132e-12;
Cs = 10.2e-12;
R = 45.1e3;
G = 1/R;
%w=1:
%t=0:TimeStep:1e-3;
num=[R*Cs/5e5 1/5e5];
den=[R*Cs*Cb (Cs+Cb) 0];
H=tf(num,den);
figure(3);
[y,t,x]=step(H,0:TimeStep:SimTime);
plot(t,y);
figure(2);
bode(H,{1,500e6});
%figure(1);plot(vctl,'b');