3
#include <libdpd/dpd.h>
7
void DT2(void), FaetT2(void), FmitT2(void), WmnijT2(void), WmbejT2(void);
8
void BT2(void), ZT2(void), FT2(void), ET2(void), CT2(void), dijabT2(void);
10
void status(char *, FILE *);
19
if(params.print & 2) status("<ij||ab> -> T2", outfile);
21
if(strcmp(params.wfn,"CC2") || strcmp(params.wfn,"EOM_CC2")) { /* skip all this is wfn=CC2 */
25
if(params.print & 2) status("F -> T2", outfile);
28
if(params.print & 2) status("Wmnij -> T2", outfile);
30
timer_on("BT2", outfile);
31
if(!strcmp(params.aobasis,"DISK") || !strcmp(params.aobasis,"DIRECT"))
34
if(params.print & 2) status("<ab||cd> -> T2", outfile);
35
timer_off("BT2", outfile);
38
if(params.print & 2) status("Z -> T2", outfile);
40
timer_on("FT2", outfile);
42
if(params.print & 2) status("<ia||bc> -> T2", outfile);
43
timer_off("FT2", outfile);
46
if(params.print & 2) status("<ij||ka> -> T2", outfile);
48
timer_on("WmbejT2", outfile);
50
if(params.print & 2) status("Wmbej -> T2", outfile);
51
timer_off("WmbejT2", outfile);
53
timer_on("CT2", outfile);
55
if(params.print & 2) status("<ia||jb> -> T2", outfile);
56
timer_off("CT2", outfile);
58
else { /* For CC2, just include (FT2)c->T2 */