function ret = meuler(steps)

% This function will return an Euler approximation for the
% function e^x over the interval [0,1] using a step size
% of h = 1/steps

stepsize = 1/steps;

x = 0;
% yn5 = yn + h . yn / 2
% yn1 = yn + h . fn5

yn = 1/exp(1);
while (x <= 1)
	yn5 = yn + stepsize * yn / 2;
	yn1 = yn + stepsize * yn5;
	x = x + stepsize;
	yn = yn1;
end;

ret = yn;