/*
 *  Copyright (C) 2004-2026 Edward F. Valeev
 *
 *  This file is part of Libint library.
 *
 *  Libint library is free software: you can redistribute it and/or modify
 *  it under the terms of the GNU Lesser General Public License as published by
 *  the Free Software Foundation, either version 3 of the License, or
 *  (at your option) any later version.
 *
 *  Libint library is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU Lesser General Public License for more details.
 *
 *  You should have received a copy of the GNU Lesser General Public License
 *  along with Libint library.  If not, see <http://www.gnu.org/licenses/>.
 *
 */

#include <libint2.h>

#ifdef __cplusplus
LIBINT_PRAGMA_CLANG(diagnostic push)
LIBINT_PRAGMA_CLANG(diagnostic ignored "-Wunused-variable")
LIBINT_PRAGMA_GCC(diagnostic push)
LIBINT_PRAGMA_GCC(diagnostic ignored "-Wunused-variable")
extern "C" {
#endif
void CR_DerivGaussP0InKet_aB_s010__0___ElecPot_l100__0___Ab__up_0(const Libint_t* inteval, LIBINT2_REALTYPE* target, const LIBINT2_REALTYPE* src0, const LIBINT2_REALTYPE* src1) {

LIBINT2_REALTYPE*const  stack = target;
{
const int hsi = 0;
{
const int lsi = 0;
{
const int vi = 0;
LIBINT2_REALTYPE fp52;
fp52 = 2.0000000000000000e+00 * src1[((hsi*36+21)*1+lsi)*1];
LIBINT2_REALTYPE fp53;
fp53 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+21)*1+lsi)*1];
LIBINT2_REALTYPE fp51;
fp51 = fp53 - fp52;
target[((hsi*45+21)*1+lsi)*1] = fp51;
LIBINT2_REALTYPE fp55;
fp55 = 3.0000000000000000e+00 * src1[((hsi*36+20)*1+lsi)*1];
LIBINT2_REALTYPE fp56;
fp56 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+20)*1+lsi)*1];
LIBINT2_REALTYPE fp54;
fp54 = fp56 - fp55;
target[((hsi*45+20)*1+lsi)*1] = fp54;
LIBINT2_REALTYPE fp58;
fp58 = 3.0000000000000000e+00 * src1[((hsi*36+19)*1+lsi)*1];
LIBINT2_REALTYPE fp59;
fp59 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+19)*1+lsi)*1];
LIBINT2_REALTYPE fp57;
fp57 = fp59 - fp58;
target[((hsi*45+19)*1+lsi)*1] = fp57;
LIBINT2_REALTYPE fp61;
fp61 = 3.0000000000000000e+00 * src1[((hsi*36+18)*1+lsi)*1];
LIBINT2_REALTYPE fp62;
fp62 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+18)*1+lsi)*1];
LIBINT2_REALTYPE fp60;
fp60 = fp62 - fp61;
target[((hsi*45+18)*1+lsi)*1] = fp60;
LIBINT2_REALTYPE fp64;
fp64 = 3.0000000000000000e+00 * src1[((hsi*36+17)*1+lsi)*1];
LIBINT2_REALTYPE fp65;
fp65 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+17)*1+lsi)*1];
LIBINT2_REALTYPE fp63;
fp63 = fp65 - fp64;
target[((hsi*45+17)*1+lsi)*1] = fp63;
LIBINT2_REALTYPE fp67;
fp67 = 3.0000000000000000e+00 * src1[((hsi*36+16)*1+lsi)*1];
LIBINT2_REALTYPE fp68;
fp68 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+16)*1+lsi)*1];
LIBINT2_REALTYPE fp66;
fp66 = fp68 - fp67;
target[((hsi*45+16)*1+lsi)*1] = fp66;
LIBINT2_REALTYPE fp70;
fp70 = 3.0000000000000000e+00 * src1[((hsi*36+15)*1+lsi)*1];
LIBINT2_REALTYPE fp71;
fp71 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+15)*1+lsi)*1];
LIBINT2_REALTYPE fp69;
fp69 = fp71 - fp70;
target[((hsi*45+15)*1+lsi)*1] = fp69;
LIBINT2_REALTYPE fp73;
fp73 = 4.0000000000000000e+00 * src1[((hsi*36+14)*1+lsi)*1];
LIBINT2_REALTYPE fp74;
fp74 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+14)*1+lsi)*1];
LIBINT2_REALTYPE fp72;
fp72 = fp74 - fp73;
target[((hsi*45+14)*1+lsi)*1] = fp72;
LIBINT2_REALTYPE fp76;
fp76 = 4.0000000000000000e+00 * src1[((hsi*36+13)*1+lsi)*1];
LIBINT2_REALTYPE fp77;
fp77 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+13)*1+lsi)*1];
LIBINT2_REALTYPE fp75;
fp75 = fp77 - fp76;
target[((hsi*45+13)*1+lsi)*1] = fp75;
LIBINT2_REALTYPE fp79;
fp79 = 4.0000000000000000e+00 * src1[((hsi*36+12)*1+lsi)*1];
LIBINT2_REALTYPE fp80;
fp80 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+12)*1+lsi)*1];
LIBINT2_REALTYPE fp78;
fp78 = fp80 - fp79;
target[((hsi*45+12)*1+lsi)*1] = fp78;
LIBINT2_REALTYPE fp115;
fp115 = 8.0000000000000000e+00 * src1[((hsi*36+0)*1+lsi)*1];
LIBINT2_REALTYPE fp116;
fp116 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+0)*1+lsi)*1];
LIBINT2_REALTYPE fp114;
fp114 = fp116 - fp115;
target[((hsi*45+0)*1+lsi)*1] = fp114;
LIBINT2_REALTYPE fp85;
fp85 = 4.0000000000000000e+00 * src1[((hsi*36+10)*1+lsi)*1];
LIBINT2_REALTYPE fp86;
fp86 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+10)*1+lsi)*1];
LIBINT2_REALTYPE fp84;
fp84 = fp86 - fp85;
target[((hsi*45+10)*1+lsi)*1] = fp84;
LIBINT2_REALTYPE fp88;
fp88 = 5.0000000000000000e+00 * src1[((hsi*36+9)*1+lsi)*1];
LIBINT2_REALTYPE fp89;
fp89 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+9)*1+lsi)*1];
LIBINT2_REALTYPE fp87;
fp87 = fp89 - fp88;
target[((hsi*45+9)*1+lsi)*1] = fp87;
LIBINT2_REALTYPE fp91;
fp91 = 5.0000000000000000e+00 * src1[((hsi*36+8)*1+lsi)*1];
LIBINT2_REALTYPE fp92;
fp92 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+8)*1+lsi)*1];
LIBINT2_REALTYPE fp90;
fp90 = fp92 - fp91;
target[((hsi*45+8)*1+lsi)*1] = fp90;
LIBINT2_REALTYPE fp94;
fp94 = 5.0000000000000000e+00 * src1[((hsi*36+7)*1+lsi)*1];
LIBINT2_REALTYPE fp95;
fp95 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+7)*1+lsi)*1];
LIBINT2_REALTYPE fp93;
fp93 = fp95 - fp94;
target[((hsi*45+7)*1+lsi)*1] = fp93;
LIBINT2_REALTYPE fp97;
fp97 = 5.0000000000000000e+00 * src1[((hsi*36+6)*1+lsi)*1];
LIBINT2_REALTYPE fp98;
fp98 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+6)*1+lsi)*1];
LIBINT2_REALTYPE fp96;
fp96 = fp98 - fp97;
target[((hsi*45+6)*1+lsi)*1] = fp96;
LIBINT2_REALTYPE fp100;
fp100 = 6.0000000000000000e+00 * src1[((hsi*36+5)*1+lsi)*1];
LIBINT2_REALTYPE fp101;
fp101 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+5)*1+lsi)*1];
LIBINT2_REALTYPE fp99;
fp99 = fp101 - fp100;
target[((hsi*45+5)*1+lsi)*1] = fp99;
LIBINT2_REALTYPE fp103;
fp103 = 6.0000000000000000e+00 * src1[((hsi*36+4)*1+lsi)*1];
LIBINT2_REALTYPE fp104;
fp104 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+4)*1+lsi)*1];
LIBINT2_REALTYPE fp102;
fp102 = fp104 - fp103;
target[((hsi*45+4)*1+lsi)*1] = fp102;
LIBINT2_REALTYPE fp106;
fp106 = 6.0000000000000000e+00 * src1[((hsi*36+3)*1+lsi)*1];
LIBINT2_REALTYPE fp107;
fp107 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+3)*1+lsi)*1];
LIBINT2_REALTYPE fp105;
fp105 = fp107 - fp106;
target[((hsi*45+3)*1+lsi)*1] = fp105;
LIBINT2_REALTYPE fp109;
fp109 = 7.0000000000000000e+00 * src1[((hsi*36+2)*1+lsi)*1];
LIBINT2_REALTYPE fp110;
fp110 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+2)*1+lsi)*1];
LIBINT2_REALTYPE fp108;
fp108 = fp110 - fp109;
target[((hsi*45+2)*1+lsi)*1] = fp108;
LIBINT2_REALTYPE fp112;
fp112 = 7.0000000000000000e+00 * src1[((hsi*36+1)*1+lsi)*1];
LIBINT2_REALTYPE fp113;
fp113 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+1)*1+lsi)*1];
LIBINT2_REALTYPE fp111;
fp111 = fp113 - fp112;
target[((hsi*45+1)*1+lsi)*1] = fp111;
LIBINT2_REALTYPE fp82;
fp82 = 4.0000000000000000e+00 * src1[((hsi*36+11)*1+lsi)*1];
LIBINT2_REALTYPE fp83;
fp83 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+11)*1+lsi)*1];
LIBINT2_REALTYPE fp81;
fp81 = fp83 - fp82;
target[((hsi*45+11)*1+lsi)*1] = fp81;
LIBINT2_REALTYPE fp0;
fp0 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+44)*1+lsi)*1];
target[((hsi*45+44)*1+lsi)*1] = fp0;
LIBINT2_REALTYPE fp1;
fp1 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+43)*1+lsi)*1];
target[((hsi*45+43)*1+lsi)*1] = fp1;
LIBINT2_REALTYPE fp2;
fp2 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+42)*1+lsi)*1];
target[((hsi*45+42)*1+lsi)*1] = fp2;
LIBINT2_REALTYPE fp3;
fp3 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+41)*1+lsi)*1];
target[((hsi*45+41)*1+lsi)*1] = fp3;
LIBINT2_REALTYPE fp4;
fp4 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+40)*1+lsi)*1];
target[((hsi*45+40)*1+lsi)*1] = fp4;
LIBINT2_REALTYPE fp5;
fp5 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+39)*1+lsi)*1];
target[((hsi*45+39)*1+lsi)*1] = fp5;
LIBINT2_REALTYPE fp6;
fp6 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+38)*1+lsi)*1];
target[((hsi*45+38)*1+lsi)*1] = fp6;
LIBINT2_REALTYPE fp7;
fp7 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+37)*1+lsi)*1];
target[((hsi*45+37)*1+lsi)*1] = fp7;
LIBINT2_REALTYPE fp8;
fp8 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+36)*1+lsi)*1];
target[((hsi*45+36)*1+lsi)*1] = fp8;
LIBINT2_REALTYPE fp10;
fp10 = 1.0000000000000000e+00 * src1[((hsi*36+35)*1+lsi)*1];
LIBINT2_REALTYPE fp11;
fp11 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+35)*1+lsi)*1];
LIBINT2_REALTYPE fp9;
fp9 = fp11 - fp10;
target[((hsi*45+35)*1+lsi)*1] = fp9;
LIBINT2_REALTYPE fp49;
fp49 = 2.0000000000000000e+00 * src1[((hsi*36+22)*1+lsi)*1];
LIBINT2_REALTYPE fp50;
fp50 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+22)*1+lsi)*1];
LIBINT2_REALTYPE fp48;
fp48 = fp50 - fp49;
target[((hsi*45+22)*1+lsi)*1] = fp48;
LIBINT2_REALTYPE fp16;
fp16 = 1.0000000000000000e+00 * src1[((hsi*36+33)*1+lsi)*1];
LIBINT2_REALTYPE fp17;
fp17 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+33)*1+lsi)*1];
LIBINT2_REALTYPE fp15;
fp15 = fp17 - fp16;
target[((hsi*45+33)*1+lsi)*1] = fp15;
LIBINT2_REALTYPE fp19;
fp19 = 1.0000000000000000e+00 * src1[((hsi*36+32)*1+lsi)*1];
LIBINT2_REALTYPE fp20;
fp20 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+32)*1+lsi)*1];
LIBINT2_REALTYPE fp18;
fp18 = fp20 - fp19;
target[((hsi*45+32)*1+lsi)*1] = fp18;
LIBINT2_REALTYPE fp22;
fp22 = 1.0000000000000000e+00 * src1[((hsi*36+31)*1+lsi)*1];
LIBINT2_REALTYPE fp23;
fp23 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+31)*1+lsi)*1];
LIBINT2_REALTYPE fp21;
fp21 = fp23 - fp22;
target[((hsi*45+31)*1+lsi)*1] = fp21;
LIBINT2_REALTYPE fp25;
fp25 = 1.0000000000000000e+00 * src1[((hsi*36+30)*1+lsi)*1];
LIBINT2_REALTYPE fp26;
fp26 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+30)*1+lsi)*1];
LIBINT2_REALTYPE fp24;
fp24 = fp26 - fp25;
target[((hsi*45+30)*1+lsi)*1] = fp24;
LIBINT2_REALTYPE fp28;
fp28 = 1.0000000000000000e+00 * src1[((hsi*36+29)*1+lsi)*1];
LIBINT2_REALTYPE fp29;
fp29 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+29)*1+lsi)*1];
LIBINT2_REALTYPE fp27;
fp27 = fp29 - fp28;
target[((hsi*45+29)*1+lsi)*1] = fp27;
LIBINT2_REALTYPE fp31;
fp31 = 1.0000000000000000e+00 * src1[((hsi*36+28)*1+lsi)*1];
LIBINT2_REALTYPE fp32;
fp32 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+28)*1+lsi)*1];
LIBINT2_REALTYPE fp30;
fp30 = fp32 - fp31;
target[((hsi*45+28)*1+lsi)*1] = fp30;
LIBINT2_REALTYPE fp34;
fp34 = 2.0000000000000000e+00 * src1[((hsi*36+27)*1+lsi)*1];
LIBINT2_REALTYPE fp35;
fp35 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+27)*1+lsi)*1];
LIBINT2_REALTYPE fp33;
fp33 = fp35 - fp34;
target[((hsi*45+27)*1+lsi)*1] = fp33;
LIBINT2_REALTYPE fp37;
fp37 = 2.0000000000000000e+00 * src1[((hsi*36+26)*1+lsi)*1];
LIBINT2_REALTYPE fp38;
fp38 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+26)*1+lsi)*1];
LIBINT2_REALTYPE fp36;
fp36 = fp38 - fp37;
target[((hsi*45+26)*1+lsi)*1] = fp36;
LIBINT2_REALTYPE fp40;
fp40 = 2.0000000000000000e+00 * src1[((hsi*36+25)*1+lsi)*1];
LIBINT2_REALTYPE fp41;
fp41 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+25)*1+lsi)*1];
LIBINT2_REALTYPE fp39;
fp39 = fp41 - fp40;
target[((hsi*45+25)*1+lsi)*1] = fp39;
LIBINT2_REALTYPE fp43;
fp43 = 2.0000000000000000e+00 * src1[((hsi*36+24)*1+lsi)*1];
LIBINT2_REALTYPE fp44;
fp44 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+24)*1+lsi)*1];
LIBINT2_REALTYPE fp42;
fp42 = fp44 - fp43;
target[((hsi*45+24)*1+lsi)*1] = fp42;
LIBINT2_REALTYPE fp46;
fp46 = 2.0000000000000000e+00 * src1[((hsi*36+23)*1+lsi)*1];
LIBINT2_REALTYPE fp47;
fp47 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+23)*1+lsi)*1];
LIBINT2_REALTYPE fp45;
fp45 = fp47 - fp46;
target[((hsi*45+23)*1+lsi)*1] = fp45;
LIBINT2_REALTYPE fp13;
fp13 = 1.0000000000000000e+00 * src1[((hsi*36+34)*1+lsi)*1];
LIBINT2_REALTYPE fp14;
fp14 = inteval->two_alpha0_ket[vi] * src0[((hsi*55+34)*1+lsi)*1];
LIBINT2_REALTYPE fp12;
fp12 = fp14 - fp13;
target[((hsi*45+34)*1+lsi)*1] = fp12;
}
}
}
const int hsi = 0;
const int lsi = 0;
const int vi = 0;
/** Number of flops = 117 */
}

#ifdef __cplusplus
};
LIBINT_PRAGMA_CLANG(diagnostic pop)
LIBINT_PRAGMA_GCC(diagnostic pop)
#endif
