| /dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/external/gen1int/include/private/ |
| H A D | tab_boys.h | 5 1.0000000000000000000000000_8, 0.3333333333333333148296163_8, &
6 0.2000000000000000111022302_8, 0.1428571428571428492126927_8, &
7 0.1111111111111111049432054_8, 0.0909090909090909116141432_8, &
8 0.0769230769230769273470116_8, 0.0666666666666666657414808_8, &
9 0.0588235294117647050660125_8, 0.0526315789473684181309920_8, &
10 0.0476190476190476164042309_8, 0.0434782608695652161845402_8, &
11 0.0400000000000000008326673_8, 0.0370370370370370349810685_8, &
12 0.0344827586206896546938694_8, 0.0322580645161290313627234_8, &
13 0.0303030303030303038713811_8, 0.0285714285714285705364279_8, &
14 0.0270270270270270285273284_8, 0.0256410256410256401360392_8, &
[all …]
|
| /dports/devel/wasi-libcxx/llvm-project-13.0.1.src/flang/test/Evaluate/ |
| H A D | folding02.f90 | 26 logical, parameter :: test_sign_i8 = sign(1_8,2_8) == 1_8 .and. sign(1_8,-3_8) == -1_8
90 TEST_R8(atan2, atan2(1.5_8, 1._8), &
92 TEST_R8(atan_2, atan(1.5_8, 1._8), &
116 TEST_R8(mod, mod(-8.1_8, 5._8), &
119 logical, parameter :: test_sign_r8 = sign(1._8,2._8) == 1._8 .and. sign(1._8,-2._8) == -1._8
190 TEST_C8(cos, cos((0.9_8, 1.1_8)), &
196 TEST_C8(exp, exp((0.4_8, 0.8_8)), &
199 TEST_C8(log, log((1.5_8, 2.5_8)), &
202 TEST_C8(sin, sin((0.7_8, 1.1_8)), &
256 TEST_R8(pow, (0.5_8**3.14_8), &
[all …]
|
| /dports/devel/llvm12/llvm-project-12.0.1.src/flang/test/Evaluate/ |
| H A D | folding02.f90 | 25 logical, parameter :: test_sign_i8 = sign(1_8,2_8) == 1_8 .and. sign(1_8,-3_8) == -1_8
89 TEST_R8(atan2, atan2(1.5_8, 1._8), &
91 TEST_R8(atan_2, atan(1.5_8, 1._8), &
115 TEST_R8(mod, mod(-8.1_8, 5._8), &
118 logical, parameter :: test_sign_r8 = sign(1._8,2._8) == 1._8 .and. sign(1._8,-2._8) == -1._8
189 TEST_C8(cos, cos((0.9_8, 1.1_8)), &
195 TEST_C8(exp, exp((0.4_8, 0.8_8)), &
198 TEST_C8(log, log((1.5_8, 2.5_8)), &
201 TEST_C8(sin, sin((0.7_8, 1.1_8)), &
255 TEST_R8(pow, (0.5_8**3.14_8), &
[all …]
|
| /dports/devel/llvm-devel/llvm-project-f05c95f10fc1d8171071735af8ad3a9e87633120/flang/test/Evaluate/ |
| H A D | folding02.f90 | 26 logical, parameter :: test_sign_i8 = sign(1_8,2_8) == 1_8 .and. sign(1_8,-3_8) == -1_8
90 TEST_R8(atan2, atan2(1.5_8, 1._8), &
92 TEST_R8(atan_2, atan(1.5_8, 1._8), &
116 TEST_R8(mod, mod(-8.1_8, 5._8), &
119 logical, parameter :: test_sign_r8 = sign(1._8,2._8) == 1._8 .and. sign(1._8,-2._8) == -1._8
190 TEST_C8(cos, cos((0.9_8, 1.1_8)), &
196 TEST_C8(exp, exp((0.4_8, 0.8_8)), &
199 TEST_C8(log, log((1.5_8, 2.5_8)), &
202 TEST_C8(sin, sin((0.7_8, 1.1_8)), &
256 TEST_R8(pow, (0.5_8**3.14_8), &
[all …]
|
| /dports/devel/wasi-compiler-rt13/llvm-project-13.0.1.src/flang/test/Evaluate/ |
| H A D | folding02.f90 | 26 logical, parameter :: test_sign_i8 = sign(1_8,2_8) == 1_8 .and. sign(1_8,-3_8) == -1_8
90 TEST_R8(atan2, atan2(1.5_8, 1._8), &
92 TEST_R8(atan_2, atan(1.5_8, 1._8), &
116 TEST_R8(mod, mod(-8.1_8, 5._8), &
119 logical, parameter :: test_sign_r8 = sign(1._8,2._8) == 1._8 .and. sign(1._8,-2._8) == -1._8
190 TEST_C8(cos, cos((0.9_8, 1.1_8)), &
196 TEST_C8(exp, exp((0.4_8, 0.8_8)), &
199 TEST_C8(log, log((1.5_8, 2.5_8)), &
202 TEST_C8(sin, sin((0.7_8, 1.1_8)), &
256 TEST_R8(pow, (0.5_8**3.14_8), &
[all …]
|
| /dports/devel/wasi-compiler-rt12/llvm-project-12.0.1.src/flang/test/Evaluate/ |
| H A D | folding02.f90 | 25 logical, parameter :: test_sign_i8 = sign(1_8,2_8) == 1_8 .and. sign(1_8,-3_8) == -1_8
89 TEST_R8(atan2, atan2(1.5_8, 1._8), &
91 TEST_R8(atan_2, atan(1.5_8, 1._8), &
115 TEST_R8(mod, mod(-8.1_8, 5._8), &
118 logical, parameter :: test_sign_r8 = sign(1._8,2._8) == 1._8 .and. sign(1._8,-2._8) == -1._8
189 TEST_C8(cos, cos((0.9_8, 1.1_8)), &
195 TEST_C8(exp, exp((0.4_8, 0.8_8)), &
198 TEST_C8(log, log((1.5_8, 2.5_8)), &
201 TEST_C8(sin, sin((0.7_8, 1.1_8)), &
255 TEST_R8(pow, (0.5_8**3.14_8), &
[all …]
|
| /dports/www/chromium-legacy/chromium-88.0.4324.182/third_party/llvm/flang/test/Evaluate/ |
| H A D | folding02.f90 | 25 logical, parameter :: test_sign_i8 = sign(1_8,2_8) == 1_8 .and. sign(1_8,-3_8) == -1_8
89 TEST_R8(atan2, atan2(1.5_8, 1._8), &
91 TEST_R8(atan_2, atan(1.5_8, 1._8), &
115 TEST_R8(mod, mod(-8.1_8, 5._8), &
118 logical, parameter :: test_sign_r8 = sign(1._8,2._8) == 1._8 .and. sign(1._8,-2._8) == -1._8
189 TEST_C8(cos, cos((0.9_8, 1.1_8)), &
195 TEST_C8(exp, exp((0.4_8, 0.8_8)), &
198 TEST_C8(log, log((1.5_8, 2.5_8)), &
201 TEST_C8(sin, sin((0.7_8, 1.1_8)), &
255 TEST_R8(pow, (0.5_8**3.14_8), &
[all …]
|
| /dports/devel/llvm13/llvm-project-13.0.1.src/flang/test/Evaluate/ |
| H A D | folding02.f90 | 26 logical, parameter :: test_sign_i8 = sign(1_8,2_8) == 1_8 .and. sign(1_8,-3_8) == -1_8
90 TEST_R8(atan2, atan2(1.5_8, 1._8), &
92 TEST_R8(atan_2, atan(1.5_8, 1._8), &
116 TEST_R8(mod, mod(-8.1_8, 5._8), &
119 logical, parameter :: test_sign_r8 = sign(1._8,2._8) == 1._8 .and. sign(1._8,-2._8) == -1._8
190 TEST_C8(cos, cos((0.9_8, 1.1_8)), &
196 TEST_C8(exp, exp((0.4_8, 0.8_8)), &
199 TEST_C8(log, log((1.5_8, 2.5_8)), &
202 TEST_C8(sin, sin((0.7_8, 1.1_8)), &
256 TEST_R8(pow, (0.5_8**3.14_8), &
[all …]
|
| /dports/devel/llvm-cheri/llvm-project-37c49ff00e3eadce5d8703fdc4497f28458c64a8/flang/test/Evaluate/ |
| H A D | folding02.f90 | 30 logical, parameter :: test_sign_i8 = sign(1_8,2_8) == 1_8 .and. sign(1_8,-3_8) == -1_8
84 TEST_R8(atan2, atan2(1.5_8, 1._8), &
86 TEST_R8(atan_2, atan(1.5_8, 1._8), &
102 TEST_R8(hypot, hypot(1.1_8, 0.1_8), &
110 TEST_R8(mod, mod(-8.1_8, 5._8), &
113 logical, parameter :: test_sign_r8 = sign(1._8,2._8) == 1._8 .and. sign(1._8,-2._8) == -1._8
190 TEST_C8(cos, cos((0.9_8, 1.1_8)), &
196 TEST_C8(exp, exp((0.4_8, 0.8_8)), &
199 TEST_C8(log, log((1.5_8, 2.5_8)), &
247 TEST_R8(pow, (0.5_8**3.14_8), &
[all …]
|
| /dports/devel/f18/f18-1688bef/test/evaluate/ |
| H A D | folding02.f90 | 43 logical, parameter :: test_sign_i8 = sign(1_8,2_8) == 1_8 .and. sign(1_8,-3_8) == -1_8
92 TEST_R8(atan2, atan2(1.5_8, 1._8), &
94 TEST_R8(atan_2, atan(1.5_8, 1._8), &
118 TEST_R8(mod, mod(-8.1_8, 5._8), &
121 logical, parameter :: test_sign_r8 = sign(1._8,2._8) == 1._8 .and. sign(1._8,-2._8) == -1._8
198 TEST_C8(cos, cos((0.9_8, 1.1_8)), &
204 TEST_C8(exp, exp((0.4_8, 0.8_8)), &
207 TEST_C8(log, log((1.5_8, 2.5_8)), &
210 TEST_C8(sin, sin((0.7_8, 1.1_8)), &
255 TEST_R8(pow, (0.5_8**3.14_8), &
[all …]
|
| /dports/lang/gcc6-aux/gcc-6-20180516/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/lang/gcc10/gcc-10.3.0/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/lang/gcc11/gcc-11.2.0/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/lang/gcc9-devel/gcc-9-20211007/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/lang/gcc48/gcc-4.8.5/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/lang/gcc9-aux/gcc-9.1.0/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|
| /dports/lang/gcc8/gcc-8.5.0/gcc/testsuite/gfortran.dg/ |
| H A D | complex_intrinsic_5.f90 | 13 real(8), parameter :: eps8 = epsilon(0.0_8)*2.0_8
52 z8 = cmplx(0.0_8, 0.0_8, kind=8)
56 call check(asin(z8), cmplx(0.0_8, 0.0_8, kind=8))
62 call check(atan(z8), cmplx(0.0_8, 0.0_8, kind=8))
65 call check(asinh(z8), cmplx(0.0_8, 0.0_8, kind=8))
71 call check(atanh(z8), cmplx(0.0_8, 0.0_8, kind=8))
97 call check(atanh(z8), cmplx(1.0_8, 0.0_8, kind=8))
112 call check(atan(z8), cmplx(0.0_8, 1.0_8, kind=8))
150 z8 = cmplx(1.0_8, 1.0_8, kind=8)
174 z8 = cmplx(1.1_8, 1.1_8, kind=8)
[all …]
|