Searched refs:eps4 (Results 1 – 2 of 2) sorted by relevance
23 eps4 = epsilon(0._4), zeps4 = real(z'33800000', kind=4), & variable37 logical, parameter :: test_eps4 = eps4 == zeps4 .and. eps4 == deps4
7 real(4), parameter :: eps4 = 0.000001_4 variable133 - 1.10453617572784423828125_4).LE.(eps4)169 - 1.1045361017187260710414875575224868953227996826171875_8).LE.(eps4)