diff options
| author | Kristian Evers <kristianevers@gmail.com> | 2018-12-26 10:53:01 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2018-12-26 10:53:01 +0100 |
| commit | 81ec8c0b58d66333fccd3703dab62a11132a0331 (patch) | |
| tree | 41b4675d169f849516649700ab4f50d4cffa4c02 /src/aasincos.cpp | |
| parent | 355d681ed88019e97742344bd642c2fd97e700a1 (diff) | |
| parent | 80dad6ef2bed4a83008db06986dc168918d48476 (diff) | |
| download | PROJ-81ec8c0b58d66333fccd3703dab62a11132a0331.tar.gz PROJ-81ec8c0b58d66333fccd3703dab62a11132a0331.zip | |
Merge pull request #1203 from rouault/cpp_conversion
Conversion of most C files to C++
Diffstat (limited to 'src/aasincos.cpp')
| -rw-r--r-- | src/aasincos.cpp | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/src/aasincos.cpp b/src/aasincos.cpp new file mode 100644 index 00000000..4f9ea25f --- /dev/null +++ b/src/aasincos.cpp @@ -0,0 +1,38 @@ +/* arc sin, cosine, tan2 and sqrt that will NOT fail */ + +#include <math.h> + +#include "projects.h" + +#define ONE_TOL 1.00000000000001 +#define ATOL 1e-50 + + double +aasin(projCtx ctx,double v) { + double av; + + if ((av = fabs(v)) >= 1.) { + if (av > ONE_TOL) + pj_ctx_set_errno( ctx, PJD_ERR_ACOS_ASIN_ARG_TOO_LARGE ); + return (v < 0. ? -M_HALFPI : M_HALFPI); + } + return asin(v); +} + + double +aacos(projCtx ctx, double v) { + double av; + + if ((av = fabs(v)) >= 1.) { + if (av > ONE_TOL) + pj_ctx_set_errno( ctx, PJD_ERR_ACOS_ASIN_ARG_TOO_LARGE ); + return (v < 0. ? M_PI : 0.); + } + return acos(v); +} + double +asqrt(double v) { return ((v <= 0) ? 0. : sqrt(v)); } + double +aatan2(double n, double d) { + return ((fabs(n) < ATOL && fabs(d) < ATOL) ? 0. : atan2(n,d)); +} |
