%-----------------------------------------
%script monster4
% plots the function T(x) = (x^2-2x+1)-(x-1)^2
% in various orders of evaluation: y and w identical
x = linspace(-0.000000000000001,0.000000000000001,333331);
%y = (x.^2-2*x+1)-(x-1).^2;
%for i = 1:333331,
%y(i)= (sqrt(x(i)+9)-3)/x(i);
y = (1-2*x + x.^2)-(1-x).^2;
z = (x-1).^2-(x.^2 - 2*x + 1);
w = (x.^2 - 2*x + 1)-(x-1).^2;
%end
plot(x,y,x,.66*z,x,.33*w)
title('plots of T(x) = (x^2-2x+1)-(x-1)^2 ')