8 lines · plain
1! RUN: %python %S/test_folding.py %s %flang_fc12module m3 real(4), parameter :: x20_4 = erfc_scaled(20._4)4 logical, parameter :: t20_4 = x20_4 == 0.02817435003817081451416015625_45 real(8), parameter :: x20_8 = erfc_scaled(20._8)6 logical, parameter :: t20_8 = x20_8 == 0.0281743487410513193669459042212110944092273712158203125_87end8