i1311.cc

大型并行量子化学软件；支持密度泛函（DFT）。可以进行各种量子化学计算。支持CHARMM并行计算。非常具有应用价值。

#include <chemistry/qc/oint3/build.h>
int sc::BuildIntV3::i1311(){
/* the cost is 531 */
double t1;
double t2;
double t3;
double t4;
double t5;
double t6;
double t7;
double t8;
double t9;
double t10;
double t11;
double t12;
double t13;
double t14;
double t15;
double t16;
double t17;
double t18;
double t19;
double t20;
double t21;
double t22;
double t23;
double t24;
double t25;
double t26;
double t27;
double t28;
double t29;
double t30;
double t31;
double t32;
double t33;
double t34;
double t35;
double t36;
double t37;
double t38;
double t39;
double t40;
double t41;
double t42;
double t43;
double t44;
double t45;
double t46;
double t47;
double t48;
double t49;
double t50;
double t51;
double t52;
double t53;
double t54;
double t55;
double t56;
double t57;
double t58;
double t59;
double t60;
double t61;
double t62;
double t63;
double t64;
double t65;
double t66;
double t67;
double t68;
double t69;
double t70;
double t71;
double t72;
double t73;
t1=int_v_zeta34*int_v_ooze;
t2=int_v_oo2zeta12*t1;
t1=(-1)*t2;
double***restrictxx int_v_list0=int_v_list(0);
double**restrictxx int_v_list00=int_v_list0[0];
double*restrictxx int_v_list002=int_v_list00[2];
t2=t1*int_v_list002[0];
double*restrictxx int_v_list001=int_v_list00[1];
t3=int_v_oo2zeta12*int_v_list001[0];
t4=t3+t2;
t2=int_v_W0-int_v_p120;
double*restrictxx int_v_list003=int_v_list00[3];
t3=t2*int_v_list003[0];
t5=int_v_p120-int_v_r10;
t6=t5*int_v_list002[0];
t7=t6+t3;
t3=t2*t7;
t6=t3+t4;
t3=t2*int_v_list002[0];
t8=t5*int_v_list001[0];
t9=t8+t3;
t3=t5*t9;
t8=t3+t6;
t3=0.5*int_v_ooze;
t6=t3*t8;
t8=t3*int_v_list002[0];
t10=int_v_W0-int_v_p340;
t11=t10*int_v_list003[0];
t12=int_v_p340-int_v_r30;
t13=t12*int_v_list002[0];
t14=t13+t11;
t11=t2*t14;
t13=t11+t8;
t11=t10*int_v_list002[0];
t15=t12*int_v_list001[0];
t16=t15+t11;
t11=t5*t16;
t15=t11+t13;
t11=2*int_v_ooze;
t13=int_v_zeta34*t11;
t11=int_v_oo2zeta12*t13;
t13=(-1)*t11;
t11=t13*t15;
t17=t11+t6;
t11=t3*int_v_list001[0];
t18=t2*t16;
t19=t18+t11;
t18=t10*int_v_list001[0];
double*restrictxx int_v_list000=int_v_list00[0];
t20=t12*int_v_list000[0];
t21=t20+t18;
t18=t5*t21;
t20=t18+t19;
double***restrictxx int_v_list1=int_v_list(1);
double**restrictxx int_v_list11=int_v_list1[1];
double*restrictxx int_v_list110=int_v_list11[0];
int_v_list110[8]=t20;
t18=int_v_oo2zeta12*2;
t19=t18*t20;
t22=t19+t17;
t17=t3*t7;
t19=t1*t14;
t23=t19+t17;
t24=int_v_oo2zeta12*t16;
t25=t24+t23;
t23=t3*int_v_list003[0];
double*restrictxx int_v_list004=int_v_list00[4];
t26=t10*int_v_list004[0];
t10=t12*int_v_list003[0];
t12=t10+t26;
t10=t2*t12;
t26=t10+t23;
t10=t5*t14;
t27=t10+t26;
t10=t2*t27;
t26=t10+t25;
t10=t5*t15;
t25=t10+t26;
t10=t2*t25;
t26=t10+t22;
t10=t3*t9;
t22=t1*t16;
t28=t22+t10;
t29=int_v_oo2zeta12*t21;
t30=t29+t28;
t28=t2*t15;
t31=t28+t30;
t28=t5*t20;
t30=t28+t31;
double***restrictxx int_v_list2=int_v_list(2);
double**restrictxx int_v_list21=int_v_list2[1];
double*restrictxx int_v_list210=int_v_list21[0];
int_v_list210[17]=t30;
t28=t5*t30;
t31=t28+t26;
double***restrictxx int_v_list3=int_v_list(3);
double**restrictxx int_v_list31=int_v_list3[1];
double*restrictxx int_v_list310=int_v_list31[0];
int_v_list310[29]=t31;
t26=int_v_W2-int_v_p342;
t28=t26*int_v_list003[0];
t32=int_v_p342-int_v_r32;
t33=t32*int_v_list002[0];
t34=t33+t28;
t28=t2*t34;
t33=t26*int_v_list002[0];
t35=t32*int_v_list001[0];
t36=t35+t33;
t33=t5*t36;
t35=t33+t28;
t28=t13*t35;
t33=t2*t36;
t37=t26*int_v_list001[0];
t38=t32*int_v_list000[0];
t39=t38+t37;
t37=t5*t39;
t38=t37+t33;
int_v_list110[7]=t38;
t33=t18*t38;
t37=t33+t28;
t28=t1*t34;
t33=int_v_oo2zeta12*t36;
t40=t33+t28;
t41=t26*int_v_list004[0];
t26=t32*int_v_list003[0];
t32=t26+t41;
t26=t2*t32;
t41=t5*t34;
t42=t41+t26;
t26=t2*t42;
t41=t26+t40;
t26=t5*t35;
t43=t26+t41;
t26=t2*t43;
t41=t26+t37;
t26=t1*t36;
t37=int_v_oo2zeta12*t39;
t44=t37+t26;
t45=t2*t35;
t46=t45+t44;
t45=t5*t38;
t47=t45+t46;
int_v_list210[16]=t47;
t45=t5*t47;
t46=t45+t41;
int_v_list310[28]=t46;
t41=int_v_W1-int_v_p341;
t45=t41*int_v_list003[0];
t48=int_v_p341-int_v_r31;
t49=t48*int_v_list002[0];
t50=t49+t45;
t45=t2*t50;
t49=t41*int_v_list002[0];
t51=t48*int_v_list001[0];
t52=t51+t49;
t49=t5*t52;
t51=t49+t45;
t45=t13*t51;
t49=t2*t52;
t53=t41*int_v_list001[0];
t54=t48*int_v_list000[0];
t55=t54+t53;
t53=t5*t55;
t54=t53+t49;
int_v_list110[6]=t54;
t49=t18*t54;
t53=t49+t45;
t45=t1*t50;
t49=int_v_oo2zeta12*t52;
t56=t49+t45;
t57=t41*int_v_list004[0];
t41=t48*int_v_list003[0];
t48=t41+t57;
t41=t2*t48;
t57=t5*t50;
t58=t57+t41;
t41=t2*t58;
t57=t41+t56;
t41=t5*t51;
t59=t41+t57;
t41=t2*t59;
t57=t41+t53;
t41=t1*t52;
t53=int_v_oo2zeta12*t55;
t60=t53+t41;
t61=t2*t51;
t2=t61+t60;
t61=t5*t54;
t62=t61+t2;
int_v_list210[15]=t62;
t2=t5*t62;
t5=t2+t57;
int_v_list310[27]=t5;
t2=int_v_W2-int_v_p122;
t57=t2*t25;
t61=int_v_p122-int_v_r12;
t63=t61*t30;
t64=t63+t57;
int_v_list310[26]=t64;
t57=t2*t43;
t63=t6+t57;
t57=t61*t47;
t65=t57+t63;
int_v_list310[25]=t65;
t57=t2*t59;
t63=t61*t62;
t66=t63+t57;
int_v_list310[24]=t66;
t57=int_v_W1-int_v_p121;
t63=t25*t57;
t25=int_v_p121-int_v_r11;
t67=t25*t30;
t30=t67+t63;
int_v_list310[23]=t30;
t63=t57*t43;
t43=t25*t47;
t47=t43+t63;
int_v_list310[22]=t47;
t43=t57*t59;
t59=t6+t43;
t6=t25*t62;
t43=t6+t59;
int_v_list310[21]=t43;
t6=t1*t15;
t59=int_v_oo2zeta12*t20;
t62=t59+t6;
t6=t2*t27;
t59=t61*t15;
t63=t59+t6;
t6=t2*t63;
t59=t6+t62;
t6=t2*t15;
t63=t61*t20;
t67=t63+t6;
int_v_list210[14]=t67;
t6=t61*t67;
t63=t6+t59;
int_v_list310[20]=t63;
t6=t2*t7;
t59=t61*t9;
t67=t59+t6;
t6=t3*t67;
t59=t1*t35;
t67=t59+t6;
t6=int_v_oo2zeta12*t38;
t68=t6+t67;
t67=t2*t42;
t69=t17+t67;
t67=t61*t35;
t70=t67+t69;
t67=t2*t70;
t69=t67+t68;
t67=t2*t35;
t68=t10+t67;
t67=t61*t38;
t70=t67+t68;
int_v_list210[13]=t70;
t67=t61*t70;
t68=t67+t69;
int_v_list310[19]=t68;
t67=t1*t51;
t69=int_v_oo2zeta12*t54;
t70=t69+t67;
t71=t2*t58;
t72=t61*t51;
t73=t72+t71;
t71=t2*t73;
t72=t71+t70;
t70=t2*t51;
t71=t61*t54;
t73=t71+t70;
int_v_list210[12]=t73;
t70=t61*t73;
t71=t70+t72;
int_v_list310[18]=t71;
t70=t57*t27;
t27=t25*t15;
t72=t27+t70;
t27=t2*t72;
t70=t57*t15;
t15=t25*t20;
t20=t15+t70;
int_v_list210[11]=t20;
t15=t61*t20;
t70=t15+t27;
int_v_list310[17]=t70;
t15=t57*t7;
t7=t25*t9;
t9=t7+t15;
t7=t3*t9;
t9=t57*t42;
t15=t25*t35;
t27=t15+t9;
t9=t2*t27;
t15=t9+t7;
t9=t57*t35;
t35=t25*t38;
t38=t35+t9;
int_v_list210[10]=t38;
t9=t61*t38;
t35=t9+t15;
int_v_list310[16]=t35;
t9=t57*t58;
t15=t17+t9;
t9=t25*t51;
t17=t9+t15;
t9=t2*t17;
t15=t57*t51;
t42=t10+t15;
t10=t25*t54;
t15=t10+t42;
int_v_list210[9]=t15;
t10=t61*t15;
t42=t10+t9;
int_v_list310[15]=t42;
t9=t57*t72;
t10=t62+t9;
t9=t25*t20;
t20=t9+t10;
int_v_list310[14]=t20;
t9=t6+t59;
t6=t57*t27;
t10=t6+t9;
t6=t25*t38;
t9=t6+t10;
int_v_list310[13]=t9;
t6=t67+t7;
t7=t69+t6;
t6=t57*t17;
t10=t6+t7;
t6=t25*t15;
t7=t6+t10;
int_v_list310[12]=t7;
t6=t2*t14;
t10=t61*t16;
t15=t10+t6;
t6=t13*t15;
t10=t2*t16;
t17=t61*t21;
t27=t17+t10;
int_v_list110[5]=t27;
t10=t18*t27;
t17=t10+t6;
t6=t24+t19;
t10=t2*t12;
t19=t61*t14;
t24=t19+t10;
t10=t2*t24;
t19=t10+t6;
t10=t61*t15;
t24=t10+t19;
t10=t2*t24;
t19=t10+t17;
t10=t29+t22;
t17=t2*t15;
t15=t17+t10;
t17=t61*t27;
t22=t17+t15;
int_v_list210[8]=t22;
t15=t61*t22;
t17=t15+t19;
int_v_list310[11]=t17;
t15=t2*t34;
t19=t8+t15;
t15=t61*t36;
t22=t15+t19;
t15=t13*t22;
t19=t2*int_v_list003[0];
t24=t61*int_v_list002[0];
t27=t24+t19;
t19=t2*t27;
t24=t4+t19;
t19=t2*int_v_list002[0];
t29=t61*int_v_list001[0];
t38=t29+t19;
t19=t61*t38;
t29=t19+t24;
t19=t3*t29;
t24=t19+t15;
t15=t2*t36;
t19=t11+t15;
t15=t61*t39;
t29=t15+t19;
int_v_list110[4]=t29;
t15=t18*t29;
t19=t15+t24;
t15=t3*t27;
t24=t28+t15;
t15=t33+t24;
t24=t2*t32;
t27=t23+t24;
t24=t61*t34;
t28=t24+t27;
t24=t2*t28;
t27=t24+t15;
t15=t61*t22;
t24=t15+t27;
t15=t2*t24;
t24=t15+t19;
t15=t3*t38;
t19=t26+t15;
t15=t37+t19;
t19=t2*t22;
t22=t19+t15;
t15=t61*t29;
t19=t15+t22;
int_v_list210[7]=t19;
t15=t61*t19;
t19=t15+t24;
int_v_list310[10]=t19;
t15=t2*t50;
t22=t61*t52;
t24=t22+t15;
t15=t13*t24;
t22=t2*t52;
t26=t61*t55;
t27=t26+t22;
int_v_list110[3]=t27;
t22=t18*t27;
t26=t22+t15;
t15=t2*t48;
t22=t61*t50;
t28=t22+t15;
t15=t2*t28;
t22=t56+t15;
t15=t61*t24;
t28=t15+t22;
t15=t2*t28;
t22=t15+t26;
t15=t2*t24;
t24=t60+t15;
t15=t61*t27;
t26=t15+t24;
int_v_list210[6]=t26;
t15=t61*t26;
t24=t15+t22;
int_v_list310[9]=t24;
t15=t57*t14;
t22=t25*t16;
t26=t22+t15;
t15=t1*t26;
t22=t57*t16;
t16=t25*t21;
t21=t16+t22;
int_v_list110[2]=t21;
t16=int_v_oo2zeta12*t21;
t22=t16+t15;
t15=t57*t12;
t12=t25*t14;
t14=t12+t15;
t12=t2*t14;
t15=t61*t26;
t16=t15+t12;
t12=t2*t16;
t15=t12+t22;
t12=t2*t26;
t16=t61*t21;
t22=t16+t12;
int_v_list210[5]=t22;
t12=t61*t22;
t16=t12+t15;
int_v_list310[8]=t16;
t12=t57*t34;
t15=t25*t36;
t22=t15+t12;
t12=t1*t22;
t15=t57*int_v_list003[0];
t27=t25*int_v_list002[0];
t28=t27+t15;
t15=t2*t28;
t27=t57*int_v_list002[0];
t29=t25*int_v_list001[0];
t33=t29+t27;
t27=t61*t33;
t29=t27+t15;
t15=t3*t29;
t27=t15+t12;
t12=t57*t36;
t15=t25*t39;
t29=t15+t12;
int_v_list110[1]=t29;
t12=int_v_oo2zeta12*t29;
t15=t12+t27;
t12=t57*t32;
t27=t25*t34;
t32=t27+t12;
t12=t2*t32;
t27=t3*t28;
t34=t27+t12;
t12=t61*t22;
t36=t12+t34;
t12=t2*t36;
t34=t12+t15;
t12=t2*t22;
t15=t3*t33;
t36=t15+t12;
t12=t61*t29;
t37=t12+t36;
int_v_list210[4]=t37;
t12=t61*t37;
t36=t12+t34;
int_v_list310[7]=t36;
t12=t57*t50;
t34=t8+t12;
t8=t25*t52;
t12=t8+t34;
t8=t1*t12;
t1=t57*t52;
t34=t11+t1;
t1=t25*t55;
t11=t1+t34;
int_v_list110[0]=t11;
t1=int_v_oo2zeta12*t11;
t34=t1+t8;
t1=t57*t48;
t8=t23+t1;
t1=t25*t50;
t23=t1+t8;
t1=t2*t23;
t8=t61*t12;
t37=t8+t1;
t1=t2*t37;
t8=t1+t34;
t1=t2*t12;
t34=t61*t11;
t37=t34+t1;
int_v_list210[3]=t37;
t1=t61*t37;
t34=t1+t8;
int_v_list310[6]=t34;
t1=t57*t14;
t8=t6+t1;
t1=t25*t26;
t6=t1+t8;
t1=t2*t6;
t8=t57*t26;
t14=t10+t8;
t8=t25*t21;
t10=t8+t14;
int_v_list210[2]=t10;
t8=t61*t10;
t14=t8+t1;
int_v_list310[5]=t14;
t1=t57*t32;
t8=t40+t1;
t1=t25*t22;
t32=t1+t8;
t1=t2*t32;
t8=t57*t28;
t28=t4+t8;
t4=t25*t33;
t8=t4+t28;
t4=t3*t8;
t3=t4+t1;
t1=t57*t22;
t8=t44+t1;
t1=t25*t29;
t28=t1+t8;
int_v_list210[1]=t28;
t1=t61*t28;
t8=t1+t3;
int_v_list310[4]=t8;
t1=t45+t27;
t3=t49+t1;
t1=t57*t23;
t23=t1+t3;
t1=t25*t12;
t3=t1+t23;
t1=t2*t3;
t2=t41+t15;
t15=t53+t2;
t2=t57*t12;
t23=t2+t15;
t2=t25*t11;
t15=t2+t23;
int_v_list210[0]=t15;
t2=t61*t15;
t23=t2+t1;
int_v_list310[3]=t23;
t1=t13*t26;
t2=t18*t21;
t21=t2+t1;
t1=t57*t6;
t2=t1+t21;
t1=t25*t10;
t6=t1+t2;
int_v_list310[2]=t6;
t1=t13*t22;
t2=t18*t29;
t10=t2+t1;
t1=t57*t32;
t2=t1+t10;
t1=t25*t28;
t10=t1+t2;
int_v_list310[1]=t10;
t1=t13*t12;
t2=t4+t1;
t1=t18*t11;
t4=t1+t2;
t1=t57*t3;
t2=t1+t4;
t1=t25*t15;
t3=t1+t2;
int_v_list310[0]=t3;
return 1;}