| /dports/math/scilab/scilab-6.1.1/scilab/modules/m2sci/tests/unit_tests/mfiles/ |
| H A D | ISINF.m | 1 % Test file for function isinf()
5 res1 = isinf([]);
11 res4 = isinf([1]);
13 res5 = isinf([1,2,3]);
15 res6 = isinf([1;2;3]);
35 res16 = isinf([i]);
37 res17 = isinf([i,2i,3i]);
39 res18 = isinf([i;2i;3i]);
59 res28 = isinf(['s']);
113 res55 = isinf(inf);
[all …]
|
| /dports/devel/gettext-tools/gettext-0.21/gettext-tools/gnulib-tests/ |
| H A D | test-isinf.c | 25 #ifndef isinf
43 ASSERT (!isinf (0.0f)); in test_isinff()
48 ASSERT (!isinf (3.141f)); in test_isinff()
89 ASSERT (!isinf (0.0)); in test_isinfd()
94 ASSERT (!isinf (3.141)); in test_isinfd()
138 ASSERT (!isinf (0.0L)); in test_isinfl()
212 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
217 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
222 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
227 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
[all …]
|
| /dports/devel/gettext-po-mode/gettext-0.21/gettext-tools/gnulib-tests/ |
| H A D | test-isinf.c | 25 #ifndef isinf
43 ASSERT (!isinf (0.0f)); in test_isinff()
48 ASSERT (!isinf (3.141f)); in test_isinff()
89 ASSERT (!isinf (0.0)); in test_isinfd()
94 ASSERT (!isinf (3.141)); in test_isinfd()
138 ASSERT (!isinf (0.0L)); in test_isinfl()
212 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
217 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
222 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
227 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
[all …]
|
| /dports/devel/gettext-runtime/gettext-0.21/gettext-tools/gnulib-tests/ |
| H A D | test-isinf.c | 25 #ifndef isinf
43 ASSERT (!isinf (0.0f)); in test_isinff()
48 ASSERT (!isinf (3.141f)); in test_isinff()
89 ASSERT (!isinf (0.0)); in test_isinfd()
94 ASSERT (!isinf (3.141)); in test_isinfd()
138 ASSERT (!isinf (0.0L)); in test_isinfl()
212 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
217 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
222 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
227 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
[all …]
|
| /dports/devel/libtextstyle/gettext-0.21/gettext-tools/gnulib-tests/ |
| H A D | test-isinf.c | 25 #ifndef isinf
43 ASSERT (!isinf (0.0f)); in test_isinff()
48 ASSERT (!isinf (3.141f)); in test_isinff()
89 ASSERT (!isinf (0.0)); in test_isinfd()
94 ASSERT (!isinf (3.141)); in test_isinfd()
138 ASSERT (!isinf (0.0L)); in test_isinfl()
212 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
217 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
222 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
227 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
[all …]
|
| /dports/security/pkcs11-tools/pkcs11-tools-2.5.0/.gnulib/tests/ |
| H A D | test-isinf.c | 25 #ifndef isinf
43 ASSERT (!isinf (0.0f)); in test_isinff()
48 ASSERT (!isinf (3.141f)); in test_isinff()
89 ASSERT (!isinf (0.0)); in test_isinfd()
94 ASSERT (!isinf (3.141)); in test_isinfd()
138 ASSERT (!isinf (0.0L)); in test_isinfl()
212 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
217 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
222 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
227 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
[all …]
|
| /dports/misc/findutils/findutils-4.8.0/gnulib-tests/ |
| H A D | test-isinf.c | 25 #ifndef isinf
43 ASSERT (!isinf (0.0f)); in test_isinff()
48 ASSERT (!isinf (3.141f)); in test_isinff()
89 ASSERT (!isinf (0.0)); in test_isinfd()
94 ASSERT (!isinf (3.141)); in test_isinfd()
138 ASSERT (!isinf (0.0L)); in test_isinfl()
212 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
217 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
222 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
227 ASSERT (isinf (x.value) || !isinf (x.value)); in test_isinfl()
[all …]
|
| /dports/devel/gnulib/gnulib-20140202-stable/tests/ |
| H A D | test-isinf.c | 25 #ifndef isinf
43 ASSERT (!isinf (0.0f)); in test_isinff()
48 ASSERT (!isinf (3.141f)); in test_isinff()
51 ASSERT (!isinf (-2.718f)); in test_isinff()
54 ASSERT (!isinf (FLT_MAX)); in test_isinff()
55 ASSERT (!isinf (-FLT_MAX)); in test_isinff()
89 ASSERT (!isinf (0.0)); in test_isinfd()
94 ASSERT (!isinf (3.141)); in test_isinfd()
97 ASSERT (!isinf (-2.718)); in test_isinfd()
138 ASSERT (!isinf (0.0L)); in test_isinfl()
[all …]
|
| /dports/lang/gcc6-aux/gcc-6-20180516/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
33 isinf = (x > huge(x)) .or. (x < -huge(x))
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
[all …]
|
| /dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 16 interface isinf interface
19 end interface isinf
21 pure function isinf_r(x) result (isinf)
22 logical :: isinf local
25 isinf = (x > huge(x)) .or. (x < -huge(x))
28 pure function isinf_d(x) result (isinf)
29 logical :: isinf local
47 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
48 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
89 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/lang/gcc8/gcc-8.5.0/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
48 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
49 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
90 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/lang/gcc10/gcc-10.3.0/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 16 interface isinf interface
19 end interface isinf
21 pure function isinf_r(x) result (isinf)
22 logical :: isinf local
25 isinf = (x > huge(x)) .or. (x < -huge(x))
28 pure function isinf_d(x) result (isinf)
29 logical :: isinf local
47 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
48 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
89 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
48 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
49 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
90 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 16 interface isinf interface
19 end interface isinf
21 pure function isinf_r(x) result (isinf)
22 logical :: isinf local
25 isinf = (x > huge(x)) .or. (x < -huge(x))
28 pure function isinf_d(x) result (isinf)
29 logical :: isinf local
47 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
48 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
89 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
48 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
49 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
90 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/devel/avr-gcc/gcc-10.2.0/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 16 interface isinf interface
19 end interface isinf
21 pure function isinf_r(x) result (isinf)
22 logical :: isinf local
25 isinf = (x > huge(x)) .or. (x < -huge(x))
28 pure function isinf_d(x) result (isinf)
29 logical :: isinf local
47 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
48 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
89 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
48 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
49 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
90 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/lang/gcc9-devel/gcc-9-20211007/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
48 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
49 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
90 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
48 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
49 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
90 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/lang/gcc48/gcc-4.8.5/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
33 isinf = (x > huge(x)) .or. (x < -huge(x))
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
[all …]
|
| /dports/lang/gcc9-aux/gcc-9.1.0/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
48 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
49 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
90 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
33 isinf = (x > huge(x)) .or. (x < -huge(x))
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
[all …]
|
| /dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 16 interface isinf interface
19 end interface isinf
21 pure function isinf_r(x) result (isinf)
22 logical :: isinf local
25 isinf = (x > huge(x)) .or. (x < -huge(x))
28 pure function isinf_d(x) result (isinf)
29 logical :: isinf local
47 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
48 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
89 if (isinf(min(large, inf))) STOP 34
[all …]
|
| /dports/lang/gnat_util/gcc-6-20180516/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
33 isinf = (x > huge(x)) .or. (x < -huge(x))
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
[all …]
|
| /dports/devel/riscv64-gcc/gcc-8.3.0/gcc/testsuite/gfortran.dg/ |
| H A D | nan_2.f90 | 17 interface isinf interface
20 end interface isinf
22 pure function isinf_r(x) result (isinf)
23 logical :: isinf local
26 isinf = (x > huge(x)) .or. (x < -huge(x))
29 pure function isinf_d(x) result (isinf)
30 logical :: isinf local
48 if (isinf(nan) .or. isinf(large) .or. .not. isinf(inf)) STOP 3
49 if (isinf(-nan) .or. isinf(-large) .or. .not. isinf(-inf)) STOP 4
90 if (isinf(min(large, inf))) STOP 34
[all …]
|