|
| pure logical(lk) function, public | la_lapack_blas_like_scalar::la_slaisnan (sin1, sin2) |
| | This routine is not for general use. It exists solely to avoid over-optimization in SISNAN. SLAISNAN: checks for NaNs by comparing its two arguments for inequality. NaN is the only floating-point value where NaN != NaN returns .TRUE. To check for NaNs, pass the same variable as both arguments. A compiler must assume that the two arguments are not the same variable, and the test will not be optimized away. Interprocedural or whole-program optimization may delete this test. The ISNAN functions will be replaced by the correct Fortran 03 intrinsic once the intrinsic is widely available.
|
| |
| pure logical(lk) function, public | la_lapack_blas_like_scalar::la_dlaisnan (din1, din2) |
| | This routine is not for general use. It exists solely to avoid over-optimization in DISNAN. DLAISNAN: checks for NaNs by comparing its two arguments for inequality. NaN is the only floating-point value where NaN != NaN returns .TRUE. To check for NaNs, pass the same variable as both arguments. A compiler must assume that the two arguments are not the same variable, and the test will not be optimized away. Interprocedural or whole-program optimization may delete this test. The ISNAN functions will be replaced by the correct Fortran 03 intrinsic once the intrinsic is widely available.
|
| |
| pure logical(lk) function, public | la_lapack_blas_like_scalar::la_qlaisnan (qin1, qin2) |
| | This routine is not for general use. It exists solely to avoid over-optimization in QISNAN. QLAISNAN: checks for NaNs by comparing its two arguments for inequality. NaN is the only floating-point value where NaN != NaN returns .TRUE. To check for NaNs, pass the same variable as both arguments. A compiler must assume that the two arguments are not the same variable, and the test will not be optimized away. Interprocedural or whole-program optimization may delete this test. The ISNAN functions will be replaced by the correct Fortran 03 intrinsic once the intrinsic is widely available.
|
| |
| pure real(sp) function, public | la_lapack_blas_like_scalar::la_slapy3 (x, y, z) |
| | SLAPY3: returns sqrt(x**2+y**2+z**2), taking care not to cause unnecessary overflow and unnecessary underflow.
|
| |
| pure real(dp) function, public | la_lapack_blas_like_scalar::la_dlapy3 (x, y, z) |
| | DLAPY3: returns sqrt(x**2+y**2+z**2), taking care not to cause unnecessary overflow and unnecessary underflow.
|
| |
| pure real(qp) function, public | la_lapack_blas_like_scalar::la_qlapy3 (x, y, z) |
| | QLAPY3: returns sqrt(x**2+y**2+z**2), taking care not to cause unnecessary overflow and unnecessary underflow.
|
| |
| pure logical(lk) function, public | la_lapack_blas_like_scalar::la_sisnan (sin) |
| | SISNAN: returns .TRUE. if its argument is NaN, and .FALSE. otherwise. To be replaced by the Fortran 2003 intrinsic in the future.
|
| |
| pure logical(lk) function, public | la_lapack_blas_like_scalar::la_disnan (din) |
| | DISNAN: returns .TRUE. if its argument is NaN, and .FALSE. otherwise. To be replaced by the Fortran 2003 intrinsic in the future.
|
| |
| pure logical(lk) function, public | la_lapack_blas_like_scalar::la_qisnan (qin) |
| | QISNAN: returns .TRUE. if its argument is NaN, and .FALSE. otherwise. To be replaced by the Fortran 2003 intrinsic in the future.
|
| |
| pure real(sp) function, public | la_lapack_blas_like_scalar::la_slapy2 (x, y) |
| | SLAPY2: returns sqrt(x**2+y**2), taking care not to cause unnecessary overflow and unnecessary underflow.
|
| |
| pure real(dp) function, public | la_lapack_blas_like_scalar::la_dlapy2 (x, y) |
| | DLAPY2: returns sqrt(x**2+y**2), taking care not to cause unnecessary overflow and unnecessary underflow.
|
| |
| pure real(qp) function, public | la_lapack_blas_like_scalar::la_qlapy2 (x, y) |
| | QLAPY2: returns sqrt(x**2+y**2), taking care not to cause unnecessary overflow and unnecessary underflow.
|
| |
| pure subroutine, public | la_lapack_blas_like_scalar::la_sladiv (a, b, c, d, p, q) |
| | SLADIV: performs complex division in real arithmetic a + i*b p + i*q = ------— c + i*d The algorithm is due to Michael Baudin and Robert L. Smith and can be found in the paper "A Robust Complex Division in Scilab".
|
| |
| pure subroutine, public | la_lapack_blas_like_scalar::la_dladiv (a, b, c, d, p, q) |
| | DLADIV: performs complex division in real arithmetic a + i*b p + i*q = ------— c + i*d The algorithm is due to Michael Baudin and Robert L. Smith and can be found in the paper "A Robust Complex Division in Scilab".
|
| |
| pure subroutine, public | la_lapack_blas_like_scalar::la_qladiv (a, b, c, d, p, q) |
| | QLADIV: performs complex division in real arithmetic a + i*b p + i*q = ------— c + i*d The algorithm is due to Michael Baudin and Robert L. Smith and can be found in the paper "A Robust Complex Division in Scilab".
|
| |
| pure complex(sp) function, public | la_lapack_blas_like_scalar::la_cladiv (x, y) |
| | CLADIV: := X / Y, where X and Y are complex. The computation of X / Y will not overflow on an intermediary step unless the results overflows.
|
| |
| pure complex(dp) function, public | la_lapack_blas_like_scalar::la_zladiv (x, y) |
| | ZLADIV = X / Y, where X and Y are complex. The computation of X / Y will not overflow on an intermediary step unless the results overflows.
|
| |
| pure complex(qp) function, public | la_lapack_blas_like_scalar::la_wladiv (x, y) |
| | WLADIV = X / Y, where X and Y are complex. The computation of X / Y will not overflow on an intermediary step unless the results overflows.
|
| |