Searched refs:zeps10 (Results 1 – 1 of 1) sorted by relevance
29 eps10 = epsilon(0._10), zeps10 = real(z'3fc08000000000000000', kind=10), & variable39 logical, parameter :: test_eps10 = eps10 == zeps10 .and. eps10 == deps10