user: Translate the below assembly code into C programming language:

```asm
<Jac2D>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0xc8,%rsp
  mov    %rsi,0x30(%rsp)
  cvttsd2si (%rdx),%esi
  mov    %rdi,0x58(%rsp)
  mov    %fs:0x28,%rax
  mov    %rax,0xb8(%rsp)
  xor    %eax,%eax
  cvttsd2si 0x8(%rdx),%eax
  lea    0x1(%rsi),%r13d
  mov    %eax,0x2c(%rsp)
  add    $0x1,%eax
  imul   %r13d,%eax
  test   %esi,%esi
  jle    L52
  movq   $0x0,0x48(%rsp)
  movslq %r13d,%rdx
  cltq
  lea    0x8(,%rdx,8),%r14
  mov    %rdx,0x38(%rsp)
  movslq %esi,%rdx
  shl    $0x3,%rax
  mov    %rdx,0x50(%rsp)
  lea    -0x10(%r14),%rdx
  mov    %r14,%r13
  mov    %rdx,0x40(%rsp)
  nopl   (%rax)
L27:
  mov    0x2c(%rsp),%edx
  test   %edx,%edx
  jle    L35
  mov    0x58(%rsp),%rdx
  mov    0x48(%rsp),%r10
  lea    0x70(%rsp),%r12
  xor    %r9d,%r9d
  lea    0x60(%rsp),%r14
  mov    %r9d,%ecx
  lea    0x90(%rsp),%rbp
  lea    (%rdx,%r10,8),%r11
  mov    %r12,%rdx
  mov    %r10,%r8
  mov    %r14,%r12
  lea    0x80(%rsp),%rbx
  lea    0xa0(%rsp),%r15
  mov    %r11,%r9
  mov    %rdx,%r14
  nopl   0x0(%rax)
L40:
  mov    0x30(%rsp),%rdx
  xor    %esi,%esi
  lea    (%rdx,%r8,8),%rdi
L44:
  movsd  (%rdi),%xmm0
  movsd  0x8(%rdi),%xmm3
  movsd  -0x8(%rdi,%r13,1),%xmm2
  movsd  (%rdi,%r13,1),%xmm1
  add    %rax,%rdi
  movsd  %xmm0,(%r12,%rsi,1)
  addsd  %xmm3,%xmm0
  movsd  %xmm3,(%r14,%rsi,1)
  movsd  %xmm1,0x0(%rbp,%rsi,1)
  addsd  %xmm2,%xmm0
  movsd  %xmm2,(%rbx,%rsi,1)
  addsd  %xmm1,%xmm0
  mulsd  D5(%rip),%xmm0
  movsd  %xmm0,(%r15,%rsi,1)
  add    $0x8,%rsi
  cmp    $0x10,%rsi
  jne    L44
  mov    %r15,%rdx
  mov    %r14,%rsi
  mov    %r12,%rdi
  mov    %ecx,0x28(%rsp)
  mov    %r8,0x20(%rsp)
  mov    %r9,0x18(%rsp)
  mov    %rax,0x10(%rsp)
  call   <volTriangle2D@plt>
  mov    %r15,%rdx
  mov    %rbp,%rsi
  mov    %r14,%rdi
  movsd  %xmm0,0x8(%rsp)
  call   <volTriangle2D@plt>
  mov    %r15,%rdx
  mov    %rbx,%rsi
  mov    %rbp,%rdi
  movsd  0x8(%rsp),%xmm4
  addsd  %xmm0,%xmm4
  movsd  %xmm4,0x8(%rsp)
  call   <volTriangle2D@plt>
  mov    %r15,%rdx
  mov    %r12,%rsi
  mov    %rbx,%rdi
  addsd  0x8(%rsp),%xmm0
  movsd  %xmm0,0x8(%rsp)
  call   <volTriangle2D@plt>
  addsd  0x8(%rsp),%xmm0
  mov    0x18(%rsp),%r9
  mov    0x28(%rsp),%ecx
  mov    0x20(%rsp),%r8
  add    0x38(%rsp),%r8
  mov    0x10(%rsp),%rax
  movsd  %xmm0,(%r9)
  add    $0x1,%ecx
  add    0x40(%rsp),%r9
  cmp    %ecx,0x2c(%rsp)
  jne    L40
L35:
  addq   $0x1,0x48(%rsp)
  mov    0x48(%rsp),%rdx
  cmp    %rdx,0x50(%rsp)
  jne    L27
L52:
  mov    0xb8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L22
  add    $0xc8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L22:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: disassemble_data
arguments: data_label: D5
type: f64

tool: D5: 0.25

assistant: ```c
void Jac2D(double *volu, const double *yc, const double *m, const int n) {
  double yA[2], yB[2], yC[2], yD[2], yM[2], vol;
  int i1, i2, r, id, idn, comp;
  const int m1 = m[0], m2 = m[1];
  const int nn = (m1 + 1) * (m2 + 1);
  const int inc_x = 1;
  const int inc_y = m1 + 1;
  const double *ptr;
#pragma omp parallel for default(shared) private(ptr, i1, i2, r, id, idn, comp, vol, yA, yB, yC, yD, yM)
  for (i1 = 0; i1 < m1; i1++) {
    for (i2 = 0; i2 < m2; i2++) {
      comp = 0;
      idn = i1 + i2 * inc_y;
      for (r = 0; r < 2; r++) {
        ptr = yc + idn + comp;
        yA[r] = *ptr;
        ptr = ptr + inc_x;
        yB[r] = *ptr;
        ptr = ptr + inc_y;
        yD[r] = *ptr;
        ptr = ptr - inc_x;
        yC[r] = *ptr;
        yM[r] = 0.25 * (yA[r] + yB[r] + yC[r] + yD[r]);
        comp += nn;
      }
      vol = volTriangle2D(yA, yB, yM);
      vol += volTriangle2D(yB, yD, yM);
      vol += volTriangle2D(yD, yC, yM);
      vol += volTriangle2D(yC, yA, yM);
      id = i1 + i2 * m1;
      volu[id] = vol;
    }
  }
  return;
}
```