Lines Matching defs:inf
40 real, parameter :: nan = 0.0/0.0, large = huge(large), inf = 1.0/0.0
48 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) call abort
49 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) call abort
89 if (.not. isinf(max(large, inf))) call abort
90 if (isinf(min(large, inf))) call abort
91 if (.not. isinf(max(nan, large, inf))) call abort
92 if (isinf(min(nan, large, inf))) call abort
93 if (.not. isinf(max(large, nan, inf))) call abort
94 if (isinf(min(large, nan, inf))) call abort
95 if (.not. isinf(max(large, inf, nan))) call abort
96 if (isinf(min(large, inf, nan))) call abort
98 if (.not. isinf(min(-large, -inf))) call abort
99 if (isinf(max(-large, -inf))) call abort
100 if (.not. isinf(min(nan, -large, -inf))) call abort
101 if (isinf(max(nan, -large, -inf))) call abort
102 if (.not. isinf(min(-large, nan, -inf))) call abort
103 if (isinf(max(-large, nan, -inf))) call abort
104 if (.not. isinf(min(-large, -inf, nan))) call abort
105 if (isinf(max(-large, -inf, nan))) call abort