clear all
close all
for i=1:100
    x=-1:0.1:1;
    f=(-10*abs(x)+10)/i;
    y=zeros(length(x),1);
    plot(x,f,x,y,'r-')
    axis([-1 1 -2 10])
    pause(0.01)
end
