real :: x
real :: huge_real = huge(x)