%Bode Plot from open-loop equation
% Second-Order, Type 1 (Lag-lead filter)
% Modify pole, zero, K from Eq. (5.M.1)

clg;
Wz = 1000;
Wp = .1;
K = 1000000;

num = [K/Wz K];
den = [1/Wp 1 0];
bode(num,den);
