1 #include <chemistry/qc/oint3/build.h>
i3300()2 int sc::BuildIntV3::i3300(){
3 /* the cost is 140 */
4 double t1;
5 double t2;
6 double t3;
7 double t4;
8 double t5;
9 double t6;
10 double t7;
11 double t8;
12 double t9;
13 double t10;
14 double t11;
15 double t12;
16 double t13;
17 double t14;
18 double t15;
19 double t16;
20 double t17;
21 double t18;
22 double t19;
23 double t20;
24 double t21;
25 double t22;
26 t1=int_v_W0-int_v_p120;
27 double***restrictxx int_v_list0=int_v_list(0);
28 double**restrictxx int_v_list00=int_v_list0[0];
29 double*restrictxx int_v_list002=int_v_list00[2];
30 t2=t1*int_v_list002[0];
31 t3=int_v_p120-int_v_r10;
32 double*restrictxx int_v_list001=int_v_list00[1];
33 t4=t3*int_v_list001[0];
34 t5=t4+t2;
35 t2=int_v_ooze*2;
36 t4=int_v_zeta34*t2;
37 t2=int_v_oo2zeta12*t4;
38 t4=(-1)*t2;
39 t2=t4*t5;
40 t6=t1*int_v_list001[0];
41 double*restrictxx int_v_list000=int_v_list00[0];
42 t7=t3*int_v_list000[0];
43 t8=t7+t6;
44 t6=int_v_oo2zeta12*2;
45 t7=t6*t8;
46 t9=t7+t2;
47 t2=int_v_zeta34*int_v_ooze;
48 t7=int_v_oo2zeta12*t2;
49 t2=(-1)*t7;
50 t7=t2*int_v_list002[0];
51 t10=int_v_oo2zeta12*int_v_list001[0];
52 t11=t10+t7;
53 double*restrictxx int_v_list003=int_v_list00[3];
54 t7=t1*int_v_list003[0];
55 t10=t3*int_v_list002[0];
56 t12=t10+t7;
57 t7=t1*t12;
58 t10=t7+t11;
59 t7=t3*t5;
60 t13=t7+t10;
61 t7=t1*t13;
62 t10=t7+t9;
63 t7=t2*int_v_list001[0];
64 t9=int_v_oo2zeta12*int_v_list000[0];
65 t14=t9+t7;
66 t7=t1*t5;
67 t1=t7+t14;
68 t7=t3*t8;
69 t9=t7+t1;
70 t1=t3*t9;
71 t3=t1+t10;
72 double***restrictxx int_v_list3=int_v_list(3);
73 double**restrictxx int_v_list30=int_v_list3[0];
74 double*restrictxx int_v_list300=int_v_list30[0];
75 int_v_list300[9]=t3;
76 t1=int_v_W2-int_v_p122;
77 t7=t1*t13;
78 t10=int_v_p122-int_v_r12;
79 t15=t10*t9;
80 t16=t15+t7;
81 int_v_list300[8]=t16;
82 t7=int_v_W1-int_v_p121;
83 t15=t13*t7;
84 t13=int_v_p121-int_v_r11;
85 t17=t9*t13;
86 t9=t17+t15;
87 int_v_list300[7]=t9;
88 t15=t2*t5;
89 t17=int_v_oo2zeta12*t8;
90 t18=t17+t15;
91 t15=t1*t12;
92 t17=t10*t5;
93 t19=t17+t15;
94 t15=t1*t19;
95 t17=t15+t18;
96 t15=t1*t5;
97 t19=t10*t8;
98 t20=t19+t15;
99 t15=t10*t20;
100 t19=t15+t17;
101 int_v_list300[6]=t19;
102 t15=t7*t12;
103 t12=t13*t5;
104 t17=t12+t15;
105 t12=t1*t17;
106 t15=t7*t5;
107 t5=t13*t8;
108 t8=t5+t15;
109 t5=t10*t8;
110 t15=t5+t12;
111 int_v_list300[5]=t15;
112 t5=t7*t17;
113 t12=t18+t5;
114 t5=t13*t8;
115 t8=t5+t12;
116 int_v_list300[4]=t8;
117 t5=t1*int_v_list002[0];
118 t12=t10*int_v_list001[0];
119 t17=t12+t5;
120 t5=t4*t17;
121 t12=t1*int_v_list001[0];
122 t18=t10*int_v_list000[0];
123 t20=t18+t12;
124 t12=t6*t20;
125 t18=t12+t5;
126 t5=t1*int_v_list003[0];
127 t12=t10*int_v_list002[0];
128 t21=t12+t5;
129 t5=t1*t21;
130 t12=t11+t5;
131 t5=t10*t17;
132 t21=t5+t12;
133 t5=t1*t21;
134 t12=t5+t18;
135 t5=t1*t17;
136 t17=t14+t5;
137 t5=t10*t20;
138 t18=t5+t17;
139 t5=t10*t18;
140 t17=t5+t12;
141 int_v_list300[3]=t17;
142 t5=t7*int_v_list002[0];
143 t12=t13*int_v_list001[0];
144 t18=t12+t5;
145 t5=t2*t18;
146 t2=t7*int_v_list001[0];
147 t12=t13*int_v_list000[0];
148 t20=t12+t2;
149 t2=int_v_oo2zeta12*t20;
150 t12=t2+t5;
151 t2=t7*int_v_list003[0];
152 t5=t13*int_v_list002[0];
153 t21=t5+t2;
154 t2=t1*t21;
155 t5=t10*t18;
156 t22=t5+t2;
157 t2=t1*t22;
158 t5=t2+t12;
159 t2=t1*t18;
160 t12=t10*t20;
161 t22=t12+t2;
162 t2=t10*t22;
163 t12=t2+t5;
164 int_v_list300[2]=t12;
165 t2=t7*t21;
166 t5=t11+t2;
167 t2=t13*t18;
168 t11=t2+t5;
169 t2=t1*t11;
170 t1=t7*t18;
171 t5=t14+t1;
172 t1=t13*t20;
173 t14=t1+t5;
174 t1=t10*t14;
175 t5=t1+t2;
176 int_v_list300[1]=t5;
177 t1=t4*t18;
178 t2=t6*t20;
179 t4=t2+t1;
180 t1=t7*t11;
181 t2=t1+t4;
182 t1=t13*t14;
183 t4=t1+t2;
184 int_v_list300[0]=t4;
185 return 1;}
186