/*
 *  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_n__0___ElecPot_s001__0___Ab__up_0(const Libint_t* inteval, LIBINT2_REALTYPE* target, const LIBINT2_REALTYPE* src0) {

LIBINT2_REALTYPE*const  stack = target;
{
const int hsi = 0;
{
const int lsi = 0;
{
const int vi = 0;
LIBINT2_REALTYPE fp33;
fp33 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+98)*1+lsi)*1];
target[((hsi*66+32)*1+lsi)*1] = fp33;
LIBINT2_REALTYPE fp34;
fp34 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+95)*1+lsi)*1];
target[((hsi*66+31)*1+lsi)*1] = fp34;
LIBINT2_REALTYPE fp35;
fp35 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+92)*1+lsi)*1];
target[((hsi*66+30)*1+lsi)*1] = fp35;
LIBINT2_REALTYPE fp36;
fp36 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+89)*1+lsi)*1];
target[((hsi*66+29)*1+lsi)*1] = fp36;
LIBINT2_REALTYPE fp37;
fp37 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+86)*1+lsi)*1];
target[((hsi*66+28)*1+lsi)*1] = fp37;
LIBINT2_REALTYPE fp38;
fp38 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+83)*1+lsi)*1];
target[((hsi*66+27)*1+lsi)*1] = fp38;
LIBINT2_REALTYPE fp39;
fp39 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+80)*1+lsi)*1];
target[((hsi*66+26)*1+lsi)*1] = fp39;
LIBINT2_REALTYPE fp40;
fp40 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+77)*1+lsi)*1];
target[((hsi*66+25)*1+lsi)*1] = fp40;
LIBINT2_REALTYPE fp41;
fp41 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+74)*1+lsi)*1];
target[((hsi*66+24)*1+lsi)*1] = fp41;
LIBINT2_REALTYPE fp42;
fp42 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+71)*1+lsi)*1];
target[((hsi*66+23)*1+lsi)*1] = fp42;
LIBINT2_REALTYPE fp43;
fp43 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+68)*1+lsi)*1];
target[((hsi*66+22)*1+lsi)*1] = fp43;
LIBINT2_REALTYPE fp44;
fp44 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+65)*1+lsi)*1];
target[((hsi*66+21)*1+lsi)*1] = fp44;
LIBINT2_REALTYPE fp45;
fp45 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+62)*1+lsi)*1];
target[((hsi*66+20)*1+lsi)*1] = fp45;
LIBINT2_REALTYPE fp46;
fp46 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+59)*1+lsi)*1];
target[((hsi*66+19)*1+lsi)*1] = fp46;
LIBINT2_REALTYPE fp47;
fp47 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+56)*1+lsi)*1];
target[((hsi*66+18)*1+lsi)*1] = fp47;
LIBINT2_REALTYPE fp65;
fp65 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+2)*1+lsi)*1];
target[((hsi*66+0)*1+lsi)*1] = fp65;
LIBINT2_REALTYPE fp64;
fp64 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+5)*1+lsi)*1];
target[((hsi*66+1)*1+lsi)*1] = fp64;
LIBINT2_REALTYPE fp63;
fp63 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+8)*1+lsi)*1];
target[((hsi*66+2)*1+lsi)*1] = fp63;
LIBINT2_REALTYPE fp62;
fp62 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+11)*1+lsi)*1];
target[((hsi*66+3)*1+lsi)*1] = fp62;
LIBINT2_REALTYPE fp61;
fp61 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+14)*1+lsi)*1];
target[((hsi*66+4)*1+lsi)*1] = fp61;
LIBINT2_REALTYPE fp60;
fp60 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+17)*1+lsi)*1];
target[((hsi*66+5)*1+lsi)*1] = fp60;
LIBINT2_REALTYPE fp59;
fp59 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+20)*1+lsi)*1];
target[((hsi*66+6)*1+lsi)*1] = fp59;
LIBINT2_REALTYPE fp58;
fp58 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+23)*1+lsi)*1];
target[((hsi*66+7)*1+lsi)*1] = fp58;
LIBINT2_REALTYPE fp48;
fp48 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+53)*1+lsi)*1];
target[((hsi*66+17)*1+lsi)*1] = fp48;
LIBINT2_REALTYPE fp56;
fp56 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+29)*1+lsi)*1];
target[((hsi*66+9)*1+lsi)*1] = fp56;
LIBINT2_REALTYPE fp55;
fp55 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+32)*1+lsi)*1];
target[((hsi*66+10)*1+lsi)*1] = fp55;
LIBINT2_REALTYPE fp54;
fp54 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+35)*1+lsi)*1];
target[((hsi*66+11)*1+lsi)*1] = fp54;
LIBINT2_REALTYPE fp53;
fp53 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+38)*1+lsi)*1];
target[((hsi*66+12)*1+lsi)*1] = fp53;
LIBINT2_REALTYPE fp52;
fp52 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+41)*1+lsi)*1];
target[((hsi*66+13)*1+lsi)*1] = fp52;
LIBINT2_REALTYPE fp51;
fp51 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+44)*1+lsi)*1];
target[((hsi*66+14)*1+lsi)*1] = fp51;
LIBINT2_REALTYPE fp50;
fp50 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+47)*1+lsi)*1];
target[((hsi*66+15)*1+lsi)*1] = fp50;
LIBINT2_REALTYPE fp49;
fp49 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+50)*1+lsi)*1];
target[((hsi*66+16)*1+lsi)*1] = fp49;
LIBINT2_REALTYPE fp57;
fp57 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+26)*1+lsi)*1];
target[((hsi*66+8)*1+lsi)*1] = fp57;
LIBINT2_REALTYPE fp0;
fp0 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+197)*1+lsi)*1];
target[((hsi*66+65)*1+lsi)*1] = fp0;
LIBINT2_REALTYPE fp1;
fp1 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+194)*1+lsi)*1];
target[((hsi*66+64)*1+lsi)*1] = fp1;
LIBINT2_REALTYPE fp2;
fp2 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+191)*1+lsi)*1];
target[((hsi*66+63)*1+lsi)*1] = fp2;
LIBINT2_REALTYPE fp3;
fp3 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+188)*1+lsi)*1];
target[((hsi*66+62)*1+lsi)*1] = fp3;
LIBINT2_REALTYPE fp4;
fp4 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+185)*1+lsi)*1];
target[((hsi*66+61)*1+lsi)*1] = fp4;
LIBINT2_REALTYPE fp5;
fp5 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+182)*1+lsi)*1];
target[((hsi*66+60)*1+lsi)*1] = fp5;
LIBINT2_REALTYPE fp6;
fp6 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+179)*1+lsi)*1];
target[((hsi*66+59)*1+lsi)*1] = fp6;
LIBINT2_REALTYPE fp7;
fp7 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+176)*1+lsi)*1];
target[((hsi*66+58)*1+lsi)*1] = fp7;
LIBINT2_REALTYPE fp8;
fp8 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+173)*1+lsi)*1];
target[((hsi*66+57)*1+lsi)*1] = fp8;
LIBINT2_REALTYPE fp9;
fp9 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+170)*1+lsi)*1];
target[((hsi*66+56)*1+lsi)*1] = fp9;
LIBINT2_REALTYPE fp10;
fp10 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+167)*1+lsi)*1];
target[((hsi*66+55)*1+lsi)*1] = fp10;
LIBINT2_REALTYPE fp11;
fp11 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+164)*1+lsi)*1];
target[((hsi*66+54)*1+lsi)*1] = fp11;
LIBINT2_REALTYPE fp12;
fp12 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+161)*1+lsi)*1];
target[((hsi*66+53)*1+lsi)*1] = fp12;
LIBINT2_REALTYPE fp13;
fp13 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+158)*1+lsi)*1];
target[((hsi*66+52)*1+lsi)*1] = fp13;
LIBINT2_REALTYPE fp14;
fp14 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+155)*1+lsi)*1];
target[((hsi*66+51)*1+lsi)*1] = fp14;
LIBINT2_REALTYPE fp32;
fp32 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+101)*1+lsi)*1];
target[((hsi*66+33)*1+lsi)*1] = fp32;
LIBINT2_REALTYPE fp31;
fp31 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+104)*1+lsi)*1];
target[((hsi*66+34)*1+lsi)*1] = fp31;
LIBINT2_REALTYPE fp30;
fp30 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+107)*1+lsi)*1];
target[((hsi*66+35)*1+lsi)*1] = fp30;
LIBINT2_REALTYPE fp29;
fp29 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+110)*1+lsi)*1];
target[((hsi*66+36)*1+lsi)*1] = fp29;
LIBINT2_REALTYPE fp28;
fp28 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+113)*1+lsi)*1];
target[((hsi*66+37)*1+lsi)*1] = fp28;
LIBINT2_REALTYPE fp27;
fp27 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+116)*1+lsi)*1];
target[((hsi*66+38)*1+lsi)*1] = fp27;
LIBINT2_REALTYPE fp26;
fp26 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+119)*1+lsi)*1];
target[((hsi*66+39)*1+lsi)*1] = fp26;
LIBINT2_REALTYPE fp25;
fp25 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+122)*1+lsi)*1];
target[((hsi*66+40)*1+lsi)*1] = fp25;
LIBINT2_REALTYPE fp15;
fp15 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+152)*1+lsi)*1];
target[((hsi*66+50)*1+lsi)*1] = fp15;
LIBINT2_REALTYPE fp23;
fp23 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+128)*1+lsi)*1];
target[((hsi*66+42)*1+lsi)*1] = fp23;
LIBINT2_REALTYPE fp22;
fp22 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+131)*1+lsi)*1];
target[((hsi*66+43)*1+lsi)*1] = fp22;
LIBINT2_REALTYPE fp21;
fp21 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+134)*1+lsi)*1];
target[((hsi*66+44)*1+lsi)*1] = fp21;
LIBINT2_REALTYPE fp20;
fp20 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+137)*1+lsi)*1];
target[((hsi*66+45)*1+lsi)*1] = fp20;
LIBINT2_REALTYPE fp19;
fp19 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+140)*1+lsi)*1];
target[((hsi*66+46)*1+lsi)*1] = fp19;
LIBINT2_REALTYPE fp18;
fp18 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+143)*1+lsi)*1];
target[((hsi*66+47)*1+lsi)*1] = fp18;
LIBINT2_REALTYPE fp17;
fp17 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+146)*1+lsi)*1];
target[((hsi*66+48)*1+lsi)*1] = fp17;
LIBINT2_REALTYPE fp16;
fp16 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+149)*1+lsi)*1];
target[((hsi*66+49)*1+lsi)*1] = fp16;
LIBINT2_REALTYPE fp24;
fp24 = inteval->two_alpha0_ket[vi] * src0[((hsi*198+125)*1+lsi)*1];
target[((hsi*66+41)*1+lsi)*1] = fp24;
}
}
}
const int hsi = 0;
const int lsi = 0;
const int vi = 0;
/** Number of flops = 66 */
}

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