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