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