// File: /workspace/github_c_makefile_star2_O3/markpeerdeman[P]mbemm/src/emath/linearc.c
// Function: norm_int
void norm_int(element te, hypermatrix c, hypermatrix e)
{ int i;

  fillhypermatrix(c,ZEROFILL);
  fillhypermatrix(e,ZEROFILL);

  for (i=1; i<=7; i++) 
  { /* node 1: */
    matcopy3x3(tf[i],temp);
    scalemat3x3(temp,xi1[i]*w[i]);
    matsum3x3(e->data[1],temp); 
    matcopy3x3(uf[i],temp);
    scalemat3x3(temp,xi1[i]*w[i]);
    matsum3x3(c->data[1],temp); 

    /* node 2: */
    matcopy3x3(tf[i],temp);
    scalemat3x3(temp,xi2[i]*w[i]);
    matsum3x3(e->data[2],temp); 
    matcopy3x3(uf[i],temp);
    scalemat3x3(temp,xi2[i]*w[i]); 
    matsum3x3(c->data[2],temp); 

    /* node 3: */
    matcopy3x3(tf[i],temp);
    scalemat3x3(temp,xi3[i]*w[i]);
    matsum3x3(e->data[3],temp); 
    matcopy3x3(uf[i],temp);
    scalemat3x3(temp,xi3[i]*w[i]);
    matsum3x3(c->data[3],temp); 

  } 
  /* scale the results with the jacobian: */
  for (i=1; i<=3; i++)
  { scalemat3x3(e->data[i],te->area);
    scalemat3x3(c->data[i],te->area);
  }

}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movq %rdx, %rbx
movq %rsi, %r14
movq %rdi, %r15
xorl %r12d, %r12d
movq %rsi, %rdi
xorl %esi, %esi
callq 0xbe66
movq %rbx, %rdi
xorl %esi, %esi
callq 0xbe66
leaq 0xb1c7(%rip), %rbp      # 0x153c0
movq 0xb6b8(%rip), %rax      # 0x158b8
movq 0x8(%rax,%r12), %rdi
movq 0xb6a4(%rip), %rsi      # 0x158b0
callq 0xc65a
movq 0xb698(%rip), %rdi      # 0x158b0
leaq 0xb0e1(%rip), %r13      # 0x15300
movsd 0x8(%r12,%r13), %xmm0
mulsd 0x8(%r12,%rbp), %xmm0
callq 0xc288
movq 0x8(%rbx), %rax
movq 0x8(%rax), %rdi
movq 0xb66f(%rip), %rsi      # 0x158b0
callq 0xc355
movq 0xb673(%rip), %rax      # 0x158c0
movq 0x8(%rax,%r12), %rdi
movq 0xb657(%rip), %rsi      # 0x158b0
callq 0xc65a
movq 0xb64b(%rip), %rdi      # 0x158b0
movsd 0x8(%r12,%r13), %xmm0
mulsd 0x8(%r12,%rbp), %xmm0
callq 0xc288
movq 0x8(%r14), %rax
movq 0x8(%rax), %rdi
movq 0xb629(%rip), %rsi      # 0x158b0
callq 0xc355
movq 0xb625(%rip), %rax      # 0x158b8
movq 0x8(%rax,%r12), %rdi
movq 0xb611(%rip), %rsi      # 0x158b0
callq 0xc65a
movq 0xb605(%rip), %rdi      # 0x158b0
leaq 0xb08e(%rip), %r13      # 0x15340
movsd 0x8(%r12,%r13), %xmm0
mulsd 0x8(%r12,%rbp), %xmm0
callq 0xc288
movq 0x8(%rbx), %rax
movq 0x10(%rax), %rdi
movq 0xb5dc(%rip), %rsi      # 0x158b0
callq 0xc355
movq 0xb5e0(%rip), %rax      # 0x158c0
movq 0x8(%rax,%r12), %rdi
movq 0xb5c4(%rip), %rsi      # 0x158b0
callq 0xc65a
movq 0xb5b8(%rip), %rdi      # 0x158b0
movsd 0x8(%r12,%r13), %xmm0
mulsd 0x8(%r12,%rbp), %xmm0
callq 0xc288
movq 0x8(%r14), %rax
movq 0x10(%rax), %rdi
movq 0xb596(%rip), %rsi      # 0x158b0
callq 0xc355
movq 0xb592(%rip), %rax      # 0x158b8
movq 0x8(%rax,%r12), %rdi
movq 0xb57e(%rip), %rsi      # 0x158b0
callq 0xc65a
movq 0xb572(%rip), %rdi      # 0x158b0
leaq 0xb03b(%rip), %r13      # 0x15380
movsd 0x8(%r12,%r13), %xmm0
mulsd 0x8(%r12,%rbp), %xmm0
callq 0xc288
movq 0x8(%rbx), %rax
movq 0x18(%rax), %rdi
movq 0xb549(%rip), %rsi      # 0x158b0
callq 0xc355
movq 0xb54d(%rip), %rax      # 0x158c0
movq 0x8(%rax,%r12), %rdi
movq 0xb531(%rip), %rsi      # 0x158b0
callq 0xc65a
movq 0xb525(%rip), %rdi      # 0x158b0
movsd 0x8(%r12,%r13), %xmm0
mulsd 0x8(%r12,%rbp), %xmm0
callq 0xc288
movq 0x8(%r14), %rax
movq 0x18(%rax), %rdi
movq 0xb503(%rip), %rsi      # 0x158b0
callq 0xc355
addq $0x8, %r12
cmpq $0x38, %r12
jne 0xa1f9
movl $0x1, %r12d
movq 0x8(%rbx), %rax
movq (%rax,%r12,8), %rdi
movsd 0xb8(%r15), %xmm0
callq 0xc288
movq 0x8(%r14), %rax
movq (%rax,%r12,8), %rdi
movsd 0xb8(%r15), %xmm0
callq 0xc288
incq %r12
cmpq $0x4, %r12
jne 0xa3c6
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq