1 | #ifndef gramsch_h
|
---|
2 | #define gramsch_h
|
---|
3 |
|
---|
4 | /** \file gramsch.h
|
---|
5 | * Header file for \ref gramsch.c
|
---|
6 | *
|
---|
7 | * Contains declarations of the functions implemented in \ref gramsch.c
|
---|
8 | *
|
---|
9 | Project: ParallelCarParrinello
|
---|
10 | Jan Hamaekers
|
---|
11 | 2000
|
---|
12 |
|
---|
13 | File: gramsch.h
|
---|
14 | $Id: gramsch.h,v 1.14.2.1 2007-04-21 12:49:50 foo Exp $
|
---|
15 | */
|
---|
16 |
|
---|
17 | MPI_Datatype MPI_OnePsiElement; //!< OnePsiElement defined for the MPI structure to exchange between processes
|
---|
18 |
|
---|
19 | void FreeMPI_OnePsiElement();
|
---|
20 | void FirstInitGramSchData(struct Problem *P, struct Psis *Psi);
|
---|
21 | void GramSch(struct Problem *P, struct LatticeLevel *Lev, struct Psis *Psi, enum PsiGramSchToDoType ToDo);
|
---|
22 | double GramSchNormalize(const struct Problem *P, struct LatticeLevel *Lev, fftw_complex *LPsiDat, double PsiSP);
|
---|
23 | double GramSchGetNorm2(const struct Problem *P, struct LatticeLevel *Lev, fftw_complex *LPsiDat);
|
---|
24 | void SetGramSchExtraPsi(const struct Problem *P, struct Psis *Psi, enum PsiGramSchStatusType PsiGramSchStatus);
|
---|
25 | void SetGramSchActualPsi(const struct Problem *P, struct Psis *Psi, enum PsiGramSchStatusType PsiGramSchStatus);
|
---|
26 | void UpdateGramSchAllPsiStatus(struct Problem *P, struct Psis *Psi);
|
---|
27 | void UpdateGramSchActualPsiNo(struct Problem *P, struct Psis *Psi);
|
---|
28 | void SetGramSchOldActualPsi(const struct Problem *P, struct Psis *Psi, enum PsiGramSchStatusType PsiGramSchStatus);
|
---|
29 | void UpdateGramSchOldActualPsiNo(struct Problem *P, struct Psis *Psi);
|
---|
30 | void ResetGramSch(const struct Problem *P, struct Psis *Psi);
|
---|
31 | void ResetGramSchTagType(const struct Problem *P, struct Psis *Psi, enum PsiTypeTag type, enum PsiGramSchStatusType ToDo);
|
---|
32 | void TestGramSch(struct Problem *P, struct LatticeLevel *Lev, struct Psis *Psi, int Type2test);
|
---|
33 | void TestForOrth(struct Problem *P, struct LatticeLevel *Lev, fftw_complex *psi);
|
---|
34 |
|
---|
35 | #endif
|
---|