MADNESS  0.10.1
Namespaces | Macros | Functions
jacobi.h File Reference
#include <madness/world/madness_exception.h>
#include <madness/tensor/tensor.h>
#include <madness/world/print.h>
#include <cmath>
#include <cstdio>
#include <algorithm>
Include dependency graph for jacobi.h:
This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Namespaces

 madness
 File holds all helper structures necessary for the CC_Operator and CC2 class.
 

Macros

#define ROT(A, i, j)
 
#define ROTT(A, i, j)
 

Functions

void madness::jacobi (Tensor< double > &A, Tensor< double > &V, const std::vector< int > &set)
 

Macro Definition Documentation

◆ ROT

#define ROT (   A,
  i,
 
)
Value:
{ \
double * __restrict__ ai = &A(i,0); \
double * __restrict__ aj = &A(j,0); \
for (k=0; k<n; k++) { \
double t = ai[k]; \
double u = aj[k]; \
ai[k] = c*t - s*u; \
aj[k] = s*t + c*u; \
} \
}
real_convolution_3d A(World &world)
Definition: DKops.h:230
static const double c
Definition: relops.cc:10
static const long k
Definition: rk.cc:44
double u(const double x, const double expnt)
Definition: testperiodic.cc:56

◆ ROTT

#define ROTT (   A,
  i,
 
)
Value:
{ \
double * __restrict__ ai = &A(0,i); \
double * __restrict__ aj = &A(0,j); \
for (k=0; k<n*n; k+=n) { \
double t = ai[k]; \
double u = aj[k]; \
ai[k] = c*t - s*u; \
aj[k] = s*t + c*u; \
} \
}