%to test for underflow/overflow
%
format long g;
UnderFlow = 0.50000000000000005*2^(-1074);
SubNormal = 0.50000000000000006*2^(-1074);
disp(['UnderFlow = ', num2str(UnderFlow)]);
disp(['SubNormal = ', num2str(SubNormal)]);
pause;

OverFlow = 1.9999999999999999*2^(1023);
MaxNumber= 1.9999999999999998*2^(1023);
disp(['MaxNumber =', num2str(MaxNumber)]);
disp(['OverFlow  =', num2str(OverFlow)]);

