1 #include <chemistry/qc/oint3/build.h>
i0211()2 int sc::BuildIntV3::i0211(){
3 /* the cost is 198 */
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 double t23;
27 double t24;
28 double t25;
29 double t26;
30 double t27;
31 double t28;
32 double t29;
33 double t30;
34 double t31;
35 double t32;
36 double t33;
37 double t34;
38 double t35;
39 double t36;
40 double t37;
41 double t38;
42 t1=int_v_W0-int_v_p120;
43 double***restrictxx int_v_list0=int_v_list(0);
44 double**restrictxx int_v_list00=int_v_list0[0];
45 double*restrictxx int_v_list002=int_v_list00[2];
46 t2=t1*int_v_list002[0];
47 t3=int_v_p120-int_v_r10;
48 double*restrictxx int_v_list001=int_v_list00[1];
49 t4=t3*int_v_list001[0];
50 t5=t4+t2;
51 t2=0.5*int_v_ooze;
52 t4=t2*t5;
53 t5=int_v_W0-int_v_p340;
54 t6=t5*int_v_list002[0];
55 t7=int_v_p340-int_v_r30;
56 t8=t7*int_v_list001[0];
57 t9=t8+t6;
58 t6=int_v_zeta34*int_v_ooze;
59 t8=int_v_oo2zeta12*t6;
60 t6=(-1)*t8;
61 t8=t6*t9;
62 t10=t8+t4;
63 t11=t5*int_v_list001[0];
64 double*restrictxx int_v_list000=int_v_list00[0];
65 t12=t7*int_v_list000[0];
66 t13=t12+t11;
67 double**restrictxx int_v_list01=int_v_list0[1];
68 double*restrictxx int_v_list010=int_v_list01[0];
69 int_v_list010[2]=t13;
70 t11=int_v_oo2zeta12*t13;
71 t12=t11+t10;
72 t10=t2*int_v_list002[0];
73 double*restrictxx int_v_list003=int_v_list00[3];
74 t14=t5*int_v_list003[0];
75 t5=t7*int_v_list002[0];
76 t7=t5+t14;
77 t5=t1*t7;
78 t14=t5+t10;
79 t5=t3*t9;
80 t15=t5+t14;
81 t5=t1*t15;
82 t14=t5+t12;
83 t5=t2*int_v_list001[0];
84 t12=t1*t9;
85 t16=t12+t5;
86 t12=t3*t13;
87 t17=t12+t16;
88 double***restrictxx int_v_list1=int_v_list(1);
89 double**restrictxx int_v_list11=int_v_list1[1];
90 double*restrictxx int_v_list110=int_v_list11[0];
91 int_v_list110[8]=t17;
92 t12=t3*t17;
93 t16=t12+t14;
94 double***restrictxx int_v_list2=int_v_list(2);
95 double**restrictxx int_v_list21=int_v_list2[1];
96 double*restrictxx int_v_list210=int_v_list21[0];
97 int_v_list210[17]=t16;
98 t12=int_v_W2-int_v_p342;
99 t14=t12*int_v_list002[0];
100 t18=int_v_p342-int_v_r32;
101 t19=t18*int_v_list001[0];
102 t20=t19+t14;
103 t14=t6*t20;
104 t19=t12*int_v_list001[0];
105 t21=t18*int_v_list000[0];
106 t22=t21+t19;
107 int_v_list010[1]=t22;
108 t19=int_v_oo2zeta12*t22;
109 t21=t19+t14;
110 t23=t12*int_v_list003[0];
111 t12=t18*int_v_list002[0];
112 t18=t12+t23;
113 t12=t1*t18;
114 t23=t3*t20;
115 t24=t23+t12;
116 t12=t1*t24;
117 t23=t12+t21;
118 t12=t1*t20;
119 t25=t3*t22;
120 t26=t25+t12;
121 int_v_list110[7]=t26;
122 t12=t3*t26;
123 t25=t12+t23;
124 int_v_list210[16]=t25;
125 t12=int_v_W1-int_v_p341;
126 t23=t12*int_v_list002[0];
127 t27=int_v_p341-int_v_r31;
128 t28=t27*int_v_list001[0];
129 t29=t28+t23;
130 t23=t6*t29;
131 t6=t12*int_v_list001[0];
132 t28=t27*int_v_list000[0];
133 t30=t28+t6;
134 int_v_list010[0]=t30;
135 t6=int_v_oo2zeta12*t30;
136 t28=t6+t23;
137 t31=t12*int_v_list003[0];
138 t12=t27*int_v_list002[0];
139 t27=t12+t31;
140 t12=t1*t27;
141 t31=t3*t29;
142 t32=t31+t12;
143 t12=t1*t32;
144 t31=t12+t28;
145 t12=t1*t29;
146 t1=t3*t30;
147 t33=t1+t12;
148 int_v_list110[6]=t33;
149 t1=t3*t33;
150 t3=t1+t31;
151 int_v_list210[15]=t3;
152 t1=int_v_W2-int_v_p122;
153 t12=t1*t15;
154 t31=int_v_p122-int_v_r12;
155 t34=t31*t17;
156 t35=t34+t12;
157 int_v_list210[14]=t35;
158 t12=t1*t24;
159 t34=t4+t12;
160 t12=t31*t26;
161 t36=t12+t34;
162 int_v_list210[13]=t36;
163 t12=t1*t32;
164 t34=t31*t33;
165 t37=t34+t12;
166 int_v_list210[12]=t37;
167 t12=int_v_W1-int_v_p121;
168 t34=t15*t12;
169 t15=int_v_p121-int_v_r11;
170 t38=t15*t17;
171 t17=t38+t34;
172 int_v_list210[11]=t17;
173 t34=t12*t24;
174 t24=t15*t26;
175 t26=t24+t34;
176 int_v_list210[10]=t26;
177 t24=t12*t32;
178 t32=t4+t24;
179 t4=t15*t33;
180 t24=t4+t32;
181 int_v_list210[9]=t24;
182 t4=t11+t8;
183 t8=t1*t7;
184 t11=t31*t9;
185 t32=t11+t8;
186 t8=t1*t32;
187 t11=t8+t4;
188 t8=t1*t9;
189 t32=t31*t13;
190 t33=t32+t8;
191 int_v_list110[5]=t33;
192 t8=t31*t33;
193 t32=t8+t11;
194 int_v_list210[8]=t32;
195 t8=t1*int_v_list002[0];
196 t11=t31*int_v_list001[0];
197 t33=t11+t8;
198 t8=t2*t33;
199 t11=t14+t8;
200 t8=t19+t11;
201 t11=t1*t18;
202 t14=t10+t11;
203 t11=t31*t20;
204 t19=t11+t14;
205 t11=t1*t19;
206 t14=t11+t8;
207 t8=t1*t20;
208 t11=t5+t8;
209 t8=t31*t22;
210 t19=t8+t11;
211 int_v_list110[4]=t19;
212 t8=t31*t19;
213 t11=t8+t14;
214 int_v_list210[7]=t11;
215 t8=t1*t27;
216 t14=t31*t29;
217 t19=t14+t8;
218 t8=t1*t19;
219 t14=t28+t8;
220 t8=t1*t29;
221 t19=t31*t30;
222 t28=t19+t8;
223 int_v_list110[3]=t28;
224 t8=t31*t28;
225 t19=t8+t14;
226 int_v_list210[6]=t19;
227 t8=t12*t7;
228 t7=t15*t9;
229 t14=t7+t8;
230 t7=t1*t14;
231 t8=t12*t9;
232 t9=t15*t13;
233 t13=t9+t8;
234 int_v_list110[2]=t13;
235 t8=t31*t13;
236 t9=t8+t7;
237 int_v_list210[5]=t9;
238 t7=t12*t18;
239 t8=t15*t20;
240 t18=t8+t7;
241 t7=t1*t18;
242 t8=t12*int_v_list002[0];
243 t28=t15*int_v_list001[0];
244 t33=t28+t8;
245 t8=t2*t33;
246 t2=t8+t7;
247 t7=t12*t20;
248 t20=t15*t22;
249 t22=t20+t7;
250 int_v_list110[1]=t22;
251 t7=t31*t22;
252 t20=t7+t2;
253 int_v_list210[4]=t20;
254 t2=t12*t27;
255 t7=t10+t2;
256 t2=t15*t29;
257 t10=t2+t7;
258 t2=t1*t10;
259 t1=t12*t29;
260 t7=t5+t1;
261 t1=t15*t30;
262 t5=t1+t7;
263 int_v_list110[0]=t5;
264 t1=t31*t5;
265 t7=t1+t2;
266 int_v_list210[3]=t7;
267 t1=t12*t14;
268 t2=t4+t1;
269 t1=t15*t13;
270 t4=t1+t2;
271 int_v_list210[2]=t4;
272 t1=t12*t18;
273 t2=t21+t1;
274 t1=t15*t22;
275 t13=t1+t2;
276 int_v_list210[1]=t13;
277 t1=t23+t8;
278 t2=t6+t1;
279 t1=t12*t10;
280 t6=t1+t2;
281 t1=t15*t5;
282 t2=t1+t6;
283 int_v_list210[0]=t2;
284 return 1;}
285