1 #include <chemistry/qc/oint3/build.h> i1222()2int sc::BuildIntV3::i1222(){ 3 /* the cost is 483 */ 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 double t66; 70 double t67; 71 double t68; 72 double t69; 73 double t70; 74 double t71; 75 double t72; 76 double t73; 77 double t74; 78 double t75; 79 double t76; 80 double t77; 81 t1=0.5*int_v_ooze; 82 double***restrictxx int_v_list0=int_v_list(0); 83 double**restrictxx int_v_list00=int_v_list0[0]; 84 double*restrictxx int_v_list002=int_v_list00[2]; 85 t2=t1*int_v_list002[0]; 86 t3=int_v_W0-int_v_p340; 87 double*restrictxx int_v_list003=int_v_list00[3]; 88 t4=t3*int_v_list003[0]; 89 t5=int_v_p340-int_v_r30; 90 t6=t5*int_v_list002[0]; 91 t7=t6+t4; 92 t4=int_v_W0-int_v_p120; 93 t6=t4*t7; 94 t8=t6+t2; 95 t6=t3*int_v_list002[0]; 96 double*restrictxx int_v_list001=int_v_list00[1]; 97 t9=t5*int_v_list001[0]; 98 t10=t9+t6; 99 t6=int_v_p120-int_v_r10; 100 t9=t6*t10; 101 t11=t9+t8; 102 t8=int_v_ooze*2; 103 t9=0.5*t8; 104 t8=t9*t11; 105 t12=int_v_zeta12*int_v_ooze; 106 t13=int_v_oo2zeta34*t12; 107 t12=t13*(-1); 108 t13=t12*int_v_list002[0]; 109 t14=int_v_oo2zeta34*int_v_list001[0]; 110 t15=t14+t13; 111 t13=t3*t7; 112 t14=t13+t15; 113 t13=t5*t10; 114 t16=t13+t14; 115 t13=int_v_zeta34*int_v_ooze; 116 t14=int_v_oo2zeta12*t13; 117 t13=(-1)*t14; 118 t14=t13*t16; 119 t17=t14+t8; 120 t8=t12*int_v_list001[0]; 121 double*restrictxx int_v_list000=int_v_list00[0]; 122 t18=int_v_oo2zeta34*int_v_list000[0]; 123 t19=t18+t8; 124 t8=t3*t10; 125 t18=t8+t19; 126 t8=t3*int_v_list001[0]; 127 t20=t5*int_v_list000[0]; 128 t21=t20+t8; 129 t8=t5*t21; 130 t20=t8+t18; 131 t8=int_v_oo2zeta12*t20; 132 t18=t8+t17; 133 t17=t9*t7; 134 t22=t12*int_v_list003[0]; 135 t12=int_v_oo2zeta34*int_v_list002[0]; 136 t23=t12+t22; 137 double*restrictxx int_v_list004=int_v_list00[4]; 138 t12=t3*int_v_list004[0]; 139 t22=t5*int_v_list003[0]; 140 t24=t22+t12; 141 t12=t3*t24; 142 t3=t12+t23; 143 t12=t5*t7; 144 t5=t12+t3; 145 t3=t4*t5; 146 t12=t3+t17; 147 t3=t6*t16; 148 t17=t3+t12; 149 t3=t4*t17; 150 t12=t3+t18; 151 t3=t9*t10; 152 t18=t4*t16; 153 t22=t18+t3; 154 t3=t6*t20; 155 t18=t3+t22; 156 double***restrictxx int_v_list1=int_v_list(1); 157 double**restrictxx int_v_list12=int_v_list1[2]; 158 double*restrictxx int_v_list120=int_v_list12[0]; 159 int_v_list120[17]=t18; 160 t3=t6*t18; 161 t22=t3+t12; 162 double***restrictxx int_v_list2=int_v_list(2); 163 double**restrictxx int_v_list22=int_v_list2[2]; 164 double*restrictxx int_v_list220=int_v_list22[0]; 165 int_v_list220[35]=t22; 166 t3=int_v_W2-int_v_p342; 167 t12=t3*int_v_list003[0]; 168 t25=int_v_p342-int_v_r32; 169 t26=t25*int_v_list002[0]; 170 t27=t26+t12; 171 t12=t4*t27; 172 t26=t3*int_v_list002[0]; 173 t28=t25*int_v_list001[0]; 174 t29=t28+t26; 175 t26=t6*t29; 176 t28=t26+t12; 177 t12=t1*t28; 178 t26=t3*t7; 179 t30=t25*t10; 180 t31=t30+t26; 181 t26=t13*t31; 182 t30=t26+t12; 183 t32=t3*t10; 184 t33=t25*t21; 185 t34=t33+t32; 186 t32=int_v_oo2zeta12*t34; 187 t33=t32+t30; 188 t30=t1*t27; 189 t35=t3*t24; 190 t36=t25*t7; 191 t37=t36+t35; 192 t35=t4*t37; 193 t36=t35+t30; 194 t35=t6*t31; 195 t38=t35+t36; 196 t35=t4*t38; 197 t36=t35+t33; 198 t33=t1*t29; 199 t35=t4*t31; 200 t39=t35+t33; 201 t35=t6*t34; 202 t40=t35+t39; 203 int_v_list120[16]=t40; 204 t35=t6*t40; 205 t39=t35+t36; 206 int_v_list220[34]=t39; 207 t35=int_v_W1-int_v_p341; 208 t36=t35*int_v_list003[0]; 209 t41=int_v_p341-int_v_r31; 210 t42=t41*int_v_list002[0]; 211 t43=t42+t36; 212 t36=t4*t43; 213 t42=t41*int_v_list001[0]; 214 t44=t35*int_v_list002[0]; 215 t45=t44+t42; 216 t42=t6*t45; 217 t44=t42+t36; 218 t36=t1*t44; 219 t42=t35*t7; 220 t46=t41*t10; 221 t47=t46+t42; 222 t42=t13*t47; 223 t46=t42+t36; 224 t48=t35*t10; 225 t49=t41*t21; 226 t21=t49+t48; 227 t48=int_v_oo2zeta12*t21; 228 t49=t48+t46; 229 t46=t1*t43; 230 t50=t35*t24; 231 t24=t41*t7; 232 t51=t24+t50; 233 t24=t4*t51; 234 t50=t24+t46; 235 t24=t6*t47; 236 t52=t24+t50; 237 t24=t4*t52; 238 t50=t24+t49; 239 t24=t1*t45; 240 t49=t4*t47; 241 t53=t49+t24; 242 t49=t6*t21; 243 t54=t49+t53; 244 int_v_list120[15]=t54; 245 t49=t6*t54; 246 t53=t49+t50; 247 int_v_list220[33]=t53; 248 t49=t3*t27; 249 t50=t15+t49; 250 t49=t25*t29; 251 t55=t49+t50; 252 t49=t13*t55; 253 t50=t3*t29; 254 t56=t19+t50; 255 t50=t3*int_v_list001[0]; 256 t57=t25*int_v_list000[0]; 257 t58=t57+t50; 258 t50=t25*t58; 259 t57=t50+t56; 260 t50=int_v_oo2zeta12*t57; 261 t56=t50+t49; 262 t58=t3*int_v_list004[0]; 263 t59=t25*int_v_list003[0]; 264 t60=t59+t58; 265 t58=t3*t60; 266 t59=t23+t58; 267 t58=t25*t27; 268 t60=t58+t59; 269 t58=t4*t60; 270 t59=t6*t55; 271 t61=t59+t58; 272 t58=t4*t61; 273 t59=t58+t56; 274 t58=t4*t55; 275 t62=t6*t57; 276 t63=t62+t58; 277 int_v_list120[14]=t63; 278 t58=t6*t63; 279 t62=t58+t59; 280 int_v_list220[32]=t62; 281 t58=t3*t43; 282 t59=t25*t45; 283 t64=t59+t58; 284 t58=t13*t64; 285 t59=t3*t45; 286 t65=t35*int_v_list001[0]; 287 t66=t41*int_v_list000[0]; 288 t67=t66+t65; 289 t65=t25*t67; 290 t66=t65+t59; 291 t59=int_v_oo2zeta12*t66; 292 t65=t59+t58; 293 t68=t35*int_v_list004[0]; 294 t69=t41*int_v_list003[0]; 295 t70=t69+t68; 296 t68=t3*t70; 297 t3=t25*t43; 298 t25=t3+t68; 299 t3=t4*t25; 300 t68=t6*t64; 301 t69=t68+t3; 302 t3=t4*t69; 303 t68=t3+t65; 304 t3=t4*t64; 305 t65=t6*t66; 306 t71=t65+t3; 307 int_v_list120[13]=t71; 308 t3=t6*t71; 309 t65=t3+t68; 310 int_v_list220[31]=t65; 311 t3=t35*t43; 312 t68=t15+t3; 313 t3=t41*t45; 314 t15=t3+t68; 315 t3=t13*t15; 316 t13=t35*t45; 317 t68=t19+t13; 318 t13=t41*t67; 319 t19=t13+t68; 320 t13=int_v_oo2zeta12*t19; 321 t67=t13+t3; 322 t68=t35*t70; 323 t35=t23+t68; 324 t23=t41*t43; 325 t41=t23+t35; 326 t23=t4*t41; 327 t35=t6*t15; 328 t68=t35+t23; 329 t23=t4*t68; 330 t35=t23+t67; 331 t23=t4*t15; 332 t4=t6*t19; 333 t70=t4+t23; 334 int_v_list120[12]=t70; 335 t4=t6*t70; 336 t6=t4+t35; 337 int_v_list220[30]=t6; 338 t4=int_v_W2-int_v_p122; 339 t23=t4*t17; 340 t35=int_v_p122-int_v_r12; 341 t72=t35*t18; 342 t73=t72+t23; 343 int_v_list220[29]=t73; 344 t23=t1*t11; 345 t11=t4*t38; 346 t72=t11+t23; 347 t11=t35*t40; 348 t74=t11+t72; 349 int_v_list220[28]=t74; 350 t11=t4*t52; 351 t72=t35*t54; 352 t75=t72+t11; 353 int_v_list220[27]=t75; 354 t11=t9*t28; 355 t28=t4*t61; 356 t72=t28+t11; 357 t11=t35*t63; 358 t28=t11+t72; 359 int_v_list220[26]=t28; 360 t11=t4*t69; 361 t72=t36+t11; 362 t11=t35*t71; 363 t36=t11+t72; 364 int_v_list220[25]=t36; 365 t11=t4*t68; 366 t72=t35*t70; 367 t76=t72+t11; 368 int_v_list220[24]=t76; 369 t11=int_v_W1-int_v_p121; 370 t72=t17*t11; 371 t17=int_v_p121-int_v_r11; 372 t77=t17*t18; 373 t18=t77+t72; 374 int_v_list220[23]=t18; 375 t72=t11*t38; 376 t38=t17*t40; 377 t40=t38+t72; 378 int_v_list220[22]=t40; 379 t38=t11*t52; 380 t52=t23+t38; 381 t23=t17*t54; 382 t38=t23+t52; 383 int_v_list220[21]=t38; 384 t23=t11*t61; 385 t52=t17*t63; 386 t54=t52+t23; 387 int_v_list220[20]=t54; 388 t23=t11*t69; 389 t52=t12+t23; 390 t12=t17*t71; 391 t23=t12+t52; 392 int_v_list220[19]=t23; 393 t12=t9*t44; 394 t44=t11*t68; 395 t52=t44+t12; 396 t12=t17*t70; 397 t44=t12+t52; 398 int_v_list220[18]=t44; 399 t12=t8+t14; 400 t8=t4*t5; 401 t14=t35*t16; 402 t52=t14+t8; 403 t8=t4*t52; 404 t14=t8+t12; 405 t8=t4*t16; 406 t52=t35*t20; 407 t61=t52+t8; 408 int_v_list120[11]=t61; 409 t8=t35*t61; 410 t52=t8+t14; 411 int_v_list220[17]=t52; 412 t8=t4*t7; 413 t14=t35*t10; 414 t61=t14+t8; 415 t8=t1*t61; 416 t14=t26+t8; 417 t8=t32+t14; 418 t14=t4*t37; 419 t61=t1*t7; 420 t63=t61+t14; 421 t14=t35*t31; 422 t68=t14+t63; 423 t14=t4*t68; 424 t63=t14+t8; 425 t8=t4*t31; 426 t14=t1*t10; 427 t68=t14+t8; 428 t8=t35*t34; 429 t69=t8+t68; 430 int_v_list120[10]=t69; 431 t8=t35*t69; 432 t68=t8+t63; 433 int_v_list220[16]=t68; 434 t8=t48+t42; 435 t63=t4*t51; 436 t69=t35*t47; 437 t70=t69+t63; 438 t63=t4*t70; 439 t69=t63+t8; 440 t8=t4*t47; 441 t63=t35*t21; 442 t70=t63+t8; 443 int_v_list120[9]=t70; 444 t8=t35*t70; 445 t63=t8+t69; 446 int_v_list220[15]=t63; 447 t8=t4*t27; 448 t69=t2+t8; 449 t8=t35*t29; 450 t70=t8+t69; 451 t8=t9*t70; 452 t69=t49+t8; 453 t8=t50+t69; 454 t49=t9*t27; 455 t50=t4*t60; 456 t69=t50+t49; 457 t49=t35*t55; 458 t50=t49+t69; 459 t49=t4*t50; 460 t50=t49+t8; 461 t8=t9*t29; 462 t49=t4*t55; 463 t69=t49+t8; 464 t8=t35*t57; 465 t49=t8+t69; 466 int_v_list120[8]=t49; 467 t8=t35*t49; 468 t49=t8+t50; 469 int_v_list220[14]=t49; 470 t8=t4*t43; 471 t50=t35*t45; 472 t69=t50+t8; 473 t8=t1*t69; 474 t50=t58+t8; 475 t8=t59+t50; 476 t50=t4*t25; 477 t69=t46+t50; 478 t46=t35*t64; 479 t50=t46+t69; 480 t46=t4*t50; 481 t50=t46+t8; 482 t8=t4*t64; 483 t46=t24+t8; 484 t8=t35*t66; 485 t24=t8+t46; 486 int_v_list120[7]=t24; 487 t8=t35*t24; 488 t24=t8+t50; 489 int_v_list220[13]=t24; 490 t8=t4*t41; 491 t46=t35*t15; 492 t50=t46+t8; 493 t8=t4*t50; 494 t46=t67+t8; 495 t8=t4*t15; 496 t50=t35*t19; 497 t67=t50+t8; 498 int_v_list120[6]=t67; 499 t8=t35*t67; 500 t50=t8+t46; 501 int_v_list220[12]=t50; 502 t8=t11*t5; 503 t5=t17*t16; 504 t46=t5+t8; 505 t5=t4*t46; 506 t8=t11*t16; 507 t16=t17*t20; 508 t20=t16+t8; 509 int_v_list120[5]=t20; 510 t8=t35*t20; 511 t16=t8+t5; 512 int_v_list220[11]=t16; 513 t5=t11*t37; 514 t8=t17*t31; 515 t37=t8+t5; 516 t5=t4*t37; 517 t8=t11*t7; 518 t7=t17*t10; 519 t10=t7+t8; 520 t7=t1*t10; 521 t8=t7+t5; 522 t5=t11*t31; 523 t10=t17*t34; 524 t31=t10+t5; 525 int_v_list120[4]=t31; 526 t5=t35*t31; 527 t10=t5+t8; 528 int_v_list220[10]=t10; 529 t5=t11*t51; 530 t8=t61+t5; 531 t5=t17*t47; 532 t34=t5+t8; 533 t5=t4*t34; 534 t8=t11*t47; 535 t47=t14+t8; 536 t8=t17*t21; 537 t14=t8+t47; 538 int_v_list120[3]=t14; 539 t8=t35*t14; 540 t21=t8+t5; 541 int_v_list220[9]=t21; 542 t5=t11*t27; 543 t8=t17*t29; 544 t27=t8+t5; 545 t5=t9*t27; 546 t8=t11*t60; 547 t29=t17*t55; 548 t47=t29+t8; 549 t8=t4*t47; 550 t29=t8+t5; 551 t5=t11*t55; 552 t8=t17*t57; 553 t51=t8+t5; 554 int_v_list120[2]=t51; 555 t5=t35*t51; 556 t8=t5+t29; 557 int_v_list220[8]=t8; 558 t5=t11*t43; 559 t29=t2+t5; 560 t2=t17*t45; 561 t5=t2+t29; 562 t2=t1*t5; 563 t29=t11*t25; 564 t25=t30+t29; 565 t29=t17*t64; 566 t30=t29+t25; 567 t25=t4*t30; 568 t29=t25+t2; 569 t2=t11*t64; 570 t25=t33+t2; 571 t2=t17*t66; 572 t33=t2+t25; 573 int_v_list120[1]=t33; 574 t2=t35*t33; 575 t25=t2+t29; 576 int_v_list220[7]=t25; 577 t2=t9*t43; 578 t29=t11*t41; 579 t41=t29+t2; 580 t2=t17*t15; 581 t29=t2+t41; 582 t2=t4*t29; 583 t4=t9*t45; 584 t41=t11*t15; 585 t15=t41+t4; 586 t4=t17*t19; 587 t19=t4+t15; 588 int_v_list120[0]=t19; 589 t4=t35*t19; 590 t15=t4+t2; 591 int_v_list220[6]=t15; 592 t2=t11*t46; 593 t4=t12+t2; 594 t2=t17*t20; 595 t12=t2+t4; 596 int_v_list220[5]=t12; 597 t2=t32+t26; 598 t4=t11*t37; 599 t20=t4+t2; 600 t2=t17*t31; 601 t4=t2+t20; 602 int_v_list220[4]=t4; 603 t2=t42+t7; 604 t7=t48+t2; 605 t2=t11*t34; 606 t20=t2+t7; 607 t2=t17*t14; 608 t7=t2+t20; 609 int_v_list220[3]=t7; 610 t2=t11*t47; 611 t14=t56+t2; 612 t2=t17*t51; 613 t20=t2+t14; 614 int_v_list220[2]=t20; 615 t2=t1*t27; 616 t1=t58+t2; 617 t2=t59+t1; 618 t1=t11*t30; 619 t14=t1+t2; 620 t1=t17*t33; 621 t2=t1+t14; 622 int_v_list220[1]=t2; 623 t1=t9*t5; 624 t5=t3+t1; 625 t1=t13+t5; 626 t3=t11*t29; 627 t5=t3+t1; 628 t1=t17*t19; 629 t3=t1+t5; 630 int_v_list220[0]=t3; 631 return 1;} 632