1 #include <chemistry/qc/oint3/build.h> i1311eAB()2int sc::BuildIntV3::i1311eAB(){ 3 /* the cost is 318 */ 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 double t39; 43 double t40; 44 double t41; 45 double t42; 46 double t43; 47 double t44; 48 double t45; 49 double t46; 50 double t47; 51 double t48; 52 double t49; 53 double t50; 54 double t51; 55 double t52; 56 double t53; 57 double t54; 58 double t55; 59 double t56; 60 double t57; 61 double t58; 62 double t59; 63 double t60; 64 double t61; 65 double t62; 66 double t63; 67 double t64; 68 double t65; 69 t1=int_v_zeta34*int_v_ooze; 70 t2=int_v_oo2zeta12*t1; 71 t1=(-1)*t2; 72 double***restrictxx int_v_list0=int_v_list(0); 73 double**restrictxx int_v_list00=int_v_list0[0]; 74 double*restrictxx int_v_list002=int_v_list00[2]; 75 t2=t1*int_v_list002[0]; 76 double*restrictxx int_v_list001=int_v_list00[1]; 77 t3=int_v_oo2zeta12*int_v_list001[0]; 78 t4=t3+t2; 79 t2=int_v_W0-int_v_p120; 80 double*restrictxx int_v_list003=int_v_list00[3]; 81 t3=t2*int_v_list003[0]; 82 t5=t2*t3; 83 t6=t5+t4; 84 t5=0.5*int_v_ooze; 85 t7=t5*t6; 86 t6=t5*int_v_list002[0]; 87 t8=int_v_W0-int_v_p340; 88 t9=t8*int_v_list003[0]; 89 t10=int_v_p340-int_v_r30; 90 t11=t10*int_v_list002[0]; 91 t12=t11+t9; 92 t9=t2*t12; 93 t11=t9+t6; 94 t9=2*int_v_ooze; 95 t13=int_v_zeta34*t9; 96 t9=int_v_oo2zeta12*t13; 97 t13=(-1)*t9; 98 t9=t13*t11; 99 t14=t9+t7; 100 t9=t5*int_v_list001[0]; 101 t15=t8*int_v_list002[0]; 102 t16=t10*int_v_list001[0]; 103 t17=t16+t15; 104 t15=t2*t17; 105 t16=t15+t9; 106 double***restrictxx int_v_list1=int_v_list(1); 107 double**restrictxx int_v_list11=int_v_list1[1]; 108 double*restrictxx int_v_list110=int_v_list11[0]; 109 int_v_list110[8]=t16; 110 t15=int_v_oo2zeta12*2; 111 t18=t15*t16; 112 t19=t18+t14; 113 t14=t5*t3; 114 t18=t1*t12; 115 t20=t18+t14; 116 t21=int_v_oo2zeta12*t17; 117 t22=t21+t20; 118 t20=t5*int_v_list003[0]; 119 double*restrictxx int_v_list004=int_v_list00[4]; 120 t23=t8*int_v_list004[0]; 121 t24=t10*int_v_list003[0]; 122 t25=t24+t23; 123 t23=t2*t25; 124 t24=t23+t20; 125 t23=t2*t24; 126 t26=t23+t22; 127 t22=t2*t26; 128 t23=t22+t19; 129 double***restrictxx int_v_list3=int_v_list(3); 130 double**restrictxx int_v_list31=int_v_list3[1]; 131 double*restrictxx int_v_list310=int_v_list31[0]; 132 int_v_list310[29]=t23; 133 t19=int_v_W2-int_v_p342; 134 t22=t19*int_v_list003[0]; 135 t27=int_v_p342-int_v_r32; 136 t28=t27*int_v_list002[0]; 137 t29=t28+t22; 138 t22=t2*t29; 139 t28=t13*t22; 140 t30=t19*int_v_list002[0]; 141 t31=t27*int_v_list001[0]; 142 t32=t31+t30; 143 t30=t2*t32; 144 int_v_list110[7]=t30; 145 t31=t15*t30; 146 t33=t31+t28; 147 t28=t1*t29; 148 t31=int_v_oo2zeta12*t32; 149 t34=t31+t28; 150 t35=t19*int_v_list004[0]; 151 t36=t27*int_v_list003[0]; 152 t37=t36+t35; 153 t35=t2*t37; 154 t36=t2*t35; 155 t38=t36+t34; 156 t36=t2*t38; 157 t39=t36+t33; 158 int_v_list310[28]=t39; 159 t33=int_v_W1-int_v_p341; 160 t36=t33*int_v_list003[0]; 161 t40=int_v_p341-int_v_r31; 162 t41=t40*int_v_list002[0]; 163 t42=t41+t36; 164 t36=t2*t42; 165 t41=t13*t36; 166 t43=t33*int_v_list002[0]; 167 t44=t40*int_v_list001[0]; 168 t45=t44+t43; 169 t43=t2*t45; 170 int_v_list110[6]=t43; 171 t44=t15*t43; 172 t46=t44+t41; 173 t41=t1*t42; 174 t44=int_v_oo2zeta12*t45; 175 t47=t44+t41; 176 t48=t33*int_v_list004[0]; 177 t49=t40*int_v_list003[0]; 178 t50=t49+t48; 179 t48=t2*t50; 180 t49=t2*t48; 181 t51=t49+t47; 182 t49=t2*t51; 183 t52=t49+t46; 184 int_v_list310[27]=t52; 185 t46=int_v_W2-int_v_p122; 186 t49=t46*t26; 187 int_v_list310[26]=t49; 188 t53=t46*t38; 189 t54=t7+t53; 190 int_v_list310[25]=t54; 191 t53=t46*t51; 192 int_v_list310[24]=t53; 193 t55=int_v_W1-int_v_p121; 194 t56=t26*t55; 195 int_v_list310[23]=t56; 196 t26=t55*t38; 197 int_v_list310[22]=t26; 198 t38=t55*t51; 199 t51=t7+t38; 200 int_v_list310[21]=t51; 201 t7=t1*t11; 202 t38=int_v_oo2zeta12*t16; 203 t16=t38+t7; 204 t7=t46*t24; 205 t38=t46*t7; 206 t7=t38+t16; 207 int_v_list310[20]=t7; 208 t38=t46*t3; 209 t57=t5*t38; 210 t38=t1*t22; 211 t58=t38+t57; 212 t57=int_v_oo2zeta12*t30; 213 t30=t57+t58; 214 t58=t46*t35; 215 t59=t14+t58; 216 t58=t46*t59; 217 t59=t58+t30; 218 int_v_list310[19]=t59; 219 t30=t1*t36; 220 t58=int_v_oo2zeta12*t43; 221 t43=t58+t30; 222 t60=t46*t48; 223 t61=t46*t60; 224 t60=t61+t43; 225 int_v_list310[18]=t60; 226 t43=t55*t24; 227 t24=t46*t43; 228 int_v_list310[17]=t24; 229 t61=t55*t3; 230 t3=t5*t61; 231 t61=t55*t35; 232 t35=t46*t61; 233 t62=t35+t3; 234 int_v_list310[16]=t62; 235 t35=t55*t48; 236 t48=t14+t35; 237 t14=t46*t48; 238 int_v_list310[15]=t14; 239 t35=t55*t43; 240 t43=t16+t35; 241 int_v_list310[14]=t43; 242 t16=t57+t38; 243 t35=t55*t61; 244 t38=t35+t16; 245 int_v_list310[13]=t38; 246 t16=t30+t3; 247 t3=t58+t16; 248 t16=t55*t48; 249 t30=t16+t3; 250 int_v_list310[12]=t30; 251 t3=t46*t12; 252 t16=t13*t3; 253 t35=t46*t17; 254 int_v_list110[5]=t35; 255 t48=t15*t35; 256 t35=t48+t16; 257 t16=t21+t18; 258 t18=t46*t25; 259 t21=t46*t18; 260 t18=t21+t16; 261 t21=t46*t18; 262 t18=t21+t35; 263 int_v_list310[11]=t18; 264 t21=t46*t29; 265 t35=t6+t21; 266 t21=t13*t35; 267 t48=t46*int_v_list003[0]; 268 t57=t46*t48; 269 t58=t4+t57; 270 t57=t5*t58; 271 t58=t57+t21; 272 t21=t46*t32; 273 t57=t9+t21; 274 int_v_list110[4]=t57; 275 t21=t15*t57; 276 t57=t21+t58; 277 t21=t5*t48; 278 t48=t28+t21; 279 t21=t31+t48; 280 t28=t46*t37; 281 t31=t20+t28; 282 t28=t46*t31; 283 t31=t28+t21; 284 t21=t46*t31; 285 t28=t21+t57; 286 int_v_list310[10]=t28; 287 t21=t46*t42; 288 t31=t13*t21; 289 t48=t46*t45; 290 int_v_list110[3]=t48; 291 t57=t15*t48; 292 t48=t57+t31; 293 t31=t46*t50; 294 t57=t46*t31; 295 t31=t47+t57; 296 t47=t46*t31; 297 t31=t47+t48; 298 int_v_list310[9]=t31; 299 t47=t55*t12; 300 t12=t1*t47; 301 t48=t55*t17; 302 int_v_list110[2]=t48; 303 t57=int_v_oo2zeta12*t48; 304 t58=t57+t12; 305 t12=t55*t25; 306 t25=t46*t12; 307 t57=t46*t25; 308 t25=t57+t58; 309 int_v_list310[8]=t25; 310 t57=t55*t29; 311 t29=t1*t57; 312 t58=t55*int_v_list003[0]; 313 t61=t46*t58; 314 t63=t5*t61; 315 t61=t63+t29; 316 t29=t55*t32; 317 int_v_list110[1]=t29; 318 t63=int_v_oo2zeta12*t29; 319 t64=t63+t61; 320 t61=t55*t37; 321 t37=t46*t61; 322 t63=t5*t58; 323 t65=t63+t37; 324 t37=t46*t65; 325 t65=t37+t64; 326 int_v_list310[7]=t65; 327 t37=t55*t42; 328 t42=t6+t37; 329 t6=t1*t42; 330 t37=t55*t45; 331 t64=t9+t37; 332 int_v_list110[0]=t64; 333 t9=int_v_oo2zeta12*t64; 334 t37=t9+t6; 335 t6=t55*t50; 336 t9=t20+t6; 337 t6=t46*t9; 338 t20=t46*t6; 339 t6=t20+t37; 340 int_v_list310[6]=t6; 341 t20=t55*t12; 342 t12=t16+t20; 343 t16=t46*t12; 344 int_v_list310[5]=t16; 345 t20=t55*t61; 346 t37=t34+t20; 347 t20=t46*t37; 348 t34=t55*t58; 349 t50=t4+t34; 350 t4=t5*t50; 351 t34=t4+t20; 352 int_v_list310[4]=t34; 353 t20=t41+t63; 354 t41=t44+t20; 355 t20=t55*t9; 356 t9=t20+t41; 357 t20=t46*t9; 358 int_v_list310[3]=t20; 359 t41=t13*t47; 360 t44=t15*t48; 361 t48=t44+t41; 362 t41=t55*t12; 363 t12=t41+t48; 364 int_v_list310[2]=t12; 365 t41=t13*t57; 366 t44=t15*t29; 367 t29=t44+t41; 368 t41=t55*t37; 369 t37=t41+t29; 370 int_v_list310[1]=t37; 371 t29=t13*t42; 372 t13=t4+t29; 373 t4=t15*t64; 374 t15=t4+t13; 375 t4=t55*t9; 376 t9=t4+t15; 377 int_v_list310[0]=t9; 378 t4=t2*int_v_list002[0]; 379 t13=t5*t4; 380 t4=t1*t17; 381 t15=t4+t13; 382 t17=t8*int_v_list001[0]; 383 double*restrictxx int_v_list000=int_v_list00[0]; 384 t8=t10*int_v_list000[0]; 385 t10=t8+t17; 386 t8=int_v_oo2zeta12*t10; 387 t10=t8+t15; 388 t15=t2*t11; 389 t17=t15+t10; 390 double***restrictxx int_v_list2=int_v_list(2); 391 double**restrictxx int_v_list21=int_v_list2[1]; 392 double*restrictxx int_v_list210=int_v_list21[0]; 393 int_v_list210[17]=t17; 394 t10=t1*t32; 395 t15=t19*int_v_list001[0]; 396 t19=t27*int_v_list000[0]; 397 t27=t19+t15; 398 t15=int_v_oo2zeta12*t27; 399 t19=t15+t10; 400 t27=t2*t22; 401 t29=t27+t19; 402 int_v_list210[16]=t29; 403 t27=t1*t45; 404 t1=t33*int_v_list001[0]; 405 t32=t40*int_v_list000[0]; 406 t33=t32+t1; 407 t1=int_v_oo2zeta12*t33; 408 t32=t1+t27; 409 t33=t2*t36; 410 t2=t33+t32; 411 int_v_list210[15]=t2; 412 t33=t46*t11; 413 int_v_list210[14]=t33; 414 t40=t46*t22; 415 t41=t13+t40; 416 int_v_list210[13]=t41; 417 t40=t46*t36; 418 int_v_list210[12]=t40; 419 t44=t55*t11; 420 int_v_list210[11]=t44; 421 t11=t55*t22; 422 int_v_list210[10]=t11; 423 t22=t55*t36; 424 t36=t13+t22; 425 int_v_list210[9]=t36; 426 t13=t8+t4; 427 t4=t46*t3; 428 t3=t4+t13; 429 int_v_list210[8]=t3; 430 t4=t46*int_v_list002[0]; 431 t8=t5*t4; 432 t4=t10+t8; 433 t8=t15+t4; 434 t4=t46*t35; 435 t10=t4+t8; 436 int_v_list210[7]=t10; 437 t4=t46*t21; 438 t8=t32+t4; 439 int_v_list210[6]=t8; 440 t4=t46*t47; 441 int_v_list210[5]=t4; 442 t15=t46*t57; 443 t21=t55*int_v_list002[0]; 444 t22=t5*t21; 445 t5=t22+t15; 446 int_v_list210[4]=t5; 447 t15=t46*t42; 448 int_v_list210[3]=t15; 449 t21=t55*t47; 450 t32=t13+t21; 451 int_v_list210[2]=t32; 452 t13=t55*t57; 453 t21=t19+t13; 454 int_v_list210[1]=t21; 455 t13=t27+t22; 456 t19=t1+t13; 457 t1=t55*t42; 458 t13=t1+t19; 459 int_v_list210[0]=t13; 460 return 1;} 461