Searched refs:r4_nan (Results 1 – 2 of 2) sorted by relevance
| /external/llvm-project/flang/test/Evaluate/ |
| D | folding03.f90 | 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
[all …]
|
| D | folding04.f90 | 14 real(4), parameter :: r4_nan = 0._4/0._4 variable
|