v0 = [ 1; 0; 0 ];
sigma = 10;
R = 28;
b = 8/3;
T = 1;
f = @(v) [ -sigma*(v(1)-v(2)); R*v(1)-v(2)-v(1)*v(3); v(1)*v(2)-b*v(3) ];

len = 10;

result = zeros(3,len+1);
h = zeros(1, len-1);
e = zeros(1, len-1);

for i = 0:len
	h(i+1) = 10^-2*2^-i;
	V = euler(f, v0, h(i+1), T);
	result(:,i+1) = V(:,end);
end

% calculation of error:
for i = 0:len
	e(i+1) = norm(result(:,i+1)-result(:,len+1));
end

loglog(h, e, '.-')
