Design a flow chart based on this code:

clear;

fs = 1e4;

tfin = 10e-4;

N = 1025;

width = 1e-4;

t = linspace(-tfin,tfin,N);

dt = t(2)-t(1);

T = t(end)-t(1) + (t(2)-t(1));

f = 1/T * (-(N-1)/2 : (N-1)/2);

y = rectpuls(t,width);

plot(t,y)

Y = width*fft(y);

Yplot = fftshift(Y);

figure;

plot(f,abs(Yplot))

hold on;

plot(1/width,width*sinc((1/width)*width),'ro');