Lines Matching refs:r4_nan
80 real(4), parameter :: r4_nan = 0._4/0._4 variable
81 TEST_ISNAN(r4_nan)
87 logical, parameter :: test_r4_nan_parentheses1 = .NOT.(((r4_nan)).EQ.r4_nan)
88 logical, parameter :: test_r4_nan_parentheses2 = .NOT.(((r4_nan)).NE.r4_nan)
102 real(4), parameter :: r4_nan_minus = (-r4_nan)
104 real(4), parameter :: r4_nan_plus = (+r4_nan)
140 real(4), parameter :: r4_nan_sub3 = 0._4 - r4_nan
142 real(4), parameter :: r4_nan_sub4 = r4_nan - r4_pmax
144 real(4), parameter :: r4_nan_sub5 = r4_nan - r4_nmax
146 real(4), parameter :: r4_nan_sub6 = r4_nan - r4_nan
148 real(4), parameter :: r4_nan_add3 = 0._4 + r4_nan
150 real(4), parameter :: r4_nan_add4 = r4_nan + r4_pmax
152 real(4), parameter :: r4_nan_add5 = r4_nmax + r4_nan
154 real(4), parameter :: r4_nan_add6 = r4_nan + r4_nan
203 real(4), parameter :: r4_nan_div6 = 0._4/r4_nan
205 real(4), parameter :: r4_nan_div7 = r4_nan/r4_nan
207 real(4), parameter :: r4_nan_div8 = r4_nan/0._4
209 real(4), parameter :: r4_nan_div9 = r4_nan/1._4
211 real(4), parameter :: r4_nan_mult3 = r4_nan*1._4
213 real(4), parameter :: r4_nan_mult4 = r4_nan*r4_nan
215 real(4), parameter :: r4_nan_mult5 = 0._4*r4_nan
253 logical, parameter :: test_nan_r4_eq1 = .NOT.(r4_nan.EQ.r4_nan)
254 logical, parameter :: test_nan_r4_ne1 = .NOT.(r4_nan.NE.r4_nan)