3
#include <libdpd/dpd.h>
7
void print_X(char *pert, char *cart, int irrep, double omega)
13
sprintf(lbl, "X_%s_%1s_IA (%5.3f)", pert, cart, omega);
14
dpd_file2_init(&X1, CC_OEI, irrep, 0, 1, lbl);
15
dpd_file2_print(&X1, outfile);
17
sprintf(lbl, "X_%s_%1s_IjAb (%5.3f)", pert, cart, omega);
18
dpd_buf4_init(&X2, CC_LR, irrep, 0, 5, 0, 5, 0, lbl);
19
dpd_buf4_print(&X2, outfile, 1);