hypot(x,y)
is the Euclidean distance function. It is equal to , without undue underflow or overflow.
Fortran 2008 and later
result = hypot(x, y)
x
- The type shall be real
.y
- The type and kind type parameter shall be the same as x
.The return value has the same type and kind type parameter as x
.
program test_hypot
real(4) :: x = 1.e0_4, y = 0.5e0_4
x = hypot(x,y)
end program test_hypot