(1-2^(-53))*2^1024
2^1024
(1-2^(-53))*2^1023*2
realmax
realmin
1
format bit
1
format hex
1
format
x=1.e-15
10^(-15)
((1+x)-1)/x
ans-1
quit
