% % Buck Outer loop... User should enter values...
clear all;
close all;
clc;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
s = tf('s');
% s = poly(0,'s');
% G = syslin("c",(((-7.192924e-8*(s^2))+(-195.7839e-12*s)+12.756e-6)/(((30.12163e-9)*(s^2))+(2.50e-3*s)+1)));
G = @(s)((-7.192924e-8*(s^2))+(-195.7839e-12*s)+12.756e-6) / (((30.12163e-9)*(s^2))+(2.50e-3*s)+1)
bode(G(2*pi*s), '+')
set (findobj (gcf, "type", "axes"), "nextplot", "add")
xlabel('Frequency [1/s]')
% C = syslin("c",((((11.2193e5)*(2.75e-8)*(s^2))+((11.2193e5)*(2.511e-3)*s)+11.2193e5) / (0.075*(s^2)+s)));
C = @(s)(((11.2193e5)*(2.75e-8)*(s^2))+((11.2193e5)*(2.511e-3)*s)+11.2193e5) / (0.075*(s^2)+s)
bode(C(2*pi*s), '*', 'color', 'green')
GH = G*C
% GH = sysmult(G,C)
%[GMgh, PMgh, w_pcgh, w_gcgh] = margin(GH)
bode(GH(2*pi*s), 'o', 'color', 'red')
grid on