-
Notifications
You must be signed in to change notification settings - Fork 2
/
ccpert.h
83 lines (66 loc) · 1.66 KB
/
ccpert.h
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
#ifndef CCPERT_H
#define CCPERT_H
#include "psi4/libmints/mintshelper.h"
#include "hamiltonian.h"
#include "ccwfn.h"
#include "hbar.h"
#include "cclambda.h"
using namespace std;
namespace psi { namespace ugacc {
enum hand {left, right};
class CCPert {
public:
CCPert(double **pert, double omega, shared_ptr<CCWfn> CC, shared_ptr<HBAR> HBAR, shared_ptr<CCLambda> CCLambda);
~CCPert();
void solve(enum hand);
protected:
int no_;
int nv_;
double **pert_;
double omega_;
shared_ptr<CCWfn> CC_;
shared_ptr<Hamiltonian> H_;
shared_ptr<HBAR> HBAR_;
shared_ptr<CCLambda> CCLambda_;
// Energy denominators
double **D1_;
double ****D2_;
double **l1_;
double ****l2_;
// Similarity transformed perturbation operator components
double **Aov_;
double **Aoo_;
double **Avv_;
double **Avo_;
double ****Aovoo_;
double ****Avvvo_;
double ****Avvoo_;
// Right-hand perturbed wave function
double **X1_;
double ****X2_;
double **X1old_;
double ****X2old_;
// Left-hand perturbed wave function
double **Y1_;
double ****Y2_;
double **Y1old_;
double ****Y2old_;
// Three-body intermediates
double **Gvv_;
double **Goo_;
void pertbar();
void amp_save(enum hand);
double increment_amps(enum hand);
void build_G();
void build_X1();
void build_X2();
void build_Y1();
void build_Y2();
double pseudoresponse(enum hand);
void build_diis_error(enum hand, std::shared_ptr<Vector>, std::shared_ptr<Vector>, std::shared_ptr<Vector>, std::shared_ptr<Vector>);
void save_diis_vectors(enum hand, std::shared_ptr<Vector>, std::shared_ptr<Vector>);
void print_amps(enum hand);
friend class CCResp;
};
}} // psi::ugacc
#endif