Psi4
Macros
dfocc/defines.h File Reference

Go to the source code of this file.

Macros

#define ID(x)   ints->DPD_ID(x)
 
#define index2(i, j)   ((i>j) ? ((i*(i+1)/2)+j) : ((j*(j+1)/2)+i))
 
#define index4(i, j, k, l)   index2(index2(i,j),index2(k,l))
 
#define index3(i, j, k)   (i*(i+1)*(i+2)/6) + (j*(j+1)/2) + i
 
#define idx2(i, j, Nj)   j + (i*Nj)
 
#define idx3(i, j, k, Nj, Nk)   k + (j*Nk) + (i*Nj*Nk)
 
#define idx4(i, j, k, l, Nj, Nk, Nl)   l + (k*Nl) + (j*Nk*Nl) + (i*Nj*Nk*Nl)
 
#define idx_asym(i, j)   ((i>j) ? ((i*(i-1)/2)+j) : ((j*(j-1)/2)+i))
 
#define MIN0(a, b)   (((a)<(b)) ? (a) : (b))
 
#define MAX0(a, b)   (((a)>(b)) ? (a) : (b))
 
#define DIIS_MIN_DET   1.0E-16
 
#define DIVERGE   1.0E+3
 

Macro Definition Documentation

#define DIIS_MIN_DET   1.0E-16
#define DIVERGE   1.0E+3
#define ID (   x)    ints->DPD_ID(x)
#define idx2 (   i,
  j,
  Nj 
)    j + (i*Nj)
#define idx3 (   i,
  j,
  k,
  Nj,
  Nk 
)    k + (j*Nk) + (i*Nj*Nk)
#define idx4 (   i,
  j,
  k,
  l,
  Nj,
  Nk,
  Nl 
)    l + (k*Nl) + (j*Nk*Nl) + (i*Nj*Nk*Nl)
#define idx_asym (   i,
 
)    ((i>j) ? ((i*(i-1)/2)+j) : ((j*(j-1)/2)+i))
#define index2 (   i,
 
)    ((i>j) ? ((i*(i+1)/2)+j) : ((j*(j+1)/2)+i))
#define index3 (   i,
  j,
 
)    (i*(i+1)*(i+2)/6) + (j*(j+1)/2) + i
#define index4 (   i,
  j,
  k,
 
)    index2(index2(i,j),index2(k,l))
#define MAX0 (   a,
 
)    (((a)>(b)) ? (a) : (b))
#define MIN0 (   a,
 
)    (((a)<(b)) ? (a) : (b))