user: 请从给定的汇编指令推导出C源代码:

```asm
<fwd>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x30,%rsp
  mov    %rdi,-0x10(%rsp)
  mov    %rsi,-0x8(%rsp)
  mov    %rdx,(%rsp)
  mov    %rcx,%r12
  mov    %r8d,0x10(%rsp)
  mov    %r9d,-0x2c(%rsp)
  mov    0x78(%rsp),%ecx
  cmpl   $0x0,0x68(%rsp)
  jle    L57
  mov    %ecx,%ebx
  imul   0x70(%rsp),%ebx
  mov    %ebx,0x2c(%rsp)
  mov    %ebx,%eax
  imul   0x88(%rsp),%eax
  mov    %eax,-0x30(%rsp)
  mov    0x88(%rsp),%eax
  add    $0x1,%eax
  mov    %ebx,%edi
  imul   %eax,%edi
  mov    %edi,0x18(%rsp)
  mov    0x88(%rsp),%edi
  lea    -0x1(%rdi),%edx
  mov    %ebx,%edi
  imul   %edx,%edi
  mov    %edi,0x1c(%rsp)
  mov    0x70(%rsp),%edi
  imul   0x88(%rsp),%edi
  mov    %edi,0x20(%rsp)
  imul   0x70(%rsp),%eax
  mov    %eax,0x24(%rsp)
  mov    %edx,%eax
  imul   0x70(%rsp),%eax
  mov    %eax,0x28(%rsp)
  movslq %ebx,%rax
  shl    $0x2,%rax
  mov    %rax,-0x78(%rsp)
  mov    %ecx,%eax
  neg    %eax
  imul   0x70(%rsp),%eax
  cltq
  lea    0x0(,%rax,4),%r13
  movslq 0x70(%rsp),%rax
  shl    $0x2,%rax
  mov    %rax,-0x70(%rsp)
  mov    0x70(%rsp),%eax
  neg    %eax
  cltq
  lea    0x0(,%rax,4),%r15
  mov    %edx,%eax
  lea    0x4(,%rax,4),%r14
  movl   $0x0,0x14(%rsp)
  movslq 0x88(%rsp),%rax
  mov    %rax,0x8(%rsp)
  mov    %r8d,%eax
  mov    %rax,-0x68(%rsp)
  mov    %r12,%rax
  mov    %r14,%r12
  mov    %rax,%r14
  jmp    L54
L74:
  mov    -0x3c(%rsp),%esi
  mov    %esi,%eax
  add    -0x30(%rsp),%eax
  cltq
  mov    0x8(%rsp),%rbx
  lea    (%rbx,%rax,1),%rbp
  shl    $0x2,%rbp
  mov    -0x8(%rsp),%rbx
  lea    (%rbx,%rbp,1),%r10
  mov    -0x10(%rsp),%rbx
  add    %rbp,%rbx
  neg    %rax
  shl    $0x2,%rax
  movslq %esi,%rdx
  shl    $0x2,%rdx
  mov    -0x28(%rsp),%rcx
  add    %rdx,%rcx
  lea    (%rcx,%rax,1),%rdi
  mov    %rdi,-0x60(%rsp)
  add    -0x20(%rsp),%rdx
  lea    (%rdx,%rax,1),%rsi
  mov    %rsi,-0x58(%rsp)
  movslq -0x38(%rsp),%rdx
  mov    -0x18(%rsp),%rdi
  lea    (%rdi,%rdx,4),%rdx
  lea    (%rdx,%rax,1),%rsi
  mov    %rsi,-0x50(%rsp)
  movslq -0x34(%rsp),%rdx
  lea    (%rdi,%rdx,4),%rdx
  add    %rdx,%rax
  mov    %rax,-0x48(%rsp)
  add    (%rsp),%rbp
  mov    $0x0,%r11d
L45:
  mov    %r10,%r8
  movss  (%r10),%xmm1
  movaps %xmm1,%xmm2
  addss  %xmm1,%xmm2
  subss  (%rbx,%r11,4),%xmm2
  mulss  (%r14),%xmm1
  cmpl   $0x0,0x88(%rsp)
  jle    L10
  mov    -0x60(%rsp),%rax
  lea    (%r10,%rax,1),%rdi
  mov    -0x58(%rsp),%rax
  lea    (%r10,%rax,1),%rsi
  mov    -0x50(%rsp),%rax
  lea    (%r10,%rax,1),%rcx
  mov    -0x48(%rsp),%rax
  lea    (%r10,%rax,1),%rdx
  mov    $0x0,%eax
L6:
  movss  (%rdi),%xmm0
  addss  (%rsi),%xmm0
  addss  (%rcx),%xmm0
  addss  (%rdx),%xmm0
  addss  0x4(%r8,%rax,1),%xmm0
  mov    %rax,%r9
  neg    %r9
  addss  -0x4(%r8,%r9,1),%xmm0
  mulss  0x4(%r14,%rax,1),%xmm0
  addss  %xmm0,%xmm1
  add    -0x78(%rsp),%rdi
  add    %r13,%rsi
  add    -0x70(%rsp),%rcx
  add    %r15,%rdx
  add    $0x4,%rax
  cmp    %r12,%rax
  jne    L6
L10:
  mulss  0x0(%rbp,%r11,4),%xmm1
  addss  %xmm2,%xmm1
  movss  %xmm1,(%rbx,%r11,4)
  add    $0x1,%r11
  add    $0x4,%r10
  cmp    -0x68(%rsp),%r11
  jne    L45
L25:
  addl   $0x1,-0x40(%rsp)
  mov    -0x40(%rsp),%eax
  mov    0x70(%rsp),%ecx
  add    %ecx,-0x3c(%rsp)
  add    %ecx,-0x38(%rsp)
  add    %ecx,-0x34(%rsp)
  cmp    %eax,-0x2c(%rsp)
  je     L9
L5:
  cmpl   $0x0,0x10(%rsp)
  jg     L74
  jmp    L25
L9:
  addl   $0x1,0x14(%rsp)
  mov    0x14(%rsp),%eax
  mov    0x2c(%rsp),%ebx
  add    %ebx,-0x30(%rsp)
  add    %ebx,0x18(%rsp)
  add    %ebx,0x1c(%rsp)
  cmp    %eax,0x68(%rsp)
  je     L57
L54:
  cmpl   $0x0,-0x2c(%rsp)
  jle    L9
  movslq 0x18(%rsp),%rax
  shl    $0x2,%rax
  mov    %rax,-0x28(%rsp)
  movslq 0x1c(%rsp),%rax
  shl    $0x2,%rax
  mov    %rax,-0x20(%rsp)
  movslq -0x30(%rsp),%rax
  shl    $0x2,%rax
  mov    %rax,-0x18(%rsp)
  mov    0x28(%rsp),%eax
  mov    %eax,-0x34(%rsp)
  mov    0x24(%rsp),%eax
  mov    %eax,-0x38(%rsp)
  mov    0x20(%rsp),%eax
  mov    %eax,-0x3c(%rsp)
  movl   $0x0,-0x40(%rsp)
  jmp    L5
L57:
  add    $0x30,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

assistant: ```c
void fwd(float *next, float *curr, float *vsq, float *c_coeff, int nx, int ny, int nz, int dimx, int dimy, int dimz, int radius) {
#pragma omp parallel for collapse(3)
  for (int z = 0; z < nz; z++) {
    for (int y = 0; y < ny; y++) {
      for (int x = 0; x < nx; x++) {
        int this_offset = (((radius) + (z)) * (dimy) * (dimx) + ((radius) + (y)) * (dimx) + ((radius) + (x)));
        float temp = 2.0f * curr[this_offset] - next[this_offset];
        float div = c_coeff[0] * curr[this_offset];
        for (int d = 1; d <= radius; d++) {
          int z_pos_offset = (((radius) + (z + d)) * (dimy) * (dimx) + ((radius) + (y)) * (dimx) + ((radius) + (x)));
          int z_neg_offset = (((radius) + (z - d)) * (dimy) * (dimx) + ((radius) + (y)) * (dimx) + ((radius) + (x)));
          int y_pos_offset = (((radius) + (z)) * (dimy) * (dimx) + ((radius) + (y + d)) * (dimx) + ((radius) + (x)));
          int y_neg_offset = (((radius) + (z)) * (dimy) * (dimx) + ((radius) + (y - d)) * (dimx) + ((radius) + (x)));
          int x_pos_offset = (((radius) + (z)) * (dimy) * (dimx) + ((radius) + (y)) * (dimx) + ((radius) + (x + d)));
          int x_neg_offset = (((radius) + (z)) * (dimy) * (dimx) + ((radius) + (y)) * (dimx) + ((radius) + (x - d)));
          div += c_coeff[d] * (curr[z_pos_offset] + curr[z_neg_offset] + curr[y_pos_offset] + curr[y_neg_offset] + curr[x_pos_offset] + curr[x_neg_offset]);
        }
        next[this_offset] = temp + div * vsq[this_offset];
      }
    }
  }
}
```