close all 
clear all

%phi=0:0.001:pi/3.5;
%S11=cos(phi)-1i.*sin(phi);

freq=0.0001:0.100:10000;
CC=10^-6;
ZL=1./(1i.*2*pi*freq*CC);
Z0=50;

S11=(ZL-Z0)./(Z0+ZL);

% Check of the Smith chart
figure
[lineseries,hsm] = smithchart(S11);
set(lineseries,'LineWidth',3);
set(hsm,'LineWidth',3,'LabelSize',18,'Color',[0 0 0]);
hold on;

saveas(gcf,'Capacitance','jpg')
