// File: /workspace/github_c_makefile_star2_O1/mohuangrui[P]ArtraCFD/solid_dynamics.c
// Function: IntegrateSurfaceForce
void IntegrateSurfaceForce(Space *space, const Model *model)
{
    const Partition *const part = &(space->part);
    const Node *const node = space->node;
    Geometry *const geo = &(space->geo);
    const IntVec nMin = {part->ns[PIN][X][MIN], part->ns[PIN][Y][MIN], part->ns[PIN][Z][MIN]};
    const IntVec nMax = {part->ns[PIN][X][MAX], part->ns[PIN][Y][MAX], part->ns[PIN][Z][MAX]};
    const RealVec sMin = {part->domain[X][MIN], part->domain[Y][MIN], part->domain[Z][MIN]};
    const RealVec d = {part->d[X], part->d[Y], part->d[Z]};
    const RealVec dd = {part->dd[X], part->dd[Y], part->dd[Z]};
    const IntVec ng = {part->ng[X], part->ng[Y], part->ng[Z]};
    const Real zero = 0.0;
    const Real percent = FLT_EPSILON * FLT_EPSILON;
    Polyhedron *poly = NULL;
    int idx = 0; /* linear array index math variable */
    int box[DIMS][LIMIT] = {{0}}; /* bounding box in node space */
    int lidN = 0; /* count total number of interfacial nodes */
    int gstN = 0; /* count total number of ghost nodes */
    RealVec pG = {zero}; /* ghost point */
    RealVec pO = {zero}; /* boundary point */
    RealVec pI = {zero}; /* image point */
    RealVec N = {zero}; /* normal */
    Real Uo[DIMUo] = {zero};
    RealVec V = {zero}; /* velocity vector */
    RealVec r = {zero}; /* position vector */
    RealVec Fp = {zero}; /* pressure force */
    RealVec Fv = {zero}; /* viscous force */
    RealVec Fs = {zero}; /* surface force */
    RealVec Tt = {zero}; /* torque */
    RealVec fvar = {zero}; /* force offset, mean, variance */
    Real Vn = zero; /* velocity projection */
    Real mu = zero; /* viscosity */
    Real ds = zero; /* infinitesimal area for integration */
    for (int n = 0; n < geo->totN; ++n) {
        poly = geo->poly + n;
        if (0 < poly->state) { /* surface force negligible */
            continue;
        }
        /* reset some non accumulative information to zero */
        memset(poly->Fp, 0, DIMS * sizeof(*poly->Fp));
        memset(poly->Fv, 0, DIMS * sizeof(*poly->Fv));
        memset(poly->Tt, 0, DIMS * sizeof(*poly->Tt));
        memset(fvar, 0, DIMS * sizeof(*fvar));
        lidN = 0;
        gstN = 0;
        /* determine search range according to bounding box of polyhedron and valid node space */
        for (int s = 0; s < DIMS; ++s) {
            box[s][MIN] = ConfineSpace(MapNode(poly->box[s][MIN], sMin[s], dd[s], ng[s]), nMin[s], nMax[s]);
            box[s][MAX] = ConfineSpace(MapNode(poly->box[s][MAX], sMin[s], dd[s], ng[s]), nMin[s], nMax[s]) + 1;
        }
        for (int k = box[Z][MIN]; k < box[Z][MAX]; ++k) {
            for (int j = box[Y][MIN]; j < box[Y][MAX]; ++j) {
                for (int i = box[X][MIN]; i < box[X][MAX]; ++i) {
                    idx = IndexNode(k, j, i, part->n[Y], part->n[X]);
                    if ((2 == node[idx].lid) && (n + 1 == node[idx].did)) {
                        ++lidN; /* an interfacial node of current geometry */
                    }
                    if ((2 != node[idx].gst) || (n + 1 != node[idx].did)) {
                        continue;
                    }
                    ++gstN; /* a ghost node of current geometry */
                    /* surface force exerted by fluid (pressure + shear force) */
                    pG[X] = MapPoint(i, sMin[X], d[X], ng[X]);
                    pG[Y] = MapPoint(j, sMin[Y], d[Y], ng[Y]);
                    pG[Z] = MapPoint(k, sMin[Z], d[Z], ng[Z]);
                    ComputeGeometricData(pG, node[idx].fid, poly, pO, pI, N);
                    r[X] = pO[X] - poly->O[X];
                    r[Y] = pO[Y] - poly->O[Y];
                    r[Z] = pO[Z] - poly->O[Z];
                    MapPrimitive(model->gamma, model->gasR, node[idx].U[TO], Uo);
                    Fp[X] = Uo[4] * N[X];
                    Fp[Y] = Uo[4] * N[Y];
                    Fp[Z] = Uo[4] * N[Z];
                    if (1 == gstN) {
                        fvar[0] = Uo[4];
                    }
                    fvar[1] = fvar[1] + Uo[4] - fvar[0];
                    fvar[2] = fvar[2] + (Uo[4] - fvar[0]) * (Uo[4] - fvar[0]);
                    if ((zero < model->refMu) && (zero < poly->cf)) {
                        mu = model->refMu * Viscosity(Uo[5] * model->refT);
                        Cross(poly->W[TO], r, V);
                        V[X] = Uo[1] - (poly->V[TO][X] + V[X]);
                        V[Y] = Uo[2] - (poly->V[TO][Y] + V[Y]);
                        V[Z] = Uo[3] - (poly->V[TO][Z] + V[Z]);
                        Vn = Dot(V, N);
                        Fv[X] = mu * (V[X] - Vn * N[X]) / Dist(pG, pO);
                        Fv[Y] = mu * (V[Y] - Vn * N[Y]) / Dist(pG, pO);
                        Fv[Z] = mu * (V[Z] - Vn * N[Z]) / Dist(pG, pO);
                    } else {
                        memset(Fv, 0, DIMS * sizeof(*Fv));
                    }
                    Fs[X] = Fp[X] + Fv[X];
                    Fs[Y] = Fp[Y] + Fv[Y];
                    Fs[Z] = Fp[Z] + Fv[Z];
                    Cross(r, Fs, Tt);
                    /* integration sum */
                    for (int s = 0; s < DIMS; ++s) {
                        poly->Fp[s] = poly->Fp[s] + Fp[s];
                        poly->Fv[s] = poly->Fv[s] + Fv[s];
                        poly->Tt[s] = poly->Tt[s] + Tt[s];
                    }
                }
            }
        }
        /* calibrate the sum of discrete forces into integration */
        if ((0 == lidN) || (0 == gstN)) { /* no surface force exerted */
            continue;
        }
        ds = poly->area / lidN;
        fvar[2] = (fvar[2] - fvar[1] * fvar[1] / gstN) / gstN; /* variance */
        fvar[1] = fvar[1] / gstN + fvar[0]; /* mean */
        if (percent * fvar[1] * fvar[1] > fvar[2]) { /* recover equilibrium state and ignore integration error */
            ds = zero;
        }
        for (int s = 0; s < DIMS; ++s) {
            poly->Fp[s] = -poly->Fp[s] * ds;
            poly->Fv[s] = -poly->Fv[s] * ds;
            poly->Tt[s] = -poly->Tt[s] * ds;
        }
    }
    return;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x2f8, %rsp            # imm = 0x2F8
movq %rsi, 0x70(%rsp)
movq (%rdi), %rax
movq %rax, 0x248(%rsp)
movl 0x90(%rdi), %eax
movl %eax, 0x144(%rsp)
movl 0x98(%rdi), %eax
movl %eax, 0x148(%rsp)
movl 0xa0(%rdi), %eax
movl %eax, 0x14c(%rsp)
movl 0x94(%rdi), %eax
movl %eax, 0x138(%rsp)
movl 0x9c(%rdi), %eax
movl %eax, 0x13c(%rsp)
movl 0xa4(%rdi), %eax
movl %eax, 0x140(%rsp)
movsd 0x3f0(%rdi), %xmm0
movsd %xmm0, 0x240(%rsp)
movsd %xmm0, 0x250(%rsp)
movsd 0x400(%rdi), %xmm0
movsd %xmm0, 0x238(%rsp)
movsd %xmm0, 0x258(%rsp)
movsd 0x410(%rdi), %xmm0
movsd %xmm0, 0x260(%rsp)
movsd 0x58(%rdi), %xmm0
movsd %xmm0, 0x230(%rsp)
movsd 0x60(%rdi), %xmm0
movsd %xmm0, 0x228(%rsp)
movsd 0x68(%rdi), %xmm0
movsd %xmm0, 0x220(%rsp)
movsd 0x70(%rdi), %xmm0
movsd %xmm0, 0x2c0(%rsp)
movsd 0x78(%rdi), %xmm0
movsd %xmm0, 0x2c8(%rsp)
movsd 0x80(%rdi), %xmm0
movsd %xmm0, 0x2d0(%rsp)
movl 0x40(%rdi), %eax
movl %eax, 0x8c(%rsp)
movl %eax, 0x12c(%rsp)
movl 0x44(%rdi), %eax
movl %eax, 0x88(%rsp)
movl %eax, 0x130(%rsp)
movl 0x48(%rdi), %eax
movl %eax, 0x84(%rsp)
movl %eax, 0x134(%rsp)
xorl %eax, %eax
movq %rax, 0xe0(%rsp)
xorpd %xmm0, %xmm0
movapd %xmm0, 0xd0(%rsp)
movq %rax, 0x1a0(%rsp)
movapd %xmm0, 0x190(%rsp)
movq %rax, 0x180(%rsp)
movapd %xmm0, 0x170(%rsp)
movq %rax, 0x2f0(%rsp)
movapd %xmm0, 0x2e0(%rsp)
movq %rax, 0xc0(%rsp)
movapd %xmm0, 0xb0(%rsp)
movapd %xmm0, 0x290(%rsp)
movapd %xmm0, 0x280(%rsp)
movapd %xmm0, 0x270(%rsp)
movq %rax, 0x60(%rsp)
movapd %xmm0, 0x50(%rsp)
movq %rax, 0x160(%rsp)
movapd %xmm0, 0x150(%rsp)
movq %rax, 0x1e0(%rsp)
movapd %xmm0, 0x1d0(%rsp)
movq %rax, 0xa0(%rsp)
movapd %xmm0, 0x90(%rsp)
movq %rax, 0x1c0(%rsp)
movapd %xmm0, 0x1b0(%rsp)
movq %rax, 0x2b0(%rsp)
movapd %xmm0, 0x2a0(%rsp)
cmpl $0x0, 0x8(%rdi)
jle 0x18217
movq %rdi, %r14
movl $0x1d8, %ecx            # imm = 0x1D8
movl $0x188, %edx            # imm = 0x188
movsd 0x260(%rsp), %xmm0
movsd %xmm0, 0x218(%rsp)
xorl %esi, %esi
movl $0x238, %edi            # imm = 0x238
movq %r14, 0x120(%rsp)
movq 0x18(%r14), %rax
imulq $0x238, %rsi, %r9       # imm = 0x238
cmpl $0x0, 0xc(%rax,%r9)
jg 0x18201
movq %r9, %r8
movq %rsi, 0x108(%rsp)
movq %rdx, 0x110(%rsp)
addq %rax, %r8
xorpd %xmm0, %xmm0
movupd %xmm0, 0x188(%r8)
movupd %xmm0, 0x178(%r8)
movupd %xmm0, 0x168(%r8)
movupd %xmm0, 0x158(%r8)
movq %r8, 0x20(%rsp)
movq $0x0, 0x198(%r8)
movq %rcx, 0x1e8(%rsp)
movq %rax, 0x100(%rsp)
leaq (%rax,%rcx), %r12
xorl %r13d, %r13d
movsd -0x8(%r12,%r13,4), %xmm0
movsd 0x250(%rsp,%r13,2), %xmm1
movsd %xmm1, 0x48(%rsp)
movsd 0x2c0(%rsp,%r13,2), %xmm2
movsd %xmm2, 0x40(%rsp)
movl 0x12c(%rsp,%r13), %ebx
movl %ebx, %edi
callq 0x7ed3
movl 0x144(%rsp,%r13), %ebp
movl 0x138(%rsp,%r13), %r15d
movl %eax, %edi
movl %ebp, %esi
movl %r15d, %edx
callq 0x7eea
movl %eax, 0xd0(%rsp,%r13,2)
movsd (%r12,%r13,4), %xmm0
movsd 0x48(%rsp), %xmm1
movsd 0x40(%rsp), %xmm2
movl %ebx, %edi
callq 0x7ed3
movl %eax, %edi
movl %ebp, %esi
movl %r15d, %edx
callq 0x7eea
incl %eax
movl %eax, 0xd4(%rsp,%r13,2)
addq $0x4, %r13
cmpq $0xc, %r13
jne 0x17a2a
movl 0xe0(%rsp), %ebp
movl 0xe4(%rsp), %eax
movl %eax, 0x7c(%rsp)
cmpl %eax, %ebp
jge 0x180d7
movl 0xd8(%rsp), %eax
movl %eax, 0x78(%rsp)
movl 0xdc(%rsp), %eax
movl %eax, 0x34(%rsp)
movl 0xd0(%rsp), %eax
movl %eax, 0x80(%rsp)
movl 0xd4(%rsp), %eax
movl %eax, 0x48(%rsp)
movq 0x108(%rsp), %rax
incq %rax
movq %rax, 0x40(%rsp)
movq 0x20(%rsp), %rax
leaq 0xb0(%rax), %rax
movq %rax, 0x1f0(%rsp)
movq 0x110(%rsp), %rax
movq 0x100(%rsp), %rcx
leaq (%rcx,%rax), %r13
movl $0x0, 0xc(%rsp)
xorpd %xmm0, %xmm0
movapd %xmm0, 0xf0(%rsp)
movsd %xmm0, 0x38(%rsp)
movsd %xmm0, 0x28(%rsp)
movl $0x0, 0x1c(%rsp)
movapd 0x5a9d(%rip), %xmm3     # 0x1d610
movl 0x78(%rsp), %eax
movl %eax, %r15d
cmpl 0x34(%rsp), %eax
jge 0x180c9
movl 0x80(%rsp), %eax
movl %eax, %r12d
cmpl 0x48(%rsp), %eax
jge 0x180bb
movl 0x34(%r14), %r8d
movl 0x38(%r14), %ecx
movl %ebp, %edi
movl %r15d, %esi
movl %r12d, %edx
callq 0x7ea3
cltq
movq %rax, %rcx
shlq $0x7, %rcx
leaq (%rcx,%rax,8), %rax
movq 0x248(%rsp), %rcx
leaq (%rcx,%rax), %rbx
cmpl $0x2, 0x8(%rcx,%rax)
jne 0x17bdd
movl (%rbx), %eax
xorl %ecx, %ecx
cmpq %rax, 0x40(%rsp)
sete %cl
addl %ecx, 0x1c(%rsp)
cmpl $0x2, 0xc(%rbx)
movapd 0x5a27(%rip), %xmm3     # 0x1d610
jne 0x180ad
movl (%rbx), %eax
cmpq %rax, 0x40(%rsp)
jne 0x180ad
movl %r12d, %edi
movsd 0x240(%rsp), %xmm0
movsd 0x230(%rsp), %xmm1
movl 0x8c(%rsp), %esi
callq 0x7f08
movsd %xmm0, 0x190(%rsp)
movl %r15d, %edi
movsd 0x238(%rsp), %xmm0
movsd 0x228(%rsp), %xmm1
movl 0x88(%rsp), %esi
callq 0x7f08
movsd %xmm0, 0x198(%rsp)
movl %ebp, %edi
movsd 0x218(%rsp), %xmm0
movsd 0x220(%rsp), %xmm1
movl 0x84(%rsp), %esi
callq 0x7f08
movsd %xmm0, 0x1a0(%rsp)
movl 0x4(%rbx), %esi
leaq 0x190(%rsp), %rdi
movq 0x20(%rsp), %r14
movq %r14, %rdx
leaq 0x170(%rsp), %rcx
leaq 0x2e0(%rsp), %r8
leaq 0xb0(%rsp), %r9
callq 0xba2d
movsd 0x170(%rsp), %xmm0
subsd 0x20(%r14), %xmm0
movsd 0x178(%rsp), %xmm1
movsd %xmm0, 0x150(%rsp)
subsd 0x28(%r14), %xmm1
movsd %xmm1, 0x158(%rsp)
movsd 0x180(%rsp), %xmm0
subsd 0x30(%r14), %xmm0
movsd %xmm0, 0x160(%rsp)
movq 0x70(%rsp), %rax
movsd 0x40(%rax), %xmm0
movsd 0x48(%rax), %xmm1
addq $0x10, %rbx
movq %rbx, %rdi
leaq 0x270(%rsp), %rsi
callq 0x7d63
movsd 0x290(%rsp), %xmm3
movsd 0xb0(%rsp), %xmm4
mulsd %xmm3, %xmm4
movsd %xmm4, 0x1d0(%rsp)
movsd 0xb8(%rsp), %xmm5
mulsd %xmm3, %xmm5
movsd %xmm5, 0x1d8(%rsp)
movsd 0xc0(%rsp), %xmm6
mulsd %xmm3, %xmm6
movsd %xmm6, 0x1e0(%rsp)
movapd %xmm3, %xmm2
cmpl $0x0, 0xc(%rsp)
je 0x17d70
movsd 0x28(%rsp), %xmm2
movq 0x70(%rsp), %rax
movsd 0x38(%rax), %xmm7
ucomisd 0x228e(%rip), %xmm7     # 0x1a010
movapd 0xf0(%rsp), %xmm1
movsd %xmm2, 0x28(%rsp)
jbe 0x17fb4
movq 0x20(%rsp), %rax
movsd 0x1b8(%rax), %xmm0
ucomisd 0x2264(%rip), %xmm0     # 0x1a010
jbe 0x17fb4
movsd 0x298(%rsp), %xmm0
movq 0x70(%rsp), %rax
mulsd 0x70(%rax), %xmm0
movsd %xmm3, 0x210(%rsp)
movsd %xmm4, 0x208(%rsp)
movsd %xmm5, 0x200(%rsp)
movsd %xmm6, 0x1f8(%rsp)
movsd %xmm7, 0x10(%rsp)
callq 0x7d2c
movsd 0x10(%rsp), %xmm1
mulsd %xmm0, %xmm1
movsd %xmm1, 0x10(%rsp)
movq 0x1f0(%rsp), %rdi
leaq 0x150(%rsp), %rsi
leaq 0x50(%rsp), %rbx
movq %rbx, %rdx
callq 0x8054
movq 0x20(%rsp), %rax
movsd 0x80(%rax), %xmm0
addsd 0x50(%rsp), %xmm0
movsd 0x278(%rsp), %xmm1
subsd %xmm0, %xmm1
movsd 0x280(%rsp), %xmm0
movsd %xmm1, 0x50(%rsp)
movsd 0x88(%rax), %xmm1
addsd 0x58(%rsp), %xmm1
subsd %xmm1, %xmm0
movsd %xmm0, 0x58(%rsp)
movsd 0x288(%rsp), %xmm0
movsd 0x90(%rax), %xmm1
addsd 0x60(%rsp), %xmm1
subsd %xmm1, %xmm0
movsd %xmm0, 0x60(%rsp)
movq %rbx, %rdi
leaq 0xb0(%rsp), %rsi
callq 0x7f86
movsd %xmm0, 0x118(%rsp)
movsd 0x50(%rsp), %xmm2
movsd 0xb0(%rsp), %xmm1
mulsd %xmm0, %xmm1
subsd %xmm1, %xmm2
mulsd 0x10(%rsp), %xmm2
movsd %xmm2, 0x68(%rsp)
leaq 0x190(%rsp), %rbx
movq %rbx, %rdi
leaq 0x170(%rsp), %r14
movq %r14, %rsi
callq 0x8011
movsd 0x68(%rsp), %xmm1
divsd %xmm0, %xmm1
movsd %xmm1, 0x90(%rsp)
movsd 0x58(%rsp), %xmm1
movsd 0xb8(%rsp), %xmm0
mulsd 0x118(%rsp), %xmm0
subsd %xmm0, %xmm1
mulsd 0x10(%rsp), %xmm1
movsd %xmm1, 0x68(%rsp)
movq %rbx, %rdi
movq %r14, %rsi
callq 0x8011
movsd 0x68(%rsp), %xmm1
divsd %xmm0, %xmm1
movsd %xmm1, 0x98(%rsp)
movsd 0x60(%rsp), %xmm1
movsd 0x118(%rsp), %xmm0
mulsd 0xc0(%rsp), %xmm0
subsd %xmm0, %xmm1
mulsd 0x10(%rsp), %xmm1
movsd %xmm1, 0x10(%rsp)
movq %rbx, %rdi
movq %r14, %rsi
callq 0x8011
movsd 0x1f8(%rsp), %xmm6
movsd 0x200(%rsp), %xmm5
movsd 0x208(%rsp), %xmm4
movsd 0x210(%rsp), %xmm3
movsd 0x28(%rsp), %xmm2
movapd 0xf0(%rsp), %xmm1
movsd 0x10(%rsp), %xmm7
divsd %xmm0, %xmm7
movsd %xmm7, 0xa0(%rsp)
jmp 0x17fcd
xorpd %xmm0, %xmm0
movapd %xmm0, 0x90(%rsp)
movq $0x0, 0xa0(%rsp)
movq 0x120(%rsp), %r14
incl 0xc(%rsp)
movsd 0x38(%rsp), %xmm0
addsd %xmm3, %xmm0
subsd %xmm2, %xmm0
movsd %xmm0, 0x38(%rsp)
subsd %xmm2, %xmm3
mulsd %xmm3, %xmm3
addsd 0x90(%rsp), %xmm4
addsd %xmm3, %xmm1
movapd %xmm1, 0xf0(%rsp)
movsd %xmm4, 0x1b0(%rsp)
addsd 0x98(%rsp), %xmm5
movsd %xmm5, 0x1b8(%rsp)
addsd 0xa0(%rsp), %xmm6
movsd %xmm6, 0x1c0(%rsp)
leaq 0x150(%rsp), %rdi
leaq 0x1b0(%rsp), %rsi
leaq 0x2a0(%rsp), %rdx
callq 0x8054
xorl %eax, %eax
movsd -0x30(%r13,%rax,8), %xmm0
addsd 0x1d0(%rsp,%rax,8), %xmm0
movsd -0x18(%r13,%rax,8), %xmm1
movsd %xmm0, -0x30(%r13,%rax,8)
addsd 0x90(%rsp,%rax,8), %xmm1
movsd %xmm1, -0x18(%r13,%rax,8)
movsd (%r13,%rax,8), %xmm0
addsd 0x2a0(%rsp,%rax,8), %xmm0
movsd %xmm0, (%r13,%rax,8)
incq %rax
cmpq $0x3, %rax
jne 0x18057
movapd 0x5563(%rip), %xmm3     # 0x1d610
incl %r12d
cmpl 0x48(%rsp), %r12d
jne 0x17b98
incl %r15d
cmpl 0x34(%rsp), %r15d
jne 0x17b84
incl %ebp
cmpl 0x7c(%rsp), %ebp
jne 0x17b73
jmp 0x18108
xorpd %xmm0, %xmm0
movsd %xmm0, 0x28(%rsp)
movl $0x0, 0x1c(%rsp)
movl $0x0, 0xc(%rsp)
movsd %xmm0, 0x38(%rsp)
movapd %xmm0, 0xf0(%rsp)
movapd 0x5508(%rip), %xmm3     # 0x1d610
movl 0x1c(%rsp), %r9d
testl %r9d, %r9d
movq 0x1e8(%rsp), %rcx
movq 0x110(%rsp), %rdx
movq 0x108(%rsp), %rsi
movl $0x238, %edi            # imm = 0x238
movq 0x100(%rsp), %r8
movapd 0xf0(%rsp), %xmm4
je 0x18201
cmpl $0x0, 0xc(%rsp)
je 0x18201
movq 0x20(%rsp), %rax
movsd 0x1c0(%rax), %xmm0
xorps %xmm1, %xmm1
cvtsi2sd %r9d, %xmm1
divsd %xmm1, %xmm0
movsd 0x38(%rsp), %xmm5
movapd %xmm5, %xmm1
mulsd %xmm5, %xmm1
xorps %xmm2, %xmm2
cvtsi2sdl 0xc(%rsp), %xmm2
divsd %xmm2, %xmm1
subsd %xmm1, %xmm4
divsd %xmm2, %xmm4
divsd %xmm2, %xmm5
movsd 0x28(%rsp), %xmm2
addsd %xmm5, %xmm2
movapd %xmm2, %xmm1
mulsd 0x8d63(%rip), %xmm1     # 0x20f08
mulsd %xmm2, %xmm1
cmpltsd %xmm1, %xmm4
andnpd %xmm0, %xmm4
addq %rdx, %r8
movq $-0x3, %rax
movsd -0x18(%r8,%rax,8), %xmm0
movsd (%r8,%rax,8), %xmm1
movsd 0x18(%r8,%rax,8), %xmm2
xorpd %xmm3, %xmm0
mulsd %xmm4, %xmm0
movsd %xmm0, -0x18(%r8,%rax,8)
xorpd %xmm3, %xmm1
mulsd %xmm4, %xmm1
movsd %xmm1, (%r8,%rax,8)
xorpd %xmm3, %xmm2
mulsd %xmm4, %xmm2
movsd %xmm2, 0x18(%r8,%rax,8)
incq %rax
jne 0x181bc
incq %rsi
movslq 0x8(%r14), %rax
addq %rdi, %rcx
addq %rdi, %rdx
cmpq %rax, %rsi
jl 0x179ae
addq $0x2f8, %rsp            # imm = 0x2F8
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
nopl (%rax)