Searched refs:sqrt_zero_8 (Results 1 – 1 of 1) sorted by relevance
50 real(8), parameter :: sqrt_zero_8 = sqrt(0.0) variable51 logical, parameter :: test_sqrt_zero_8 = sqrt_zero_8 == 0.0