1
2 #include "simint/ostei/gen/ostei_generated.h"
3 //////////////////////////////////////////////
4 // VRR: ( g s | s p )
5 //////////////////////////////////////////////
VRR_L_g_s_s_p(SIMINT_DBLTYPE * const restrict PRIM_INT__g_s_s_p,const SIMINT_DBLTYPE * const restrict PRIM_INT__g_s_s_s,const SIMINT_DBLTYPE * const restrict PRIM_INT__f_s_s_s,const SIMINT_DBLTYPE * Q_PB,const SIMINT_DBLTYPE * aoq_PQ,const SIMINT_DBLTYPE one_over_2pq,const int num_n)6 void VRR_L_g_s_s_p(
7 SIMINT_DBLTYPE * const restrict PRIM_INT__g_s_s_p,
8 const SIMINT_DBLTYPE * const restrict PRIM_INT__g_s_s_s,
9 const SIMINT_DBLTYPE * const restrict PRIM_INT__f_s_s_s,
10 const SIMINT_DBLTYPE * Q_PB,
11 const SIMINT_DBLTYPE * aoq_PQ,
12 const SIMINT_DBLTYPE one_over_2pq,
13 const int num_n)
14 {
15 // Routines are identical except for swapping of
16 // PA with PB and QC with QD
17
18 VRR_K_g_s_p_s(
19 PRIM_INT__g_s_s_p,
20 PRIM_INT__g_s_s_s,
21 PRIM_INT__f_s_s_s,
22 Q_PB,
23 aoq_PQ,
24 one_over_2pq,
25 num_n);
26 }
27
28
29