Searched refs:zeps8 (Results 1 – 1 of 1) sorted by relevance
26 eps8 = epsilon(0._8), zeps8 = real(z'3cb0000000000000', kind=8), & variable38 logical, parameter :: test_eps8 = eps8 == zeps8 .and. eps8 == deps8