Searched refs:zeps16 (Results 1 – 1 of 1) sorted by relevance
33 zeps16 = real(z'3f8f0000000000000000000000000000', kind=16), & variable40 logical, parameter :: test_eps16 = eps16 == zeps16 .and. eps16 == deps16