/usr/include/gromacs/math/utilities.h is in libgromacs-dev 2018.1-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 | /*
* This file is part of the GROMACS molecular simulation package.
*
* Copyright (c) 1991-2000, University of Groningen, The Netherlands.
* Copyright (c) 2001-2004, The GROMACS development team.
* Copyright (c) 2013,2014,2015,2016,2017, by the GROMACS development team, led by
* Mark Abraham, David van der Spoel, Berk Hess, and Erik Lindahl,
* and including many others, as listed in the AUTHORS file in the
* top-level source directory and at http://www.gromacs.org.
*
* GROMACS is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License
* as published by the Free Software Foundation; either version 2.1
* of the License, or (at your option) any later version.
*
* GROMACS is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with GROMACS; if not, see
* http://www.gnu.org/licenses, or write to the Free Software Foundation,
* Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
*
* If you want to redistribute modifications to GROMACS, please
* consider that scientific software is very special. Version
* control is crucial - bugs must be traceable. We will be happy to
* consider code for inclusion in the official distribution, but
* derived work must not be called official GROMACS. Details are found
* in the README & COPYING files - if they are missing, get the
* official version at http://www.gromacs.org.
*
* To help us fund GROMACS development, we humbly ask that you cite
* the research papers on the package. Check out http://www.gromacs.org.
*/
#ifndef GMX_MATH_UTILITIES_H
#define GMX_MATH_UTILITIES_H
#include <limits.h>
#include <cmath>
#include "gromacs/utility/basedefinitions.h"
#include "gromacs/utility/real.h"
#ifdef __cplusplus
extern "C" {
#endif
#ifndef M_PI
#define M_PI 3.14159265358979323846
#endif
#ifndef M_PI_2
#define M_PI_2 1.57079632679489661923
#endif
#ifndef M_2PI
#define M_2PI 6.28318530717958647692
#endif
#ifndef M_SQRT2
#define M_SQRT2 sqrt(2.0)
#endif
#ifndef M_1_PI
#define M_1_PI 0.31830988618379067154
#endif
#ifndef M_FLOAT_1_SQRTPI /* used in GPU kernels */
/* 1.0 / sqrt(M_PI) */
#define M_FLOAT_1_SQRTPI 0.564189583547756f
#endif
#ifndef M_1_SQRTPI
/* 1.0 / sqrt(M_PI) */
#define M_1_SQRTPI 0.564189583547756
#endif
#ifndef M_2_SQRTPI
/* 2.0 / sqrt(M_PI) */
#define M_2_SQRTPI 1.128379167095513
#endif
/*! \brief Enum to select safe or highly unsafe (faster) math functions.
*
* Normally all the Gromacs math functions should apply reasonable care with
* input arguments. While we do not necessarily adhere strictly to IEEE
* (in particular not for arguments that might result in NaN, inf, etc.), the
* functions should return reasonable values or e.g. clamp results to zero.
*
* However, in a few cases where we are extremely performance-sensitive it
* makes sense to forego these checks too in cases where we know the exact
* properties if the input data, and we really need to save every cycle we can.
*
* This class is typically used as a template parameter to such calls to enable
* the caller to select the level of aggressiveness. We should always use the
* safe alternative as the default value, and document carefully what might
* happen with the unsafe alternative.
*/
enum class MathOptimization
{
Safe, //!< Don't do unsafe optimizations. This should always be default.
Unsafe //!< Allow optimizations that can be VERY dangerous for general code.
};
/*! \brief Check if two numbers are within a tolerance
*
* This routine checks if the relative difference between two numbers is
* approximately within the given tolerance, defined as
* fabs(f1-f2)<=tolerance*fabs(f1+f2).
*
* To check if two floating-point numbers are almost identical, use this routine
* with the tolerance GMX_REAL_EPS, or GMX_DOUBLE_EPS if the check should be
* done in double regardless of Gromacs precision.
*
* To check if two algorithms produce similar results you will normally need
* to relax the tolerance significantly since many operations (e.g. summation)
* accumulate floating point errors.
*
* \param f1 First number to compare
* \param f2 Second number to compare
* \param tol Tolerance to use
*
* \return 1 if the relative difference is within tolerance, 0 if not.
*/
int
gmx_within_tol(double f1,
double f2,
double tol);
/*!
* \brief Check if a number is smaller than some preset safe minimum
* value, currently defined as GMX_REAL_MIN/GMX_REAL_EPS.
*
* If a number is smaller than this value we risk numerical overflow
* if any number larger than 1.0/GMX_REAL_EPS is divided by it.
*
* \return 1 if 'almost' numerically zero, 0 otherwise.
*/
int
gmx_numzero(double a);
/*! \brief Multiply two large ints
*
* \return False iff overflow occurred
*/
gmx_bool
check_int_multiply_for_overflow(gmx_int64_t a,
gmx_int64_t b,
gmx_int64_t *result);
/*! \brief Find greatest common divisor of two numbers
*
* \return GCD of the two inputs
*/
int
gmx_greatest_common_divisor(int p, int q);
/*! \brief Enable floating-point exceptions if supported on OS
*
* Enables division-by-zero, invalid, and overflow.
*/
int gmx_feenableexcept();
/*! \brief Return cut-off to use
*
* Takes the max of two cut-offs. However a cut-off of 0
* signifies that the cut-off in fact is infinite, and
* this requires this special routine.
* \param[in] cutoff1 The first cutoff (e.g. coulomb)
* \param[in] cutoff2 The second cutoff (e.g. vdw)
* \return 0 if either is 0, the normal max of the two otherwise.
*/
real max_cutoff(real cutoff1, real cutoff2);
#ifdef __cplusplus
}
#endif
#endif
|