Module for defining constants used in NAFPack
This module includes mathematical constants, and other parameters that are used throughout the NAFPack library.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=sp), | public, | parameter | :: | pi_sp | = | acos(-1.0_sp) |
constant |
| real(kind=dp), | public, | parameter | :: | pi_dp | = | acos(-1.0_dp) | |
| real(kind=qp), | public, | parameter | :: | pi_qp | = | acos(-1.0_qp) | |
| complex(kind=sp), | public, | parameter | :: | im_sp | = | (0.0_sp, 1.0_sp) |
Imaginary unit |
| complex(kind=dp), | public, | parameter | :: | im_dp | = | (0.0_dp, 1.0_dp) | |
| complex(kind=qp), | public, | parameter | :: | im_qp | = | (0.0_qp, 1.0_qp) | |
| integer, | public, | parameter | :: | int_inf | = | huge(1) |
Integer infinity |
| integer, | public, | parameter | :: | NAF_SUCCESS | = | 0 |
Error codes for better error handling |
| integer, | public, | parameter | :: | NAF_ERROR_DIMENSION | = | 1 | |
| integer, | public, | parameter | :: | NAF_ERROR_SINGULAR | = | 2 | |
| integer, | public, | parameter | :: | NAF_ERROR_CONVERGENCE | = | 3 | |
| integer, | public, | parameter | :: | NAF_ERROR_MEMORY | = | 4 | |
| integer, | public, | parameter | :: | NAF_ERROR_INVALID_METHOD | = | 5 | |
| real(kind=sp), | public, | parameter | :: | TOL_PIVOT_sp | = | 1.0e-7_sp+epsilon(1.0_sp) | |
| real(kind=dp), | public, | parameter | :: | TOL_PIVOT_dp | = | 1.0e-14_dp+epsilon(1.0_dp) | |
| real(kind=qp), | public, | parameter | :: | TOL_PIVOT_qp | = | 1.0e-28_qp+epsilon(1.0_qp) | |
| real(kind=sp), | public, | parameter | :: | TOL_CONVERGENCE_sp | = | 1.0e-6_sp+epsilon(1.0_sp) | |
| real(kind=dp), | public, | parameter | :: | TOL_CONVERGENCE_dp | = | 1.0e-12_dp+epsilon(1.0_dp) | |
| real(kind=qp), | public, | parameter | :: | TOL_CONVERGENCE_qp | = | 1.0e-24_qp+epsilon(1.0_qp) | |
| real(kind=sp), | public, | parameter | :: | TOL_RESIDUAL_sp | = | 1.0e-5_sp+epsilon(1.0_sp) | |
| real(kind=dp), | public, | parameter | :: | TOL_RESIDUAL_dp | = | 1.0e-10_dp+epsilon(1.0_dp) | |
| real(kind=qp), | public, | parameter | :: | TOL_RESIDUAL_qp | = | 1.0e-20_qp+epsilon(1.0_qp) | |
| real(kind=sp), | public, | parameter | :: | TOL_TEST_sp | = | 1.0e-4_sp+epsilon(1.0_sp) | |
| real(kind=dp), | public, | parameter | :: | TOL_TEST_dp | = | 1.0e-12_dp+epsilon(1.0_dp) | |
| real(kind=qp), | public, | parameter | :: | TOL_TEST_qp | = | 1.0e-24_qp+epsilon(1.0_qp) | |
| integer, | public, | parameter | :: | MAX_ITERATION | = | 10000 |