Searched refs:sqrt_maxs8 (Results 1 – 1 of 1) sorted by relevance
30 real(8), parameter :: sqrt_maxs8 = sqrt(maxs8), sqrt_maxs8z = z'1fffffffffffffff' variable31 logical, parameter :: test_sqrt_maxs8 = sqrt_maxs8 == sqrt_maxs8z