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

LIBINT2_REALTYPE*const  stack = target;
{
const int hsi = 0;
{
const int lsi = 0;
{
const int vi = 0;
LIBINT2_REALTYPE fp352;
fp352 = inteval->PC_x[vi] * src1[((hsi*28+22)*1+lsi)*1];
LIBINT2_REALTYPE fp353;
fp353 = inteval->PA_x[vi] * src0[((hsi*28+22)*1+lsi)*1];
LIBINT2_REALTYPE fp351;
fp351 = fp353 - fp352;
target[((hsi*84+22)*1+lsi)*1] = fp351;
LIBINT2_REALTYPE fp349;
fp349 = inteval->PC_x[vi] * src1[((hsi*28+23)*1+lsi)*1];
LIBINT2_REALTYPE fp350;
fp350 = inteval->PA_x[vi] * src0[((hsi*28+23)*1+lsi)*1];
LIBINT2_REALTYPE fp348;
fp348 = fp350 - fp349;
target[((hsi*84+23)*1+lsi)*1] = fp348;
LIBINT2_REALTYPE fp346;
fp346 = inteval->PC_x[vi] * src1[((hsi*28+24)*1+lsi)*1];
LIBINT2_REALTYPE fp347;
fp347 = inteval->PA_x[vi] * src0[((hsi*28+24)*1+lsi)*1];
LIBINT2_REALTYPE fp345;
fp345 = fp347 - fp346;
target[((hsi*84+24)*1+lsi)*1] = fp345;
LIBINT2_REALTYPE fp343;
fp343 = inteval->PC_x[vi] * src1[((hsi*28+25)*1+lsi)*1];
LIBINT2_REALTYPE fp344;
fp344 = inteval->PA_x[vi] * src0[((hsi*28+25)*1+lsi)*1];
LIBINT2_REALTYPE fp342;
fp342 = fp344 - fp343;
target[((hsi*84+25)*1+lsi)*1] = fp342;
LIBINT2_REALTYPE fp340;
fp340 = inteval->PC_x[vi] * src1[((hsi*28+26)*1+lsi)*1];
LIBINT2_REALTYPE fp341;
fp341 = inteval->PA_x[vi] * src0[((hsi*28+26)*1+lsi)*1];
LIBINT2_REALTYPE fp339;
fp339 = fp341 - fp340;
target[((hsi*84+26)*1+lsi)*1] = fp339;
LIBINT2_REALTYPE fp337;
fp337 = inteval->PC_x[vi] * src1[((hsi*28+27)*1+lsi)*1];
LIBINT2_REALTYPE fp338;
fp338 = inteval->PA_x[vi] * src0[((hsi*28+27)*1+lsi)*1];
LIBINT2_REALTYPE fp336;
fp336 = fp338 - fp337;
target[((hsi*84+27)*1+lsi)*1] = fp336;
LIBINT2_REALTYPE fp334;
fp334 = inteval->PC_y[vi] * src1[((hsi*28+0)*1+lsi)*1];
LIBINT2_REALTYPE fp335;
fp335 = inteval->PA_y[vi] * src0[((hsi*28+0)*1+lsi)*1];
LIBINT2_REALTYPE fp333;
fp333 = fp335 - fp334;
target[((hsi*84+28)*1+lsi)*1] = fp333;
LIBINT2_REALTYPE fp328;
fp328 = src2[((hsi*21+0)*1+lsi)*1] - src3[((hsi*21+0)*1+lsi)*1];
LIBINT2_REALTYPE fp329;
fp329 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp327;
fp327 = fp329 * fp328;
LIBINT2_REALTYPE fp331;
fp331 = inteval->PC_y[vi] * src1[((hsi*28+1)*1+lsi)*1];
LIBINT2_REALTYPE fp332;
fp332 = inteval->PA_y[vi] * src0[((hsi*28+1)*1+lsi)*1];
LIBINT2_REALTYPE fp330;
fp330 = fp332 - fp331;
LIBINT2_REALTYPE fp326;
fp326 = fp330 + fp327;
target[((hsi*84+29)*1+lsi)*1] = fp326;
LIBINT2_REALTYPE fp324;
fp324 = inteval->PC_y[vi] * src1[((hsi*28+2)*1+lsi)*1];
LIBINT2_REALTYPE fp325;
fp325 = inteval->PA_y[vi] * src0[((hsi*28+2)*1+lsi)*1];
LIBINT2_REALTYPE fp323;
fp323 = fp325 - fp324;
target[((hsi*84+30)*1+lsi)*1] = fp323;
LIBINT2_REALTYPE fp499;
fp499 = src2[((hsi*21+0)*1+lsi)*1] - src3[((hsi*21+0)*1+lsi)*1];
LIBINT2_REALTYPE fp500;
fp500 = 6.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp498;
fp498 = fp500 * fp499;
LIBINT2_REALTYPE fp502;
fp502 = inteval->PC_x[vi] * src1[((hsi*28+0)*1+lsi)*1];
LIBINT2_REALTYPE fp503;
fp503 = inteval->PA_x[vi] * src0[((hsi*28+0)*1+lsi)*1];
LIBINT2_REALTYPE fp501;
fp501 = fp503 - fp502;
LIBINT2_REALTYPE fp497;
fp497 = fp501 + fp498;
target[((hsi*84+0)*1+lsi)*1] = fp497;
LIBINT2_REALTYPE fp311;
fp311 = src2[((hsi*21+2)*1+lsi)*1] - src3[((hsi*21+2)*1+lsi)*1];
LIBINT2_REALTYPE fp312;
fp312 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp310;
fp310 = fp312 * fp311;
LIBINT2_REALTYPE fp314;
fp314 = inteval->PC_y[vi] * src1[((hsi*28+4)*1+lsi)*1];
LIBINT2_REALTYPE fp315;
fp315 = inteval->PA_y[vi] * src0[((hsi*28+4)*1+lsi)*1];
LIBINT2_REALTYPE fp313;
fp313 = fp315 - fp314;
LIBINT2_REALTYPE fp309;
fp309 = fp313 + fp310;
target[((hsi*84+32)*1+lsi)*1] = fp309;
LIBINT2_REALTYPE fp307;
fp307 = inteval->PC_y[vi] * src1[((hsi*28+5)*1+lsi)*1];
LIBINT2_REALTYPE fp308;
fp308 = inteval->PA_y[vi] * src0[((hsi*28+5)*1+lsi)*1];
LIBINT2_REALTYPE fp306;
fp306 = fp308 - fp307;
target[((hsi*84+33)*1+lsi)*1] = fp306;
LIBINT2_REALTYPE fp301;
fp301 = src2[((hsi*21+3)*1+lsi)*1] - src3[((hsi*21+3)*1+lsi)*1];
LIBINT2_REALTYPE fp302;
fp302 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp300;
fp300 = fp302 * fp301;
LIBINT2_REALTYPE fp304;
fp304 = inteval->PC_y[vi] * src1[((hsi*28+6)*1+lsi)*1];
LIBINT2_REALTYPE fp305;
fp305 = inteval->PA_y[vi] * src0[((hsi*28+6)*1+lsi)*1];
LIBINT2_REALTYPE fp303;
fp303 = fp305 - fp304;
LIBINT2_REALTYPE fp299;
fp299 = fp303 + fp300;
target[((hsi*84+34)*1+lsi)*1] = fp299;
LIBINT2_REALTYPE fp294;
fp294 = src2[((hsi*21+4)*1+lsi)*1] - src3[((hsi*21+4)*1+lsi)*1];
LIBINT2_REALTYPE fp295;
fp295 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp293;
fp293 = fp295 * fp294;
LIBINT2_REALTYPE fp297;
fp297 = inteval->PC_y[vi] * src1[((hsi*28+7)*1+lsi)*1];
LIBINT2_REALTYPE fp298;
fp298 = inteval->PA_y[vi] * src0[((hsi*28+7)*1+lsi)*1];
LIBINT2_REALTYPE fp296;
fp296 = fp298 - fp297;
LIBINT2_REALTYPE fp292;
fp292 = fp296 + fp293;
target[((hsi*84+35)*1+lsi)*1] = fp292;
LIBINT2_REALTYPE fp287;
fp287 = src2[((hsi*21+5)*1+lsi)*1] - src3[((hsi*21+5)*1+lsi)*1];
LIBINT2_REALTYPE fp288;
fp288 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp286;
fp286 = fp288 * fp287;
LIBINT2_REALTYPE fp290;
fp290 = inteval->PC_y[vi] * src1[((hsi*28+8)*1+lsi)*1];
LIBINT2_REALTYPE fp291;
fp291 = inteval->PA_y[vi] * src0[((hsi*28+8)*1+lsi)*1];
LIBINT2_REALTYPE fp289;
fp289 = fp291 - fp290;
LIBINT2_REALTYPE fp285;
fp285 = fp289 + fp286;
target[((hsi*84+36)*1+lsi)*1] = fp285;
LIBINT2_REALTYPE fp283;
fp283 = inteval->PC_y[vi] * src1[((hsi*28+9)*1+lsi)*1];
LIBINT2_REALTYPE fp284;
fp284 = inteval->PA_y[vi] * src0[((hsi*28+9)*1+lsi)*1];
LIBINT2_REALTYPE fp282;
fp282 = fp284 - fp283;
target[((hsi*84+37)*1+lsi)*1] = fp282;
LIBINT2_REALTYPE fp277;
fp277 = src2[((hsi*21+6)*1+lsi)*1] - src3[((hsi*21+6)*1+lsi)*1];
LIBINT2_REALTYPE fp278;
fp278 = 4.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp276;
fp276 = fp278 * fp277;
LIBINT2_REALTYPE fp280;
fp280 = inteval->PC_y[vi] * src1[((hsi*28+10)*1+lsi)*1];
LIBINT2_REALTYPE fp281;
fp281 = inteval->PA_y[vi] * src0[((hsi*28+10)*1+lsi)*1];
LIBINT2_REALTYPE fp279;
fp279 = fp281 - fp280;
LIBINT2_REALTYPE fp275;
fp275 = fp279 + fp276;
target[((hsi*84+38)*1+lsi)*1] = fp275;
LIBINT2_REALTYPE fp270;
fp270 = src2[((hsi*21+7)*1+lsi)*1] - src3[((hsi*21+7)*1+lsi)*1];
LIBINT2_REALTYPE fp271;
fp271 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp269;
fp269 = fp271 * fp270;
LIBINT2_REALTYPE fp273;
fp273 = inteval->PC_y[vi] * src1[((hsi*28+11)*1+lsi)*1];
LIBINT2_REALTYPE fp274;
fp274 = inteval->PA_y[vi] * src0[((hsi*28+11)*1+lsi)*1];
LIBINT2_REALTYPE fp272;
fp272 = fp274 - fp273;
LIBINT2_REALTYPE fp268;
fp268 = fp272 + fp269;
target[((hsi*84+39)*1+lsi)*1] = fp268;
LIBINT2_REALTYPE fp263;
fp263 = src2[((hsi*21+8)*1+lsi)*1] - src3[((hsi*21+8)*1+lsi)*1];
LIBINT2_REALTYPE fp264;
fp264 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp262;
fp262 = fp264 * fp263;
LIBINT2_REALTYPE fp266;
fp266 = inteval->PC_y[vi] * src1[((hsi*28+12)*1+lsi)*1];
LIBINT2_REALTYPE fp267;
fp267 = inteval->PA_y[vi] * src0[((hsi*28+12)*1+lsi)*1];
LIBINT2_REALTYPE fp265;
fp265 = fp267 - fp266;
LIBINT2_REALTYPE fp261;
fp261 = fp265 + fp262;
target[((hsi*84+40)*1+lsi)*1] = fp261;
LIBINT2_REALTYPE fp256;
fp256 = src2[((hsi*21+9)*1+lsi)*1] - src3[((hsi*21+9)*1+lsi)*1];
LIBINT2_REALTYPE fp257;
fp257 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp255;
fp255 = fp257 * fp256;
LIBINT2_REALTYPE fp259;
fp259 = inteval->PC_y[vi] * src1[((hsi*28+13)*1+lsi)*1];
LIBINT2_REALTYPE fp260;
fp260 = inteval->PA_y[vi] * src0[((hsi*28+13)*1+lsi)*1];
LIBINT2_REALTYPE fp258;
fp258 = fp260 - fp259;
LIBINT2_REALTYPE fp254;
fp254 = fp258 + fp255;
target[((hsi*84+41)*1+lsi)*1] = fp254;
LIBINT2_REALTYPE fp318;
fp318 = src2[((hsi*21+1)*1+lsi)*1] - src3[((hsi*21+1)*1+lsi)*1];
LIBINT2_REALTYPE fp319;
fp319 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp317;
fp317 = fp319 * fp318;
LIBINT2_REALTYPE fp321;
fp321 = inteval->PC_y[vi] * src1[((hsi*28+3)*1+lsi)*1];
LIBINT2_REALTYPE fp322;
fp322 = inteval->PA_y[vi] * src0[((hsi*28+3)*1+lsi)*1];
LIBINT2_REALTYPE fp320;
fp320 = fp322 - fp321;
LIBINT2_REALTYPE fp316;
fp316 = fp320 + fp317;
target[((hsi*84+31)*1+lsi)*1] = fp316;
LIBINT2_REALTYPE fp492;
fp492 = src2[((hsi*21+1)*1+lsi)*1] - src3[((hsi*21+1)*1+lsi)*1];
LIBINT2_REALTYPE fp493;
fp493 = 5.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp491;
fp491 = fp493 * fp492;
LIBINT2_REALTYPE fp495;
fp495 = inteval->PC_x[vi] * src1[((hsi*28+1)*1+lsi)*1];
LIBINT2_REALTYPE fp496;
fp496 = inteval->PA_x[vi] * src0[((hsi*28+1)*1+lsi)*1];
LIBINT2_REALTYPE fp494;
fp494 = fp496 - fp495;
LIBINT2_REALTYPE fp490;
fp490 = fp494 + fp491;
target[((hsi*84+1)*1+lsi)*1] = fp490;
LIBINT2_REALTYPE fp485;
fp485 = src2[((hsi*21+2)*1+lsi)*1] - src3[((hsi*21+2)*1+lsi)*1];
LIBINT2_REALTYPE fp486;
fp486 = 5.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp484;
fp484 = fp486 * fp485;
LIBINT2_REALTYPE fp488;
fp488 = inteval->PC_x[vi] * src1[((hsi*28+2)*1+lsi)*1];
LIBINT2_REALTYPE fp489;
fp489 = inteval->PA_x[vi] * src0[((hsi*28+2)*1+lsi)*1];
LIBINT2_REALTYPE fp487;
fp487 = fp489 - fp488;
LIBINT2_REALTYPE fp483;
fp483 = fp487 + fp484;
target[((hsi*84+2)*1+lsi)*1] = fp483;
LIBINT2_REALTYPE fp478;
fp478 = src2[((hsi*21+3)*1+lsi)*1] - src3[((hsi*21+3)*1+lsi)*1];
LIBINT2_REALTYPE fp479;
fp479 = 4.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp477;
fp477 = fp479 * fp478;
LIBINT2_REALTYPE fp481;
fp481 = inteval->PC_x[vi] * src1[((hsi*28+3)*1+lsi)*1];
LIBINT2_REALTYPE fp482;
fp482 = inteval->PA_x[vi] * src0[((hsi*28+3)*1+lsi)*1];
LIBINT2_REALTYPE fp480;
fp480 = fp482 - fp481;
LIBINT2_REALTYPE fp476;
fp476 = fp480 + fp477;
target[((hsi*84+3)*1+lsi)*1] = fp476;
LIBINT2_REALTYPE fp471;
fp471 = src2[((hsi*21+4)*1+lsi)*1] - src3[((hsi*21+4)*1+lsi)*1];
LIBINT2_REALTYPE fp472;
fp472 = 4.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp470;
fp470 = fp472 * fp471;
LIBINT2_REALTYPE fp474;
fp474 = inteval->PC_x[vi] * src1[((hsi*28+4)*1+lsi)*1];
LIBINT2_REALTYPE fp475;
fp475 = inteval->PA_x[vi] * src0[((hsi*28+4)*1+lsi)*1];
LIBINT2_REALTYPE fp473;
fp473 = fp475 - fp474;
LIBINT2_REALTYPE fp469;
fp469 = fp473 + fp470;
target[((hsi*84+4)*1+lsi)*1] = fp469;
LIBINT2_REALTYPE fp464;
fp464 = src2[((hsi*21+5)*1+lsi)*1] - src3[((hsi*21+5)*1+lsi)*1];
LIBINT2_REALTYPE fp465;
fp465 = 4.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp463;
fp463 = fp465 * fp464;
LIBINT2_REALTYPE fp467;
fp467 = inteval->PC_x[vi] * src1[((hsi*28+5)*1+lsi)*1];
LIBINT2_REALTYPE fp468;
fp468 = inteval->PA_x[vi] * src0[((hsi*28+5)*1+lsi)*1];
LIBINT2_REALTYPE fp466;
fp466 = fp468 - fp467;
LIBINT2_REALTYPE fp462;
fp462 = fp466 + fp463;
target[((hsi*84+5)*1+lsi)*1] = fp462;
LIBINT2_REALTYPE fp457;
fp457 = src2[((hsi*21+6)*1+lsi)*1] - src3[((hsi*21+6)*1+lsi)*1];
LIBINT2_REALTYPE fp458;
fp458 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp456;
fp456 = fp458 * fp457;
LIBINT2_REALTYPE fp460;
fp460 = inteval->PC_x[vi] * src1[((hsi*28+6)*1+lsi)*1];
LIBINT2_REALTYPE fp461;
fp461 = inteval->PA_x[vi] * src0[((hsi*28+6)*1+lsi)*1];
LIBINT2_REALTYPE fp459;
fp459 = fp461 - fp460;
LIBINT2_REALTYPE fp455;
fp455 = fp459 + fp456;
target[((hsi*84+6)*1+lsi)*1] = fp455;
LIBINT2_REALTYPE fp450;
fp450 = src2[((hsi*21+7)*1+lsi)*1] - src3[((hsi*21+7)*1+lsi)*1];
LIBINT2_REALTYPE fp451;
fp451 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp449;
fp449 = fp451 * fp450;
LIBINT2_REALTYPE fp453;
fp453 = inteval->PC_x[vi] * src1[((hsi*28+7)*1+lsi)*1];
LIBINT2_REALTYPE fp454;
fp454 = inteval->PA_x[vi] * src0[((hsi*28+7)*1+lsi)*1];
LIBINT2_REALTYPE fp452;
fp452 = fp454 - fp453;
LIBINT2_REALTYPE fp448;
fp448 = fp452 + fp449;
target[((hsi*84+7)*1+lsi)*1] = fp448;
LIBINT2_REALTYPE fp443;
fp443 = src2[((hsi*21+8)*1+lsi)*1] - src3[((hsi*21+8)*1+lsi)*1];
LIBINT2_REALTYPE fp444;
fp444 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp442;
fp442 = fp444 * fp443;
LIBINT2_REALTYPE fp446;
fp446 = inteval->PC_x[vi] * src1[((hsi*28+8)*1+lsi)*1];
LIBINT2_REALTYPE fp447;
fp447 = inteval->PA_x[vi] * src0[((hsi*28+8)*1+lsi)*1];
LIBINT2_REALTYPE fp445;
fp445 = fp447 - fp446;
LIBINT2_REALTYPE fp441;
fp441 = fp445 + fp442;
target[((hsi*84+8)*1+lsi)*1] = fp441;
LIBINT2_REALTYPE fp436;
fp436 = src2[((hsi*21+9)*1+lsi)*1] - src3[((hsi*21+9)*1+lsi)*1];
LIBINT2_REALTYPE fp437;
fp437 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp435;
fp435 = fp437 * fp436;
LIBINT2_REALTYPE fp439;
fp439 = inteval->PC_x[vi] * src1[((hsi*28+9)*1+lsi)*1];
LIBINT2_REALTYPE fp440;
fp440 = inteval->PA_x[vi] * src0[((hsi*28+9)*1+lsi)*1];
LIBINT2_REALTYPE fp438;
fp438 = fp440 - fp439;
LIBINT2_REALTYPE fp434;
fp434 = fp438 + fp435;
target[((hsi*84+9)*1+lsi)*1] = fp434;
LIBINT2_REALTYPE fp355;
fp355 = inteval->PC_x[vi] * src1[((hsi*28+21)*1+lsi)*1];
LIBINT2_REALTYPE fp356;
fp356 = inteval->PA_x[vi] * src0[((hsi*28+21)*1+lsi)*1];
LIBINT2_REALTYPE fp354;
fp354 = fp356 - fp355;
target[((hsi*84+21)*1+lsi)*1] = fp354;
LIBINT2_REALTYPE fp422;
fp422 = src2[((hsi*21+11)*1+lsi)*1] - src3[((hsi*21+11)*1+lsi)*1];
LIBINT2_REALTYPE fp423;
fp423 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp421;
fp421 = fp423 * fp422;
LIBINT2_REALTYPE fp425;
fp425 = inteval->PC_x[vi] * src1[((hsi*28+11)*1+lsi)*1];
LIBINT2_REALTYPE fp426;
fp426 = inteval->PA_x[vi] * src0[((hsi*28+11)*1+lsi)*1];
LIBINT2_REALTYPE fp424;
fp424 = fp426 - fp425;
LIBINT2_REALTYPE fp420;
fp420 = fp424 + fp421;
target[((hsi*84+11)*1+lsi)*1] = fp420;
LIBINT2_REALTYPE fp415;
fp415 = src2[((hsi*21+12)*1+lsi)*1] - src3[((hsi*21+12)*1+lsi)*1];
LIBINT2_REALTYPE fp416;
fp416 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp414;
fp414 = fp416 * fp415;
LIBINT2_REALTYPE fp418;
fp418 = inteval->PC_x[vi] * src1[((hsi*28+12)*1+lsi)*1];
LIBINT2_REALTYPE fp419;
fp419 = inteval->PA_x[vi] * src0[((hsi*28+12)*1+lsi)*1];
LIBINT2_REALTYPE fp417;
fp417 = fp419 - fp418;
LIBINT2_REALTYPE fp413;
fp413 = fp417 + fp414;
target[((hsi*84+12)*1+lsi)*1] = fp413;
LIBINT2_REALTYPE fp408;
fp408 = src2[((hsi*21+13)*1+lsi)*1] - src3[((hsi*21+13)*1+lsi)*1];
LIBINT2_REALTYPE fp409;
fp409 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp407;
fp407 = fp409 * fp408;
LIBINT2_REALTYPE fp411;
fp411 = inteval->PC_x[vi] * src1[((hsi*28+13)*1+lsi)*1];
LIBINT2_REALTYPE fp412;
fp412 = inteval->PA_x[vi] * src0[((hsi*28+13)*1+lsi)*1];
LIBINT2_REALTYPE fp410;
fp410 = fp412 - fp411;
LIBINT2_REALTYPE fp406;
fp406 = fp410 + fp407;
target[((hsi*84+13)*1+lsi)*1] = fp406;
LIBINT2_REALTYPE fp401;
fp401 = src2[((hsi*21+14)*1+lsi)*1] - src3[((hsi*21+14)*1+lsi)*1];
LIBINT2_REALTYPE fp402;
fp402 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp400;
fp400 = fp402 * fp401;
LIBINT2_REALTYPE fp404;
fp404 = inteval->PC_x[vi] * src1[((hsi*28+14)*1+lsi)*1];
LIBINT2_REALTYPE fp405;
fp405 = inteval->PA_x[vi] * src0[((hsi*28+14)*1+lsi)*1];
LIBINT2_REALTYPE fp403;
fp403 = fp405 - fp404;
LIBINT2_REALTYPE fp399;
fp399 = fp403 + fp400;
target[((hsi*84+14)*1+lsi)*1] = fp399;
LIBINT2_REALTYPE fp394;
fp394 = src2[((hsi*21+15)*1+lsi)*1] - src3[((hsi*21+15)*1+lsi)*1];
LIBINT2_REALTYPE fp395;
fp395 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp393;
fp393 = fp395 * fp394;
LIBINT2_REALTYPE fp397;
fp397 = inteval->PC_x[vi] * src1[((hsi*28+15)*1+lsi)*1];
LIBINT2_REALTYPE fp398;
fp398 = inteval->PA_x[vi] * src0[((hsi*28+15)*1+lsi)*1];
LIBINT2_REALTYPE fp396;
fp396 = fp398 - fp397;
LIBINT2_REALTYPE fp392;
fp392 = fp396 + fp393;
target[((hsi*84+15)*1+lsi)*1] = fp392;
LIBINT2_REALTYPE fp387;
fp387 = src2[((hsi*21+16)*1+lsi)*1] - src3[((hsi*21+16)*1+lsi)*1];
LIBINT2_REALTYPE fp388;
fp388 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp386;
fp386 = fp388 * fp387;
LIBINT2_REALTYPE fp390;
fp390 = inteval->PC_x[vi] * src1[((hsi*28+16)*1+lsi)*1];
LIBINT2_REALTYPE fp391;
fp391 = inteval->PA_x[vi] * src0[((hsi*28+16)*1+lsi)*1];
LIBINT2_REALTYPE fp389;
fp389 = fp391 - fp390;
LIBINT2_REALTYPE fp385;
fp385 = fp389 + fp386;
target[((hsi*84+16)*1+lsi)*1] = fp385;
LIBINT2_REALTYPE fp380;
fp380 = src2[((hsi*21+17)*1+lsi)*1] - src3[((hsi*21+17)*1+lsi)*1];
LIBINT2_REALTYPE fp381;
fp381 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp379;
fp379 = fp381 * fp380;
LIBINT2_REALTYPE fp383;
fp383 = inteval->PC_x[vi] * src1[((hsi*28+17)*1+lsi)*1];
LIBINT2_REALTYPE fp384;
fp384 = inteval->PA_x[vi] * src0[((hsi*28+17)*1+lsi)*1];
LIBINT2_REALTYPE fp382;
fp382 = fp384 - fp383;
LIBINT2_REALTYPE fp378;
fp378 = fp382 + fp379;
target[((hsi*84+17)*1+lsi)*1] = fp378;
LIBINT2_REALTYPE fp373;
fp373 = src2[((hsi*21+18)*1+lsi)*1] - src3[((hsi*21+18)*1+lsi)*1];
LIBINT2_REALTYPE fp374;
fp374 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp372;
fp372 = fp374 * fp373;
LIBINT2_REALTYPE fp376;
fp376 = inteval->PC_x[vi] * src1[((hsi*28+18)*1+lsi)*1];
LIBINT2_REALTYPE fp377;
fp377 = inteval->PA_x[vi] * src0[((hsi*28+18)*1+lsi)*1];
LIBINT2_REALTYPE fp375;
fp375 = fp377 - fp376;
LIBINT2_REALTYPE fp371;
fp371 = fp375 + fp372;
target[((hsi*84+18)*1+lsi)*1] = fp371;
LIBINT2_REALTYPE fp366;
fp366 = src2[((hsi*21+19)*1+lsi)*1] - src3[((hsi*21+19)*1+lsi)*1];
LIBINT2_REALTYPE fp367;
fp367 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp365;
fp365 = fp367 * fp366;
LIBINT2_REALTYPE fp369;
fp369 = inteval->PC_x[vi] * src1[((hsi*28+19)*1+lsi)*1];
LIBINT2_REALTYPE fp370;
fp370 = inteval->PA_x[vi] * src0[((hsi*28+19)*1+lsi)*1];
LIBINT2_REALTYPE fp368;
fp368 = fp370 - fp369;
LIBINT2_REALTYPE fp364;
fp364 = fp368 + fp365;
target[((hsi*84+19)*1+lsi)*1] = fp364;
LIBINT2_REALTYPE fp359;
fp359 = src2[((hsi*21+20)*1+lsi)*1] - src3[((hsi*21+20)*1+lsi)*1];
LIBINT2_REALTYPE fp360;
fp360 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp358;
fp358 = fp360 * fp359;
LIBINT2_REALTYPE fp362;
fp362 = inteval->PC_x[vi] * src1[((hsi*28+20)*1+lsi)*1];
LIBINT2_REALTYPE fp363;
fp363 = inteval->PA_x[vi] * src0[((hsi*28+20)*1+lsi)*1];
LIBINT2_REALTYPE fp361;
fp361 = fp363 - fp362;
LIBINT2_REALTYPE fp357;
fp357 = fp361 + fp358;
target[((hsi*84+20)*1+lsi)*1] = fp357;
LIBINT2_REALTYPE fp429;
fp429 = src2[((hsi*21+10)*1+lsi)*1] - src3[((hsi*21+10)*1+lsi)*1];
LIBINT2_REALTYPE fp430;
fp430 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp428;
fp428 = fp430 * fp429;
LIBINT2_REALTYPE fp432;
fp432 = inteval->PC_x[vi] * src1[((hsi*28+10)*1+lsi)*1];
LIBINT2_REALTYPE fp433;
fp433 = inteval->PA_x[vi] * src0[((hsi*28+10)*1+lsi)*1];
LIBINT2_REALTYPE fp431;
fp431 = fp433 - fp432;
LIBINT2_REALTYPE fp427;
fp427 = fp431 + fp428;
target[((hsi*84+10)*1+lsi)*1] = fp427;
LIBINT2_REALTYPE fp123;
fp123 = src2[((hsi*21+4)*1+lsi)*1] - src3[((hsi*21+4)*1+lsi)*1];
LIBINT2_REALTYPE fp124;
fp124 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp122;
fp122 = fp124 * fp123;
LIBINT2_REALTYPE fp126;
fp126 = inteval->PC_z[vi] * src1[((hsi*28+8)*1+lsi)*1];
LIBINT2_REALTYPE fp127;
fp127 = inteval->PA_z[vi] * src0[((hsi*28+8)*1+lsi)*1];
LIBINT2_REALTYPE fp125;
fp125 = fp127 - fp126;
LIBINT2_REALTYPE fp121;
fp121 = fp125 + fp122;
target[((hsi*84+64)*1+lsi)*1] = fp121;
LIBINT2_REALTYPE fp116;
fp116 = src2[((hsi*21+5)*1+lsi)*1] - src3[((hsi*21+5)*1+lsi)*1];
LIBINT2_REALTYPE fp117;
fp117 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp115;
fp115 = fp117 * fp116;
LIBINT2_REALTYPE fp119;
fp119 = inteval->PC_z[vi] * src1[((hsi*28+9)*1+lsi)*1];
LIBINT2_REALTYPE fp120;
fp120 = inteval->PA_z[vi] * src0[((hsi*28+9)*1+lsi)*1];
LIBINT2_REALTYPE fp118;
fp118 = fp120 - fp119;
LIBINT2_REALTYPE fp114;
fp114 = fp118 + fp115;
target[((hsi*84+65)*1+lsi)*1] = fp114;
LIBINT2_REALTYPE fp112;
fp112 = inteval->PC_z[vi] * src1[((hsi*28+10)*1+lsi)*1];
LIBINT2_REALTYPE fp113;
fp113 = inteval->PA_z[vi] * src0[((hsi*28+10)*1+lsi)*1];
LIBINT2_REALTYPE fp111;
fp111 = fp113 - fp112;
target[((hsi*84+66)*1+lsi)*1] = fp111;
LIBINT2_REALTYPE fp106;
fp106 = src2[((hsi*21+6)*1+lsi)*1] - src3[((hsi*21+6)*1+lsi)*1];
LIBINT2_REALTYPE fp107;
fp107 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp105;
fp105 = fp107 * fp106;
LIBINT2_REALTYPE fp109;
fp109 = inteval->PC_z[vi] * src1[((hsi*28+11)*1+lsi)*1];
LIBINT2_REALTYPE fp110;
fp110 = inteval->PA_z[vi] * src0[((hsi*28+11)*1+lsi)*1];
LIBINT2_REALTYPE fp108;
fp108 = fp110 - fp109;
LIBINT2_REALTYPE fp104;
fp104 = fp108 + fp105;
target[((hsi*84+67)*1+lsi)*1] = fp104;
LIBINT2_REALTYPE fp99;
fp99 = src2[((hsi*21+7)*1+lsi)*1] - src3[((hsi*21+7)*1+lsi)*1];
LIBINT2_REALTYPE fp100;
fp100 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp98;
fp98 = fp100 * fp99;
LIBINT2_REALTYPE fp102;
fp102 = inteval->PC_z[vi] * src1[((hsi*28+12)*1+lsi)*1];
LIBINT2_REALTYPE fp103;
fp103 = inteval->PA_z[vi] * src0[((hsi*28+12)*1+lsi)*1];
LIBINT2_REALTYPE fp101;
fp101 = fp103 - fp102;
LIBINT2_REALTYPE fp97;
fp97 = fp101 + fp98;
target[((hsi*84+68)*1+lsi)*1] = fp97;
LIBINT2_REALTYPE fp92;
fp92 = src2[((hsi*21+8)*1+lsi)*1] - src3[((hsi*21+8)*1+lsi)*1];
LIBINT2_REALTYPE fp93;
fp93 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp91;
fp91 = fp93 * fp92;
LIBINT2_REALTYPE fp95;
fp95 = inteval->PC_z[vi] * src1[((hsi*28+13)*1+lsi)*1];
LIBINT2_REALTYPE fp96;
fp96 = inteval->PA_z[vi] * src0[((hsi*28+13)*1+lsi)*1];
LIBINT2_REALTYPE fp94;
fp94 = fp96 - fp95;
LIBINT2_REALTYPE fp90;
fp90 = fp94 + fp91;
target[((hsi*84+69)*1+lsi)*1] = fp90;
LIBINT2_REALTYPE fp85;
fp85 = src2[((hsi*21+9)*1+lsi)*1] - src3[((hsi*21+9)*1+lsi)*1];
LIBINT2_REALTYPE fp86;
fp86 = 4.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp84;
fp84 = fp86 * fp85;
LIBINT2_REALTYPE fp88;
fp88 = inteval->PC_z[vi] * src1[((hsi*28+14)*1+lsi)*1];
LIBINT2_REALTYPE fp89;
fp89 = inteval->PA_z[vi] * src0[((hsi*28+14)*1+lsi)*1];
LIBINT2_REALTYPE fp87;
fp87 = fp89 - fp88;
LIBINT2_REALTYPE fp83;
fp83 = fp87 + fp84;
target[((hsi*84+70)*1+lsi)*1] = fp83;
LIBINT2_REALTYPE fp81;
fp81 = inteval->PC_z[vi] * src1[((hsi*28+15)*1+lsi)*1];
LIBINT2_REALTYPE fp82;
fp82 = inteval->PA_z[vi] * src0[((hsi*28+15)*1+lsi)*1];
LIBINT2_REALTYPE fp80;
fp80 = fp82 - fp81;
target[((hsi*84+71)*1+lsi)*1] = fp80;
LIBINT2_REALTYPE fp75;
fp75 = src2[((hsi*21+10)*1+lsi)*1] - src3[((hsi*21+10)*1+lsi)*1];
LIBINT2_REALTYPE fp76;
fp76 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp74;
fp74 = fp76 * fp75;
LIBINT2_REALTYPE fp78;
fp78 = inteval->PC_z[vi] * src1[((hsi*28+16)*1+lsi)*1];
LIBINT2_REALTYPE fp79;
fp79 = inteval->PA_z[vi] * src0[((hsi*28+16)*1+lsi)*1];
LIBINT2_REALTYPE fp77;
fp77 = fp79 - fp78;
LIBINT2_REALTYPE fp73;
fp73 = fp77 + fp74;
target[((hsi*84+72)*1+lsi)*1] = fp73;
LIBINT2_REALTYPE fp252;
fp252 = inteval->PC_y[vi] * src1[((hsi*28+14)*1+lsi)*1];
LIBINT2_REALTYPE fp253;
fp253 = inteval->PA_y[vi] * src0[((hsi*28+14)*1+lsi)*1];
LIBINT2_REALTYPE fp251;
fp251 = fp253 - fp252;
target[((hsi*84+42)*1+lsi)*1] = fp251;
LIBINT2_REALTYPE fp61;
fp61 = src2[((hsi*21+12)*1+lsi)*1] - src3[((hsi*21+12)*1+lsi)*1];
LIBINT2_REALTYPE fp62;
fp62 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp60;
fp60 = fp62 * fp61;
LIBINT2_REALTYPE fp64;
fp64 = inteval->PC_z[vi] * src1[((hsi*28+18)*1+lsi)*1];
LIBINT2_REALTYPE fp65;
fp65 = inteval->PA_z[vi] * src0[((hsi*28+18)*1+lsi)*1];
LIBINT2_REALTYPE fp63;
fp63 = fp65 - fp64;
LIBINT2_REALTYPE fp59;
fp59 = fp63 + fp60;
target[((hsi*84+74)*1+lsi)*1] = fp59;
LIBINT2_REALTYPE fp54;
fp54 = src2[((hsi*21+13)*1+lsi)*1] - src3[((hsi*21+13)*1+lsi)*1];
LIBINT2_REALTYPE fp55;
fp55 = 4.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp53;
fp53 = fp55 * fp54;
LIBINT2_REALTYPE fp57;
fp57 = inteval->PC_z[vi] * src1[((hsi*28+19)*1+lsi)*1];
LIBINT2_REALTYPE fp58;
fp58 = inteval->PA_z[vi] * src0[((hsi*28+19)*1+lsi)*1];
LIBINT2_REALTYPE fp56;
fp56 = fp58 - fp57;
LIBINT2_REALTYPE fp52;
fp52 = fp56 + fp53;
target[((hsi*84+75)*1+lsi)*1] = fp52;
LIBINT2_REALTYPE fp47;
fp47 = src2[((hsi*21+14)*1+lsi)*1] - src3[((hsi*21+14)*1+lsi)*1];
LIBINT2_REALTYPE fp48;
fp48 = 5.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp46;
fp46 = fp48 * fp47;
LIBINT2_REALTYPE fp50;
fp50 = inteval->PC_z[vi] * src1[((hsi*28+20)*1+lsi)*1];
LIBINT2_REALTYPE fp51;
fp51 = inteval->PA_z[vi] * src0[((hsi*28+20)*1+lsi)*1];
LIBINT2_REALTYPE fp49;
fp49 = fp51 - fp50;
LIBINT2_REALTYPE fp45;
fp45 = fp49 + fp46;
target[((hsi*84+76)*1+lsi)*1] = fp45;
LIBINT2_REALTYPE fp43;
fp43 = inteval->PC_z[vi] * src1[((hsi*28+21)*1+lsi)*1];
LIBINT2_REALTYPE fp44;
fp44 = inteval->PA_z[vi] * src0[((hsi*28+21)*1+lsi)*1];
LIBINT2_REALTYPE fp42;
fp42 = fp44 - fp43;
target[((hsi*84+77)*1+lsi)*1] = fp42;
LIBINT2_REALTYPE fp37;
fp37 = src2[((hsi*21+15)*1+lsi)*1] - src3[((hsi*21+15)*1+lsi)*1];
LIBINT2_REALTYPE fp38;
fp38 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp36;
fp36 = fp38 * fp37;
LIBINT2_REALTYPE fp40;
fp40 = inteval->PC_z[vi] * src1[((hsi*28+22)*1+lsi)*1];
LIBINT2_REALTYPE fp41;
fp41 = inteval->PA_z[vi] * src0[((hsi*28+22)*1+lsi)*1];
LIBINT2_REALTYPE fp39;
fp39 = fp41 - fp40;
LIBINT2_REALTYPE fp35;
fp35 = fp39 + fp36;
target[((hsi*84+78)*1+lsi)*1] = fp35;
LIBINT2_REALTYPE fp30;
fp30 = src2[((hsi*21+16)*1+lsi)*1] - src3[((hsi*21+16)*1+lsi)*1];
LIBINT2_REALTYPE fp31;
fp31 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp29;
fp29 = fp31 * fp30;
LIBINT2_REALTYPE fp33;
fp33 = inteval->PC_z[vi] * src1[((hsi*28+23)*1+lsi)*1];
LIBINT2_REALTYPE fp34;
fp34 = inteval->PA_z[vi] * src0[((hsi*28+23)*1+lsi)*1];
LIBINT2_REALTYPE fp32;
fp32 = fp34 - fp33;
LIBINT2_REALTYPE fp28;
fp28 = fp32 + fp29;
target[((hsi*84+79)*1+lsi)*1] = fp28;
LIBINT2_REALTYPE fp23;
fp23 = src2[((hsi*21+17)*1+lsi)*1] - src3[((hsi*21+17)*1+lsi)*1];
LIBINT2_REALTYPE fp24;
fp24 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp22;
fp22 = fp24 * fp23;
LIBINT2_REALTYPE fp26;
fp26 = inteval->PC_z[vi] * src1[((hsi*28+24)*1+lsi)*1];
LIBINT2_REALTYPE fp27;
fp27 = inteval->PA_z[vi] * src0[((hsi*28+24)*1+lsi)*1];
LIBINT2_REALTYPE fp25;
fp25 = fp27 - fp26;
LIBINT2_REALTYPE fp21;
fp21 = fp25 + fp22;
target[((hsi*84+80)*1+lsi)*1] = fp21;
LIBINT2_REALTYPE fp16;
fp16 = src2[((hsi*21+18)*1+lsi)*1] - src3[((hsi*21+18)*1+lsi)*1];
LIBINT2_REALTYPE fp17;
fp17 = 4.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp15;
fp15 = fp17 * fp16;
LIBINT2_REALTYPE fp19;
fp19 = inteval->PC_z[vi] * src1[((hsi*28+25)*1+lsi)*1];
LIBINT2_REALTYPE fp20;
fp20 = inteval->PA_z[vi] * src0[((hsi*28+25)*1+lsi)*1];
LIBINT2_REALTYPE fp18;
fp18 = fp20 - fp19;
LIBINT2_REALTYPE fp14;
fp14 = fp18 + fp15;
target[((hsi*84+81)*1+lsi)*1] = fp14;
LIBINT2_REALTYPE fp9;
fp9 = src2[((hsi*21+19)*1+lsi)*1] - src3[((hsi*21+19)*1+lsi)*1];
LIBINT2_REALTYPE fp10;
fp10 = 5.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp8;
fp8 = fp10 * fp9;
LIBINT2_REALTYPE fp12;
fp12 = inteval->PC_z[vi] * src1[((hsi*28+26)*1+lsi)*1];
LIBINT2_REALTYPE fp13;
fp13 = inteval->PA_z[vi] * src0[((hsi*28+26)*1+lsi)*1];
LIBINT2_REALTYPE fp11;
fp11 = fp13 - fp12;
LIBINT2_REALTYPE fp7;
fp7 = fp11 + fp8;
target[((hsi*84+82)*1+lsi)*1] = fp7;
LIBINT2_REALTYPE fp2;
fp2 = src2[((hsi*21+20)*1+lsi)*1] - src3[((hsi*21+20)*1+lsi)*1];
LIBINT2_REALTYPE fp3;
fp3 = 6.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp1;
fp1 = fp3 * fp2;
LIBINT2_REALTYPE fp5;
fp5 = inteval->PC_z[vi] * src1[((hsi*28+27)*1+lsi)*1];
LIBINT2_REALTYPE fp6;
fp6 = inteval->PA_z[vi] * src0[((hsi*28+27)*1+lsi)*1];
LIBINT2_REALTYPE fp4;
fp4 = fp6 - fp5;
LIBINT2_REALTYPE fp0;
fp0 = fp4 + fp1;
target[((hsi*84+83)*1+lsi)*1] = fp0;
LIBINT2_REALTYPE fp68;
fp68 = src2[((hsi*21+11)*1+lsi)*1] - src3[((hsi*21+11)*1+lsi)*1];
LIBINT2_REALTYPE fp69;
fp69 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp67;
fp67 = fp69 * fp68;
LIBINT2_REALTYPE fp71;
fp71 = inteval->PC_z[vi] * src1[((hsi*28+17)*1+lsi)*1];
LIBINT2_REALTYPE fp72;
fp72 = inteval->PA_z[vi] * src0[((hsi*28+17)*1+lsi)*1];
LIBINT2_REALTYPE fp70;
fp70 = fp72 - fp71;
LIBINT2_REALTYPE fp66;
fp66 = fp70 + fp67;
target[((hsi*84+73)*1+lsi)*1] = fp66;
LIBINT2_REALTYPE fp246;
fp246 = src2[((hsi*21+10)*1+lsi)*1] - src3[((hsi*21+10)*1+lsi)*1];
LIBINT2_REALTYPE fp247;
fp247 = 5.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp245;
fp245 = fp247 * fp246;
LIBINT2_REALTYPE fp249;
fp249 = inteval->PC_y[vi] * src1[((hsi*28+15)*1+lsi)*1];
LIBINT2_REALTYPE fp250;
fp250 = inteval->PA_y[vi] * src0[((hsi*28+15)*1+lsi)*1];
LIBINT2_REALTYPE fp248;
fp248 = fp250 - fp249;
LIBINT2_REALTYPE fp244;
fp244 = fp248 + fp245;
target[((hsi*84+43)*1+lsi)*1] = fp244;
LIBINT2_REALTYPE fp239;
fp239 = src2[((hsi*21+11)*1+lsi)*1] - src3[((hsi*21+11)*1+lsi)*1];
LIBINT2_REALTYPE fp240;
fp240 = 4.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp238;
fp238 = fp240 * fp239;
LIBINT2_REALTYPE fp242;
fp242 = inteval->PC_y[vi] * src1[((hsi*28+16)*1+lsi)*1];
LIBINT2_REALTYPE fp243;
fp243 = inteval->PA_y[vi] * src0[((hsi*28+16)*1+lsi)*1];
LIBINT2_REALTYPE fp241;
fp241 = fp243 - fp242;
LIBINT2_REALTYPE fp237;
fp237 = fp241 + fp238;
target[((hsi*84+44)*1+lsi)*1] = fp237;
LIBINT2_REALTYPE fp232;
fp232 = src2[((hsi*21+12)*1+lsi)*1] - src3[((hsi*21+12)*1+lsi)*1];
LIBINT2_REALTYPE fp233;
fp233 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp231;
fp231 = fp233 * fp232;
LIBINT2_REALTYPE fp235;
fp235 = inteval->PC_y[vi] * src1[((hsi*28+17)*1+lsi)*1];
LIBINT2_REALTYPE fp236;
fp236 = inteval->PA_y[vi] * src0[((hsi*28+17)*1+lsi)*1];
LIBINT2_REALTYPE fp234;
fp234 = fp236 - fp235;
LIBINT2_REALTYPE fp230;
fp230 = fp234 + fp231;
target[((hsi*84+45)*1+lsi)*1] = fp230;
LIBINT2_REALTYPE fp225;
fp225 = src2[((hsi*21+13)*1+lsi)*1] - src3[((hsi*21+13)*1+lsi)*1];
LIBINT2_REALTYPE fp226;
fp226 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp224;
fp224 = fp226 * fp225;
LIBINT2_REALTYPE fp228;
fp228 = inteval->PC_y[vi] * src1[((hsi*28+18)*1+lsi)*1];
LIBINT2_REALTYPE fp229;
fp229 = inteval->PA_y[vi] * src0[((hsi*28+18)*1+lsi)*1];
LIBINT2_REALTYPE fp227;
fp227 = fp229 - fp228;
LIBINT2_REALTYPE fp223;
fp223 = fp227 + fp224;
target[((hsi*84+46)*1+lsi)*1] = fp223;
LIBINT2_REALTYPE fp218;
fp218 = src2[((hsi*21+14)*1+lsi)*1] - src3[((hsi*21+14)*1+lsi)*1];
LIBINT2_REALTYPE fp219;
fp219 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp217;
fp217 = fp219 * fp218;
LIBINT2_REALTYPE fp221;
fp221 = inteval->PC_y[vi] * src1[((hsi*28+19)*1+lsi)*1];
LIBINT2_REALTYPE fp222;
fp222 = inteval->PA_y[vi] * src0[((hsi*28+19)*1+lsi)*1];
LIBINT2_REALTYPE fp220;
fp220 = fp222 - fp221;
LIBINT2_REALTYPE fp216;
fp216 = fp220 + fp217;
target[((hsi*84+47)*1+lsi)*1] = fp216;
LIBINT2_REALTYPE fp214;
fp214 = inteval->PC_y[vi] * src1[((hsi*28+20)*1+lsi)*1];
LIBINT2_REALTYPE fp215;
fp215 = inteval->PA_y[vi] * src0[((hsi*28+20)*1+lsi)*1];
LIBINT2_REALTYPE fp213;
fp213 = fp215 - fp214;
target[((hsi*84+48)*1+lsi)*1] = fp213;
LIBINT2_REALTYPE fp208;
fp208 = src2[((hsi*21+15)*1+lsi)*1] - src3[((hsi*21+15)*1+lsi)*1];
LIBINT2_REALTYPE fp209;
fp209 = 6.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp207;
fp207 = fp209 * fp208;
LIBINT2_REALTYPE fp211;
fp211 = inteval->PC_y[vi] * src1[((hsi*28+21)*1+lsi)*1];
LIBINT2_REALTYPE fp212;
fp212 = inteval->PA_y[vi] * src0[((hsi*28+21)*1+lsi)*1];
LIBINT2_REALTYPE fp210;
fp210 = fp212 - fp211;
LIBINT2_REALTYPE fp206;
fp206 = fp210 + fp207;
target[((hsi*84+49)*1+lsi)*1] = fp206;
LIBINT2_REALTYPE fp201;
fp201 = src2[((hsi*21+16)*1+lsi)*1] - src3[((hsi*21+16)*1+lsi)*1];
LIBINT2_REALTYPE fp202;
fp202 = 5.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp200;
fp200 = fp202 * fp201;
LIBINT2_REALTYPE fp204;
fp204 = inteval->PC_y[vi] * src1[((hsi*28+22)*1+lsi)*1];
LIBINT2_REALTYPE fp205;
fp205 = inteval->PA_y[vi] * src0[((hsi*28+22)*1+lsi)*1];
LIBINT2_REALTYPE fp203;
fp203 = fp205 - fp204;
LIBINT2_REALTYPE fp199;
fp199 = fp203 + fp200;
target[((hsi*84+50)*1+lsi)*1] = fp199;
LIBINT2_REALTYPE fp194;
fp194 = src2[((hsi*21+17)*1+lsi)*1] - src3[((hsi*21+17)*1+lsi)*1];
LIBINT2_REALTYPE fp195;
fp195 = 4.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp193;
fp193 = fp195 * fp194;
LIBINT2_REALTYPE fp197;
fp197 = inteval->PC_y[vi] * src1[((hsi*28+23)*1+lsi)*1];
LIBINT2_REALTYPE fp198;
fp198 = inteval->PA_y[vi] * src0[((hsi*28+23)*1+lsi)*1];
LIBINT2_REALTYPE fp196;
fp196 = fp198 - fp197;
LIBINT2_REALTYPE fp192;
fp192 = fp196 + fp193;
target[((hsi*84+51)*1+lsi)*1] = fp192;
LIBINT2_REALTYPE fp130;
fp130 = src2[((hsi*21+3)*1+lsi)*1] - src3[((hsi*21+3)*1+lsi)*1];
LIBINT2_REALTYPE fp131;
fp131 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp129;
fp129 = fp131 * fp130;
LIBINT2_REALTYPE fp133;
fp133 = inteval->PC_z[vi] * src1[((hsi*28+7)*1+lsi)*1];
LIBINT2_REALTYPE fp134;
fp134 = inteval->PA_z[vi] * src0[((hsi*28+7)*1+lsi)*1];
LIBINT2_REALTYPE fp132;
fp132 = fp134 - fp133;
LIBINT2_REALTYPE fp128;
fp128 = fp132 + fp129;
target[((hsi*84+63)*1+lsi)*1] = fp128;
LIBINT2_REALTYPE fp180;
fp180 = src2[((hsi*21+19)*1+lsi)*1] - src3[((hsi*21+19)*1+lsi)*1];
LIBINT2_REALTYPE fp181;
fp181 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp179;
fp179 = fp181 * fp180;
LIBINT2_REALTYPE fp183;
fp183 = inteval->PC_y[vi] * src1[((hsi*28+25)*1+lsi)*1];
LIBINT2_REALTYPE fp184;
fp184 = inteval->PA_y[vi] * src0[((hsi*28+25)*1+lsi)*1];
LIBINT2_REALTYPE fp182;
fp182 = fp184 - fp183;
LIBINT2_REALTYPE fp178;
fp178 = fp182 + fp179;
target[((hsi*84+53)*1+lsi)*1] = fp178;
LIBINT2_REALTYPE fp173;
fp173 = src2[((hsi*21+20)*1+lsi)*1] - src3[((hsi*21+20)*1+lsi)*1];
LIBINT2_REALTYPE fp174;
fp174 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp172;
fp172 = fp174 * fp173;
LIBINT2_REALTYPE fp176;
fp176 = inteval->PC_y[vi] * src1[((hsi*28+26)*1+lsi)*1];
LIBINT2_REALTYPE fp177;
fp177 = inteval->PA_y[vi] * src0[((hsi*28+26)*1+lsi)*1];
LIBINT2_REALTYPE fp175;
fp175 = fp177 - fp176;
LIBINT2_REALTYPE fp171;
fp171 = fp175 + fp172;
target[((hsi*84+54)*1+lsi)*1] = fp171;
LIBINT2_REALTYPE fp169;
fp169 = inteval->PC_y[vi] * src1[((hsi*28+27)*1+lsi)*1];
LIBINT2_REALTYPE fp170;
fp170 = inteval->PA_y[vi] * src0[((hsi*28+27)*1+lsi)*1];
LIBINT2_REALTYPE fp168;
fp168 = fp170 - fp169;
target[((hsi*84+55)*1+lsi)*1] = fp168;
LIBINT2_REALTYPE fp166;
fp166 = inteval->PC_z[vi] * src1[((hsi*28+0)*1+lsi)*1];
LIBINT2_REALTYPE fp167;
fp167 = inteval->PA_z[vi] * src0[((hsi*28+0)*1+lsi)*1];
LIBINT2_REALTYPE fp165;
fp165 = fp167 - fp166;
target[((hsi*84+56)*1+lsi)*1] = fp165;
LIBINT2_REALTYPE fp163;
fp163 = inteval->PC_z[vi] * src1[((hsi*28+1)*1+lsi)*1];
LIBINT2_REALTYPE fp164;
fp164 = inteval->PA_z[vi] * src0[((hsi*28+1)*1+lsi)*1];
LIBINT2_REALTYPE fp162;
fp162 = fp164 - fp163;
target[((hsi*84+57)*1+lsi)*1] = fp162;
LIBINT2_REALTYPE fp157;
fp157 = src2[((hsi*21+0)*1+lsi)*1] - src3[((hsi*21+0)*1+lsi)*1];
LIBINT2_REALTYPE fp158;
fp158 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp156;
fp156 = fp158 * fp157;
LIBINT2_REALTYPE fp160;
fp160 = inteval->PC_z[vi] * src1[((hsi*28+2)*1+lsi)*1];
LIBINT2_REALTYPE fp161;
fp161 = inteval->PA_z[vi] * src0[((hsi*28+2)*1+lsi)*1];
LIBINT2_REALTYPE fp159;
fp159 = fp161 - fp160;
LIBINT2_REALTYPE fp155;
fp155 = fp159 + fp156;
target[((hsi*84+58)*1+lsi)*1] = fp155;
LIBINT2_REALTYPE fp153;
fp153 = inteval->PC_z[vi] * src1[((hsi*28+3)*1+lsi)*1];
LIBINT2_REALTYPE fp154;
fp154 = inteval->PA_z[vi] * src0[((hsi*28+3)*1+lsi)*1];
LIBINT2_REALTYPE fp152;
fp152 = fp154 - fp153;
target[((hsi*84+59)*1+lsi)*1] = fp152;
LIBINT2_REALTYPE fp147;
fp147 = src2[((hsi*21+1)*1+lsi)*1] - src3[((hsi*21+1)*1+lsi)*1];
LIBINT2_REALTYPE fp148;
fp148 = 1.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp146;
fp146 = fp148 * fp147;
LIBINT2_REALTYPE fp150;
fp150 = inteval->PC_z[vi] * src1[((hsi*28+4)*1+lsi)*1];
LIBINT2_REALTYPE fp151;
fp151 = inteval->PA_z[vi] * src0[((hsi*28+4)*1+lsi)*1];
LIBINT2_REALTYPE fp149;
fp149 = fp151 - fp150;
LIBINT2_REALTYPE fp145;
fp145 = fp149 + fp146;
target[((hsi*84+60)*1+lsi)*1] = fp145;
LIBINT2_REALTYPE fp140;
fp140 = src2[((hsi*21+2)*1+lsi)*1] - src3[((hsi*21+2)*1+lsi)*1];
LIBINT2_REALTYPE fp141;
fp141 = 2.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp139;
fp139 = fp141 * fp140;
LIBINT2_REALTYPE fp143;
fp143 = inteval->PC_z[vi] * src1[((hsi*28+5)*1+lsi)*1];
LIBINT2_REALTYPE fp144;
fp144 = inteval->PA_z[vi] * src0[((hsi*28+5)*1+lsi)*1];
LIBINT2_REALTYPE fp142;
fp142 = fp144 - fp143;
LIBINT2_REALTYPE fp138;
fp138 = fp142 + fp139;
target[((hsi*84+61)*1+lsi)*1] = fp138;
LIBINT2_REALTYPE fp136;
fp136 = inteval->PC_z[vi] * src1[((hsi*28+6)*1+lsi)*1];
LIBINT2_REALTYPE fp137;
fp137 = inteval->PA_z[vi] * src0[((hsi*28+6)*1+lsi)*1];
LIBINT2_REALTYPE fp135;
fp135 = fp137 - fp136;
target[((hsi*84+62)*1+lsi)*1] = fp135;
LIBINT2_REALTYPE fp187;
fp187 = src2[((hsi*21+18)*1+lsi)*1] - src3[((hsi*21+18)*1+lsi)*1];
LIBINT2_REALTYPE fp188;
fp188 = 3.0000000000000000e+00 * inteval->oo2z[vi];
LIBINT2_REALTYPE fp186;
fp186 = fp188 * fp187;
LIBINT2_REALTYPE fp190;
fp190 = inteval->PC_y[vi] * src1[((hsi*28+24)*1+lsi)*1];
LIBINT2_REALTYPE fp191;
fp191 = inteval->PA_y[vi] * src0[((hsi*28+24)*1+lsi)*1];
LIBINT2_REALTYPE fp189;
fp189 = fp191 - fp190;
LIBINT2_REALTYPE fp185;
fp185 = fp189 + fp186;
target[((hsi*84+52)*1+lsi)*1] = fp185;
}
}
}
const int hsi = 0;
const int lsi = 0;
const int vi = 0;
/** Number of flops = 504 */
}

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