clear all;
close all;
% Program for plotting the pw linear periodic kernel
h=0.001;
xa=0:h:2*pi-4;
xb=2*pi-4:h:4;
xc=4:h:2*pi;
fa=4-xa;
fb=(8-2*pi)*ones(size(xb));
fc=4-2*pi+xc;
plot([xa-2*pi xb-2*pi xc-2*pi  xa xb xc],[fa fb fc fa fb fc])
axis([-2*pi 2*pi 1 4.5])