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

```asm
<__c99_sd_t_d1_1>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbx
  sub    $0x1b0,%rsp
  mov    %edi,-0xb4(%rbp)
  mov    %esi,-0xb8(%rbp)
  mov    %edx,-0xbc(%rbp)
  mov    %ecx,-0xc0(%rbp)
  mov    %r8d,-0xc4(%rbp)
  mov    %r9d,-0xc8(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x88(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  mov    %rax,-0xe0(%rbp)
  movq   $0x0,-0xd8(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  mov    %rax,-0xe0(%rbp)
  mov    -0xb8(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x80(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  mov    %rax,%r12
  mov    $0x0,%r13d
  mov    -0xb8(%rbp),%eax
  cltq
  mov    %rax,%r10
  mov    $0x0,%r11d
  mov    %r13,%rdx
  imul   %r10,%rdx
  mov    %r11,%rax
  imul   %r12,%rax
  lea    (%rdx,%rax,1),%rcx
  mov    %r12,%rax
  mul    %r10
  add    %rdx,%rcx
  mov    %rcx,%rdx
  mov    -0xb4(%rbp),%eax
  movslq %eax,%rdx
  mov    -0xb8(%rbp),%eax
  cltq
  imul   %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,-0xd0(%rbp)
  mov    -0xbc(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x78(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  mov    %rax,-0xf0(%rbp)
  movq   $0x0,-0xe8(%rbp)
  mov    -0xb8(%rbp),%eax
  cltq
  mov    %rax,%r14
  mov    $0x0,%r15d
  mov    -0xf0(%rbp),%rcx
  mov    -0xe8(%rbp),%rbx
  mov    %rbx,%rdx
  imul   %r14,%rdx
  mov    %rcx,%rax
  imul   %r15,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %rcx,%rax
  mul    %r14
  mov    %rax,%rcx
  mov    %rdx,%rbx
  lea    (%rsi,%rbx,1),%rax
  mov    %rax,%rbx
  mov    -0xbc(%rbp),%eax
  cltq
  mov    %rax,-0x100(%rbp)
  movq   $0x0,-0xf8(%rbp)
  mov    -0x100(%rbp),%r14
  mov    -0xf8(%rbp),%r15
  mov    %r14,%rdx
  imul   %rbx,%rdx
  mov    %r15,%rax
  imul   %rcx,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %r14,%rax
  mul    %rcx
  lea    (%rsi,%rdx,1),%rcx
  mov    %rcx,%rdx
  mov    -0xb4(%rbp),%eax
  movslq %eax,%rdx
  mov    -0xb8(%rbp),%eax
  cltq
  imul   %rax,%rdx
  mov    -0xbc(%rbp),%eax
  cltq
  imul   %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,-0xf0(%rbp)
  mov    -0xc0(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x70(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  mov    %rax,-0x110(%rbp)
  movq   $0x0,-0x108(%rbp)
  mov    -0xb8(%rbp),%eax
  cltq
  mov    %rax,-0x120(%rbp)
  movq   $0x0,-0x118(%rbp)
  mov    -0x110(%rbp),%rcx
  mov    -0x108(%rbp),%rbx
  mov    %rbx,%rdx
  mov    -0x120(%rbp),%r14
  mov    -0x118(%rbp),%r15
  imul   %r14,%rdx
  mov    %r15,%rax
  imul   %rcx,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %rcx,%rax
  mul    %r14
  mov    %rax,%rcx
  mov    %rdx,%rbx
  lea    (%rsi,%rbx,1),%rax
  mov    %rax,%rbx
  mov    -0xbc(%rbp),%eax
  cltq
  mov    %rax,-0x130(%rbp)
  movq   $0x0,-0x128(%rbp)
  mov    -0x130(%rbp),%r14
  mov    -0x128(%rbp),%r15
  mov    %r14,%rdx
  imul   %rbx,%rdx
  mov    %r15,%rax
  imul   %rcx,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %r14,%rax
  mul    %rcx
  mov    %rax,%rcx
  mov    %rdx,%rbx
  lea    (%rsi,%rbx,1),%rax
  mov    %rax,%rbx
  mov    -0xc0(%rbp),%eax
  cltq
  mov    %rax,-0x140(%rbp)
  movq   $0x0,-0x138(%rbp)
  mov    -0x140(%rbp),%r14
  mov    -0x138(%rbp),%r15
  mov    %r14,%rdx
  imul   %rbx,%rdx
  mov    %r15,%rax
  imul   %rcx,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %r14,%rax
  mul    %rcx
  lea    (%rsi,%rdx,1),%rcx
  mov    %rcx,%rdx
  mov    -0xb4(%rbp),%eax
  movslq %eax,%rdx
  mov    -0xb8(%rbp),%eax
  cltq
  imul   %rax,%rdx
  mov    -0xbc(%rbp),%eax
  cltq
  imul   %rax,%rdx
  mov    -0xc0(%rbp),%eax
  cltq
  imul   %rdx,%rax
  lea    0x0(,%rax,8),%r14
  mov    -0xc4(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x68(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  mov    %rax,-0x150(%rbp)
  movq   $0x0,-0x148(%rbp)
  mov    -0xb8(%rbp),%eax
  cltq
  mov    %rax,-0x160(%rbp)
  movq   $0x0,-0x158(%rbp)
  mov    -0x150(%rbp),%rcx
  mov    -0x148(%rbp),%rbx
  mov    %rbx,%rdx
  mov    -0x160(%rbp),%r10
  mov    -0x158(%rbp),%r11
  imul   %r10,%rdx
  mov    %r11,%rax
  imul   %rcx,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %rcx,%rax
  mul    %r10
  mov    %rax,%rcx
  mov    %rdx,%rbx
  lea    (%rsi,%rbx,1),%rax
  mov    %rax,%rbx
  mov    -0xbc(%rbp),%eax
  cltq
  mov    %rax,-0x170(%rbp)
  movq   $0x0,-0x168(%rbp)
  mov    -0x170(%rbp),%r8
  mov    -0x168(%rbp),%r9
  mov    %r8,%rdx
  imul   %rbx,%rdx
  mov    %r9,%rax
  imul   %rcx,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %r8,%rax
  mul    %rcx
  mov    %rax,%rcx
  mov    %rdx,%rbx
  lea    (%rsi,%rbx,1),%rax
  mov    %rax,%rbx
  mov    -0xc0(%rbp),%eax
  cltq
  mov    %rax,-0x180(%rbp)
  movq   $0x0,-0x178(%rbp)
  mov    -0x180(%rbp),%r10
  mov    -0x178(%rbp),%r11
  mov    %r10,%rdx
  imul   %rbx,%rdx
  mov    %r11,%rax
  imul   %rcx,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %r10,%rax
  mul    %rcx
  mov    %rax,%rcx
  mov    %rdx,%rbx
  lea    (%rsi,%rbx,1),%rax
  mov    %rax,%rbx
  mov    -0xc4(%rbp),%eax
  cltq
  mov    %rax,-0x190(%rbp)
  movq   $0x0,-0x188(%rbp)
  mov    -0x190(%rbp),%r8
  mov    -0x188(%rbp),%r9
  mov    %r8,%rdx
  imul   %rbx,%rdx
  mov    %r9,%rax
  imul   %rcx,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %r8,%rax
  mul    %rcx
  lea    (%rsi,%rdx,1),%rcx
  mov    %rcx,%rdx
  mov    0x10(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x60(%rbp)
  mov    0x10(%rbp),%eax
  cltq
  mov    %rax,-0x240(%rbp)
  movq   $0x0,-0x238(%rbp)
  mov    0x10(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%r15
  mov    -0xc8(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x58(%rbp)
  mov    0x10(%rbp),%eax
  cltq
  mov    %rax,-0x1a0(%rbp)
  movq   $0x0,-0x198(%rbp)
  mov    -0xc8(%rbp),%eax
  cltq
  mov    %rax,-0x1b0(%rbp)
  movq   $0x0,-0x1a8(%rbp)
  mov    -0x1a0(%rbp),%rbx
  mov    -0x198(%rbp),%rsi
  mov    %rsi,%rdx
  mov    -0x1b0(%rbp),%r10
  mov    -0x1a8(%rbp),%r11
  imul   %r10,%rdx
  mov    %r11,%rax
  imul   %rbx,%rax
  lea    (%rdx,%rax,1),%rcx
  mov    %rbx,%rax
  mul    %r10
  add    %rdx,%rcx
  mov    %rcx,%rdx
  mov    0x10(%rbp),%eax
  movslq %eax,%rdx
  mov    -0xc8(%rbp),%eax
  cltq
  imul   %rdx,%rax
  lea    0x0(,%rax,8),%r13
  mov    -0xc4(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x50(%rbp)
  mov    0x10(%rbp),%eax
  cltq
  mov    %rax,-0x1c0(%rbp)
  movq   $0x0,-0x1b8(%rbp)
  mov    -0xc8(%rbp),%eax
  cltq
  mov    %rax,-0x1d0(%rbp)
  movq   $0x0,-0x1c8(%rbp)
  mov    -0x1c0(%rbp),%rcx
  mov    -0x1b8(%rbp),%rbx
  mov    %rbx,%rdx
  mov    -0x1d0(%rbp),%r11
  mov    -0x1c8(%rbp),%r12
  imul   %r11,%rdx
  mov    %r12,%rax
  imul   %rcx,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %rcx,%rax
  mul    %r11
  mov    %rax,%rcx
  mov    %rdx,%rbx
  lea    (%rsi,%rbx,1),%rax
  mov    %rax,%rbx
  mov    -0xc4(%rbp),%eax
  cltq
  mov    %rax,-0x1e0(%rbp)
  movq   $0x0,-0x1d8(%rbp)
  mov    -0x1e0(%rbp),%r11
  mov    -0x1d8(%rbp),%r12
  mov    %r11,%rdx
  imul   %rbx,%rdx
  mov    %r12,%rax
  imul   %rcx,%rax
  lea    (%rdx,%rax,1),%rsi
  mov    %r11,%rax
  mul    %rcx
  lea    (%rsi,%rdx,1),%rcx
  mov    %rcx,%rdx
  mov    -0xb4(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x48(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  mov    %rax,-0x250(%rbp)
  movq   $0x0,-0x248(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%r12
  mov    -0xb8(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x40(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  mov    %rax,-0x1f0(%rbp)
  movq   $0x0,-0x1e8(%rbp)
  mov    -0xb8(%rbp),%eax
  cltq
  mov    %rax,-0x200(%rbp)
  movq   $0x0,-0x1f8(%rbp)
  mov    -0x1f0(%rbp),%rbx
  mov    -0x1e8(%rbp),%rsi
  mov    %rsi,%rdx
  mov    -0x200(%rbp),%r8
  mov    -0x1f8(%rbp),%r9
  imul   %r8,%rdx
  mov    %r9,%rax
  imul   %rbx,%rax
  lea    (%rdx,%rax,1),%rcx
  mov    %rbx,%rax
  mul    %r8
  add    %rdx,%rcx
  mov    %rcx,%rdx
  mov    -0xb4(%rbp),%eax
  movslq %eax,%rdx
  mov    -0xb8(%rbp),%eax
  cltq
  imul   %rdx,%rax
  lea    0x0(,%rax,8),%rbx
  mov    -0xc0(%rbp),%eax
  cltq
  sub    $0x1,%rax
  mov    %rax,-0x38(%rbp)
  mov    -0xb4(%rbp),%eax
  cltq
  mov    %rax,-0x210(%rbp)
  movq   $0x0,-0x208(%rbp)
  mov    -0xb8(%rbp),%eax
  cltq
  mov    %rax,-0x220(%rbp)
  movq   $0x0,-0x218(%rbp)
  mov    -0x210(%rbp),%rsi
  mov    -0x208(%rbp),%rdi
  mov    %rdi,%rdx
  mov    -0x220(%rbp),%r8
  mov    -0x218(%rbp),%r9
  imul   %r8,%rdx
  mov    %r9,%rax
  imul   %rsi,%rax
  lea    (%rdx,%rax,1),%rcx
  mov    %rsi,%rax
  mul    %r8
  add    %rdx,%rcx
  mov    %rcx,%rdx
  mov    -0xc0(%rbp),%ecx
  movslq %ecx,%rcx
  mov    %rcx,-0x230(%rbp)
  movq   $0x0,-0x228(%rbp)
  mov    -0x230(%rbp),%r9
  mov    -0x228(%rbp),%r10
  mov    %r9,%rsi
  imul   %rdx,%rsi
  mov    %r10,%rcx
  imul   %rax,%rcx
  add    %rsi,%rcx
  mul    %r9
  add    %rdx,%rcx
  mov    %rcx,%rdx
  movl   $0x0,-0xa4(%rbp)
  jmp    L44
L104:
  movl   $0x0,-0xa0(%rbp)
  jmp    L28
L23:
  movl   $0x0,-0x9c(%rbp)
  jmp    L92
L31:
  movl   $0x0,-0x98(%rbp)
  jmp    L93
L99:
  movl   $0x0,-0x94(%rbp)
  jmp    L8
L11:
  movl   $0x0,-0x90(%rbp)
  jmp    L85
L59:
  movl   $0x0,-0x8c(%rbp)
  jmp    L51
L115:
  mov    %r14,%r10
  shr    $0x3,%r10
  mov    -0xf0(%rbp),%r11
  shr    $0x3,%r11
  mov    -0xd0(%rbp),%rsi
  shr    $0x3,%rsi
  mov    -0xe0(%rbp),%r9
  shr    $0x3,%r9
  mov    -0xa4(%rbp),%eax
  movslq %eax,%rcx
  mov    -0xb4(%rbp),%eax
  movslq %eax,%rdx
  mov    -0xb8(%rbp),%eax
  cltq
  imul   %rax,%rdx
  mov    -0xbc(%rbp),%eax
  cltq
  imul   %rax,%rdx
  mov    -0xc0(%rbp),%eax
  cltq
  imul   %rax,%rdx
  mov    -0xc4(%rbp),%eax
  cltq
  imul   %rdx,%rax
  imul   %rcx,%rax
  lea    0x0(,%rax,8),%rdx
  mov    0x18(%rbp),%rax
  lea    (%rdx,%rax,1),%rdi
  mov    -0x90(%rbp),%eax
  movslq %eax,%r8
  mov    -0x98(%rbp),%eax
  cltq
  imul   %rsi,%rax
  mov    %rax,%rdx
  mov    -0x94(%rbp),%eax
  cltq
  imul   %r9,%rax
  mov    %rax,%rsi
  mov    -0xa0(%rbp),%eax
  cltq
  imul   %r10,%rax
  mov    %rax,%rcx
  mov    -0x9c(%rbp),%eax
  cltq
  imul   %r11,%rax
  add    %r8,%rdx
  add    %rsi,%rdx
  add    %rcx,%rdx
  add    %rdx,%rax
  movsd  (%rdi,%rax,8),%xmm1
  mov    %r13,%rdi
  shr    $0x3,%rdi
  mov    %r15,%rax
  shr    $0x3,%rax
  mov    %rax,%rsi
  mov    -0x98(%rbp),%eax
  movslq %eax,%rdx
  mov    0x10(%rbp),%eax
  movslq %eax,%rcx
  mov    -0xc8(%rbp),%eax
  cltq
  imul   %rax,%rcx
  mov    -0xc4(%rbp),%eax
  cltq
  imul   %rcx,%rax
  imul   %rdx,%rax
  lea    0x0(,%rax,8),%rdx
  mov    0x20(%rbp),%rax
  add    %rdx,%rax
  mov    -0x8c(%rbp),%edx
  movslq %edx,%r8
  mov    -0xa0(%rbp),%edx
  movslq %edx,%rdx
  mov    %rdx,%rcx
  imul   %rdi,%rcx
  mov    -0xa4(%rbp),%edx
  movslq %edx,%rdx
  imul   %rsi,%rdx
  add    %r8,%rcx
  add    %rcx,%rdx
  movsd  (%rax,%rdx,8),%xmm2
  mov    %rbx,%rdi
  shr    $0x3,%rdi
  mov    %r12,%rax
  shr    $0x3,%rax
  mov    %rax,%rsi
  mov    -0x8c(%rbp),%eax
  movslq %eax,%rdx
  mov    -0xb4(%rbp),%eax
  movslq %eax,%rcx
  mov    -0xb8(%rbp),%eax
  cltq
  imul   %rax,%rcx
  mov    -0xc0(%rbp),%eax
  cltq
  imul   %rcx,%rax
  imul   %rdx,%rax
  lea    0x0(,%rax,8),%rdx
  mov    0x28(%rbp),%rax
  add    %rdx,%rax
  mov    -0x90(%rbp),%edx
  movslq %edx,%r8
  mov    -0x9c(%rbp),%edx
  movslq %edx,%rdx
  mov    %rdx,%rcx
  imul   %rdi,%rcx
  mov    -0x94(%rbp),%edx
  movslq %edx,%rdx
  imul   %rsi,%rdx
  add    %r8,%rcx
  add    %rcx,%rdx
  movsd  (%rax,%rdx,8),%xmm0
  mulsd  %xmm2,%xmm0
  mov    %r14,%r10
  shr    $0x3,%r10
  mov    -0xf0(%rbp),%r11
  shr    $0x3,%r11
  mov    -0xd0(%rbp),%rsi
  shr    $0x3,%rsi
  mov    -0xe0(%rbp),%r9
  shr    $0x3,%r9
  mov    -0xa4(%rbp),%eax
  movslq %eax,%rcx
  mov    -0xb4(%rbp),%eax
  movslq %eax,%rdx
  mov    -0xb8(%rbp),%eax
  cltq
  imul   %rax,%rdx
  mov    -0xbc(%rbp),%eax
  cltq
  imul   %rax,%rdx
  mov    -0xc0(%rbp),%eax
  cltq
  imul   %rax,%rdx
  mov    -0xc4(%rbp),%eax
  cltq
  imul   %rdx,%rax
  imul   %rcx,%rax
  lea    0x0(,%rax,8),%rdx
  mov    0x18(%rbp),%rax
  lea    (%rdx,%rax,1),%rdi
  addsd  %xmm1,%xmm0
  mov    -0x90(%rbp),%eax
  movslq %eax,%r8
  mov    -0x98(%rbp),%eax
  cltq
  imul   %rsi,%rax
  mov    %rax,%rdx
  mov    -0x94(%rbp),%eax
  cltq
  imul   %r9,%rax
  mov    %rax,%rsi
  mov    -0xa0(%rbp),%eax
  cltq
  imul   %r10,%rax
  mov    %rax,%rcx
  mov    -0x9c(%rbp),%eax
  cltq
  imul   %r11,%rax
  add    %r8,%rdx
  add    %rsi,%rdx
  add    %rcx,%rdx
  add    %rdx,%rax
  movsd  %xmm0,(%rdi,%rax,8)
  addl   $0x1,-0x8c(%rbp)
L51:
  mov    -0x8c(%rbp),%eax
  cmp    0x10(%rbp),%eax
  setl   %al
  test   %al,%al
  jne    L115
  addl   $0x1,-0x90(%rbp)
L85:
  mov    -0x90(%rbp),%eax
  cmp    -0xb4(%rbp),%eax
  jl     L59
  addl   $0x1,-0x94(%rbp)
L8:
  mov    -0x94(%rbp),%eax
  cmp    -0xb8(%rbp),%eax
  jl     L11
  addl   $0x1,-0x98(%rbp)
L93:
  mov    -0x98(%rbp),%eax
  cmp    -0xbc(%rbp),%eax
  jl     L99
  addl   $0x1,-0x9c(%rbp)
L92:
  mov    -0x9c(%rbp),%eax
  cmp    -0xc0(%rbp),%eax
  jl     L31
  addl   $0x1,-0xa0(%rbp)
L28:
  mov    -0xa0(%rbp),%eax
  cmp    -0xc4(%rbp),%eax
  jl     L23
  addl   $0x1,-0xa4(%rbp)
L44:
  mov    -0xa4(%rbp),%eax
  cmp    -0xc8(%rbp),%eax
  jl     L104
  nop
  add    $0x1b0,%rsp
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
```

assistant: ```c
void __c99_sd_t_d1_1(const int h3u, const int h2u, const int h1u, const int p6u, const int p5u, const int p4u, const int h7u, double t3[p4u][p5u][p6u][h1u][h2u][h3u], const double t2[h1u][p5u][p4u][h7u], const double v2[h7u][p6u][h2u][h3u]) {

  for (int p4 = 0; p4 < p4u; p4++)
    for (int p5 = 0; p5 < p5u; p5++)
      for (int p6 = 0; p6 < p6u; p6++)
        for (int h1 = 0; h1 < h1u; h1++)
          for (int h2 = 0; h2 < h2u; h2++)
            for (int h3 = 0; h3 < h3u; h3++)

#pragma GCC ivdep

              for (int h7 = 0; h7 < h7u; h7++)
                t3[p4][p5][p6][h1][h2][h3] += t2[h1][p5][p4][h7] * v2[h7][p6][h2][h3];
  return;
}
```