Searched refs:zeps2 (Results 1 – 1 of 1) sorted by relevance
19 eps2 = epsilon(0._2), zeps2 = real(z'1400', kind=2), deps2 = 9.765625e-4_2 variable35 logical, parameter :: test_eps2 = eps2 == zeps2 .and. eps2 == deps2