%  Test to find Huge, Tiny and epsilon in our computer

% Tiny(x):
x=1.;
while x>0
    x=x/2.;
end
disp(x);

% Huge(x)
x=1.;
while x<inf
    x=x*2.;
end
disp(x);

%Epsilon(x)
epsi=1;
while 1< 1+epsi
    epsi=epsi/2;
end
disp(epsi);