Changeset 08a794b for pcp


Ignore:
Timestamp:
Apr 21, 2008, 2:19:26 PM (17 years ago)
Author:
Frederik Heber <heber@…>
Children:
4bbde5
Parents:
05fec0
git-author:
Frederik Heber <heber@…> (04/21/08 11:09:16)
git-committer:
Frederik Heber <heber@…> (04/21/08 14:19:26)
Message:

Every possible function HAVE_INLINE'd if sensible

File:
1 edited

Legend:

Unmodified
Added
Removed

  • pcp/src/mymath.c

    r05fec0 r08a794b  
    4949 * \return \f$x^n\f$
    5050 */
     51#ifdef HAVE_INLINE
    5152inline double tpow(double x, int n)
     53#else
     54double tpow(double x, int n)
     55#endif
    5256{
    5357  double y = 1;
    … …  
    7175 * \return modulo >=0
    7276 */
     77#ifdef HAVE_INLINE
    7378inline int Rest(int n, int m) /* normale modulo-Funktion, Ausgabe>=0 */
     79#else
     80int Rest(int n, int m) /* normale modulo-Funktion, Ausgabe>=0 */
     81#endif
    7482{
    7583  int q = n%m;
    … …  
    8795 * \return 0 - error: det A == 0, 1 - success
    8896 */
     97#ifdef HAVE_INLINE
    8998inline int RMatReci3(double B[NDIM_NDIM], const double A[NDIM_NDIM])
     99#else
     100int RMatReci3(double B[NDIM_NDIM], const double A[NDIM_NDIM])
     101#endif
    90102{
    91103  double detA = RDET3(A);
    … …  
    111123 * \param B matrix2 array
    112124 */
     125#ifdef HAVE_INLINE
    113126inline void RMatMat33(double C[NDIM*NDIM], const double A[NDIM*NDIM], const double B[NDIM*NDIM])
     127#else
     128void RMatMat33(double C[NDIM*NDIM], const double A[NDIM*NDIM], const double B[NDIM*NDIM])
     129#endif
    114130{
    115131  C[0] = A[0]*B[0]+A[3]*B[1]+A[6]*B[2];
    … …  
    130146 * \param V vector array
    131147 */
     148#ifdef HAVE_INLINE
    132149inline void RMat33Vec3(double C[NDIM], const double M[NDIM*NDIM], const double V[NDIM])
     150#else
     151void RMat33Vec3(double C[NDIM], const double M[NDIM*NDIM], const double V[NDIM])
     152#endif
    133153{
    134154  C[0] = M[0]*V[0]+M[3]*V[1]+M[6]*V[2];
    … …  
    143163 * \param M     matrix array
    144164 */
     165#ifdef HAVE_INLINE
    145166inline void RVec3Mat33(double C[NDIM], const double V[NDIM], const double M[NDIM*NDIM])
     167#else
     168void RVec3Mat33(double C[NDIM], const double V[NDIM], const double M[NDIM*NDIM])
     169#endif
    146170{
    147171  C[0] = V[0]*M[0]+V[1]*M[1]+V[2]*M[2];
    … …  
    156180 * \param B vector2 array
    157181 */
     182#ifdef HAVE_INLINE
    158183inline void VP3(double V[NDIM], double A[NDIM], double B[NDIM])
     184#else
     185void VP3(double V[NDIM], double A[NDIM], double B[NDIM])
     186#endif
    159187{
    160188  V[0] = A[1]*B[2]-A[2]*B[1];
    … …  
    167195 */
    168196#ifdef HAVE_INLINE
    169 inline void RTranspose3(double *A) {
    170 #else
    171 void RTranspose3(double *A) {
    172 #endif
     197inline void RTranspose3(double *A)
     198#else
     199void RTranspose3(double *A)
     200#endif
     201{
    173202  double dummy = A[1];
    174203  A[1] = A[3];
    … …  
    189218 */
    190219#ifdef HAVE_INLINE
    191 inline double SP(const double *a, const double *b, const int n) {
    192 #else
    193 double SP(const double *a, const double *b, const int n) {
    194 #endif
     220inline double SP(const double *a, const double *b, const int n)
     221#else
     222double SP(const double *a, const double *b, const int n)
     223#endif
     224{
    195225  int i;
    196226  double dummySP;
    … …  
    208238 * \return sqrt(a-b)
    209239 */
    210 inline double Dist(const double *a, const double *b, const int n){
     240#ifdef HAVE_INLINE
     241inline double Dist(const double *a, const double *b, const int n)
     242#else
     243double Dist(const double *a, const double *b, const int n)
     244#endif
     245{
    211246  int i;
    212247  double dummyDist = 0;
    … …  
    223258 * \param n dimension
    224259 */
     260#ifdef HAVE_INLINE
    225261inline void SM(double *a, const double c, const int n)
     262#else
     263void SM(double *a, const double c, const int n)
     264#endif
    226265{
    227266  int i;
    … …  
    235274 */
    236275#ifdef HAVE_INLINE
    237 inline void NV(double *a, const int n) {
    238 #else
    239 void NV(double *a, const int n) {
    240 #endif
     276inline void NV(double *a, const int n)
     277#else
     278void NV(double *a, const int n)
     279#endif
     280{
    241281  int i;
    242282  for (i = 0; i < n; i++) a[i] = 0;
    … …  
    252292 */
    253293#ifdef HAVE_INLINE
    254 inline double dSum(int n, double *dx, int incx) {
    255 #else
    256 double dSum(int n, double *dx, int incx) {
    257 #endif
     294inline double dSum(int n, double *dx, int incx)
     295#else
     296double dSum(int n, double *dx, int incx)
     297#endif
     298{
    258299  int i;
    259300  double res;
    … …  
    275316 */
    276317#ifdef HAVE_INLINE
    277 inline double Simps(int n, double *f, double h) {
    278 #else
    279 double Simps(int n, double *f, double h) {
    280 #endif
     318inline double Simps(int n, double *f, double h)
     319#else
     320double Simps(int n, double *f, double h)
     321#endif
     322{
    281323  double res;
    282324  int nm12=(n-1)/2;
    … …  
    409451 */
    410452#ifdef HAVE_INLINE
    411 inline double derf(double x) {
    412 #else
    413 double derf(double x) {
    414 #endif
     453inline double derf(double x)
     454#else
     455double derf(double x)
     456#endif
     457{
    415458  double res;
    416459  #ifdef HAVE_GSL_GSL_SF_ERF_H
    … …  
    431474 * \param n number of array elements
    432475 */
     476#ifdef HAVE_INLINE
    433477inline void SetArrayToDouble0(double *a, int n)
     478#else
     479void SetArrayToDouble0(double *a, int n)
     480#endif
    434481{
    435482  int i;
Note: See TracChangeset for help on using the changeset viewer.