I have also tried this one but this is also not working
% function P = plot_arc(a,b,h,k,r)
% Plot a circular arc as a pie wedge.
% a is start of arc in radians,
% b is end of arc in radians,
% (h,k) is the center of the circle.
% r is the radius.
% Try this: plot_arc(pi/4,3*pi/4,9,-4,3)
% Author: Matt Fig
syms r Z_r w_r t i_L
syms n V_in V_o v_c v_cr
% t = linspace(a,b);
% x = r*cos(t) + h;
% y = r*sin(t) + k;
% x = [x h x(1)];
% y = [y k y(1)];
h=n*V_in;
k=0;
a=V_o/2-v_cr;
b=V_o/2+v_cr;
t = linspace(a,b);
r=n*V_in-(V_o/2)+v_cr;
i_L=(r/Z_r)*sin(pi-w_r*t);
v_c=n*V_in+r*cos(pi-w_r*t);
v_c = [v_c h v_c(1)];
i_L = [i_L k i_L(1)];
y=i_L*Z_r;
P = fill(v_c,y,'r');
axis([h-r-1 h+r+1 k-r-1 k+r+1])
axis square;
if ~nargout
clear P
end
P = plot_arc(a,b,h,k,r);
set(P,'edgecolor','b','linewidth',4)
