3
\brief Enter brief description of file here
6
#include <libdpd/dpd.h>
12
namespace psi { namespace cclambda {
14
void DL2(struct L_Params L_params);
15
void cc2_faeL2(int L_irr);
16
void cc2_fmiL2(int L_irr);
17
void WijmnL2(int L_irr);
18
void WefabL2(int L_irr);
19
void WejabL2(int L_irr);
20
void WijmbL2(int L_irr);
21
void L1FL2(int L_irr);
22
void dijabL2(int L_irr);
24
void BL2_AO(int L_irr);
25
void status(const char *, FILE *);
27
void cc2_L2_build(struct L_Params L_params) {
29
L_irr = L_params.irrep;
32
if(params.print & 2) status("<ij||ab> -> L2", outfile);
35
check_sum("DL2", L_irr);
41
check_sum("FaeL2", L_irr);
47
check_sum("FmiL2", L_irr);
49
if(params.print & 2) status("F -> L2", outfile);
54
check_sum("WmnieL2", L_irr);
56
if(params.print & 2) status("Wmnie -> L2", outfile);
61
check_sum("WejabL2", L_irr);
63
if(params.print & 2) status("Wamef -> L2", outfile);
68
check_sum("L1FL2", L_irr);
70
if(params.print & 2) status("L1*F -> L2", outfile);
75
check_sum("after D2s", L_irr);
77
if(params.print & 2) status("L2 amplitudes", outfile);
81
}} // namespace psi::cclambda