user: 请将以下的汇编代码转换成C语言代码：

```asm
<Inverse_SO3_Naive>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0xa8,%rsp
  mov    %edi,%r15d
  mov    %rsi,%rbp
  mov    %rdx,%r12
  mov    %rcx,0x90(%rsp)
  mov    %r8,0x98(%rsp)
  lea    (%rdi,%rdi,1),%edi
  mov    %edi,%eax
  imul   %edi,%eax
  mov    %eax,0x80(%rsp)
  imul   %edi,%eax
  mov    %eax,0x84(%rsp)
  cltq
  shl    $0x3,%rax
  mov    %rax,0x88(%rsp)
  mov    %r9,0x28(%rsp)
  mov    %r9,%r13
  add    %rax,%r13
  lea    0x0(%r13,%rax,1),%rbx
  mov    %rbx,0x40(%rsp)
  add    %rax,%rbx
  mov    %rbx,0x38(%rsp)
  movslq %edi,%rax
  shl    $0x3,%rax
  mov    %rax,%rbx
  add    0xe0(%rsp),%rbx
  mov    %rbx,0x20(%rsp)
  mov    %rbx,%rdx
  add    %rax,%rdx
  mov    %rdx,0x10(%rsp)
  mov    %rdx,%rcx
  add    %rax,%rcx
  mov    %rcx,%rdx
  mov    %rcx,0x18(%rsp)
  mov    %rax,0x8(%rsp)
  add    %rax,%rdx
  mov    %rdx,(%rsp)
  mov    %edi,%eax
  imul   %r15d,%eax
  cltq
  lea    (%rdx,%rax,8),%r14
  mov    0xe0(%rsp),%rsi
  mov    %edi,0x48(%rsp)
  call   <SinEvalPts@plt>
  mov    %rbx,%rsi
  mov    0x48(%rsp),%ebx
  mov    %ebx,%edi
  call   <CosEvalPts@plt>
  mov    0x10(%rsp),%rsi
  mov    %ebx,%edi
  call   <SinEvalPts2@plt>
  mov    0x18(%rsp),%rsi
  mov    %ebx,0x48(%rsp)
  mov    %ebx,%edi
  call   <CosEvalPts2@plt>
  mov    %r15d,%edi
  call   <totalCoeffs_so3@plt>
  lea    0x0(,%rax,8),%ebx
  mov    %ebx,%edx
  mov    %rbp,%rsi
  mov    0x28(%rsp),%rdi
  call   <memcpy@plt>
  mov    %ebx,%edx
  mov    %r12,%rsi
  mov    %r13,%rdi
  call   <memcpy@plt>
  test   %r15d,%r15d
  jle    L148
  mov    %r15d,%eax
  mov    %rax,%rdx
  mov    0x8(%rsp),%rbx
  imul   %rbx,%rdx
  mov    %rdx,0x60(%rsp)
  mov    0x48(%rsp),%r10d
  lea    -0x1(%r10),%eax
  mov    %rax,0x78(%rsp)
  lea    0x8(,%rax,8),%rax
  mov    %rax,0x70(%rsp)
  mov    $0x1,%eax
  sub    %r15d,%eax
  mov    %eax,0x58(%rsp)
  lea    -0x2(%r15),%eax
  add    $0x1,%rax
  imul   %rbx,%rax
  mov    %rax,0x68(%rsp)
  mov    $0x0,%ebp
  mov    %r15d,0x50(%rsp)
  mov    0x28(%rsp),%r15
L138:
  mov    0x38(%rsp),%r12
  mov    0x40(%rsp),%rax
  mov    %rax,0x28(%rsp)
  mov    $0x0,%ebx
  mov    %r12,0x30(%rsp)
  mov    0x50(%rsp),%r12d
L39:
  sub    $0x8,%rsp
  push   %r14
  push   0x10(%rsp)
  push   0x30(%rsp)
  mov    0x30(%rsp),%r9
  mov    0x40(%rsp),%r8
  mov    0x100(%rsp),%rcx
  mov    %r12d,%edx
  mov    %ebx,%esi
  mov    %ebp,%edi
  call   <genWigTrans_L2@plt>
  add    $0x18,%rsp
  push   %r14
  mov    0x38(%rsp),%r9
  mov    0x10(%rsp),%r8
  mov    %r15,%rcx
  mov    %r12d,%edx
  mov    %ebx,%esi
  mov    %ebp,%edi
  call   <wigNaiveSynthesis@plt>
  mov    %r14,(%rsp)
  mov    0x40(%rsp),%r9
  mov    0x10(%rsp),%r8
  mov    %r13,%rcx
  mov    %r12d,%edx
  mov    %ebx,%esi
  mov    %ebp,%edi
  call   <wigNaiveSynthesis@plt>
  mov    %r12d,%edx
  mov    %ebx,%esi
  mov    %ebp,%edi
  call   <howMany_so3@plt>
  cltq
  lea    (%r15,%rax,8),%r15
  mov    %r12d,%edx
  mov    %ebx,%esi
  mov    %ebp,%edi
  call   <howMany_so3@plt>
  cltq
  lea    0x0(%r13,%rax,8),%r13
  mov    0x18(%rsp),%rcx
  add    %rcx,0x38(%rsp)
  add    %rcx,0x40(%rsp)
  mov    %ebx,%eax
  add    $0x1,%ebx
  add    $0x10,%rsp
  cmp    %ebx,%r12d
  jne    L39
  mov    %eax,0x4c(%rsp)
  mov    0x60(%rsp),%rax
  add    %rax,0x40(%rsp)
  mov    0x40(%rsp),%rdi
  add    %rax,0x38(%rsp)
  mov    0x38(%rsp),%rsi
  cmpl   $0x0,0x48(%rsp)
  jle    L90
  mov    $0x0,%eax
  mov    0x78(%rsp),%rcx
L40:
  movq   $0x0,(%rdi,%rax,8)
  movq   $0x0,(%rsi,%rax,8)
  mov    %rax,%rdx
  add    $0x1,%rax
  cmp    %rdx,%rcx
  jne    L40
  mov    0x70(%rsp),%rdx
  add    %rdx,0x40(%rsp)
  add    %rdx,0x38(%rsp)
L90:
  mov    0x58(%rsp),%r12d
  test   %r12d,%r12d
  jns    L16
  mov    0x38(%rsp),%rax
  mov    %rax,0x30(%rsp)
  mov    0x40(%rsp),%rax
  mov    %rax,0x28(%rsp)
L191:
  sub    $0x8,%rsp
  push   %r14
  push   0x10(%rsp)
  push   0x30(%rsp)
  mov    0x30(%rsp),%r9
  mov    0x40(%rsp),%r8
  mov    0x100(%rsp),%rcx
  mov    %ebx,%edx
  mov    %r12d,%esi
  mov    %ebp,%edi
  call   <genWigTrans_L2@plt>
  add    $0x18,%rsp
  push   %r14
  mov    0x38(%rsp),%r9
  mov    0x10(%rsp),%r8
  mov    %r15,%rcx
  mov    %ebx,%edx
  mov    %r12d,%esi
  mov    %ebp,%edi
  call   <wigNaiveSynthesis@plt>
  mov    %r14,(%rsp)
  mov    0x40(%rsp),%r9
  mov    0x10(%rsp),%r8
  mov    %r13,%rcx
  mov    %ebx,%edx
  mov    %r12d,%esi
  mov    %ebp,%edi
  call   <wigNaiveSynthesis@plt>
  mov    %ebx,%edx
  mov    %r12d,%esi
  mov    %ebp,%edi
  call   <howMany_so3@plt>
  cltq
  lea    (%r15,%rax,8),%r15
  mov    %ebx,%edx
  mov    %r12d,%esi
  mov    %ebp,%edi
  call   <howMany_so3@plt>
  cltq
  lea    0x0(%r13,%rax,8),%r13
  mov    0x18(%rsp),%rcx
  add    %rcx,0x38(%rsp)
  add    %rcx,0x40(%rsp)
  add    $0x10,%rsp
  add    $0x1,%r12d
  jne    L191
  mov    0x68(%rsp),%rbx
  add    %rbx,0x40(%rsp)
  add    %rbx,0x38(%rsp)
L16:
  lea    0x1(%rbp),%eax
  cmp    0x4c(%rsp),%ebp
  je     L101
  mov    %eax,%ebp
  jmp    L138
L101:
  mov    %r15,0x28(%rsp)
  mov    0x50(%rsp),%r15d
L148:
  mov    0x80(%rsp),%eax
  test   %eax,%eax
  jle    L97
  mov    %eax,%edx
  mov    $0x0,%eax
  mov    0x38(%rsp),%rcx
  mov    0x40(%rsp),%rsi
L135:
  movq   $0x0,(%rsi,%rax,8)
  movq   $0x0,(%rcx,%rax,8)
  add    $0x1,%rax
  cmp    %rdx,%rax
  jne    L135
  shl    $0x3,%rdx
  add    %rdx,0x40(%rsp)
  add    %rdx,0x38(%rsp)
L97:
  mov    $0x1,%eax
  sub    %r15d,%eax
  mov    %eax,%ebx
  mov    %eax,0x4c(%rsp)
  jns    L203
  lea    -0x1(%r15),%eax
  lea    0x1(%rax),%rdx
  mov    0x8(%rsp),%rcx
  imul   %rcx,%rdx
  mov    %rdx,0x58(%rsp)
  mov    0x48(%rsp),%edx
  lea    -0x1(%rdx),%edx
  mov    %rdx,0x68(%rsp)
  lea    0x8(,%rdx,8),%rdx
  mov    %rdx,0x60(%rsp)
  imul   %rcx,%rax
  mov    %rax,0x50(%rsp)
  mov    0x28(%rsp),%r12
  jmp    L169
L25:
  sub    $0x8,%rsp
  push   %r14
  push   0x10(%rsp)
  push   0x30(%rsp)
  mov    0x30(%rsp),%r9
  mov    0x40(%rsp),%r8
  mov    0x100(%rsp),%rcx
  mov    %r15d,%edx
  mov    %ebp,%esi
  mov    %ebx,%edi
  call   <genWigTrans_L2@plt>
  add    $0x18,%rsp
  push   %r14
  mov    0x38(%rsp),%r9
  mov    0x10(%rsp),%r8
  mov    %r12,%rcx
  mov    %r15d,%edx
  mov    %ebp,%esi
  mov    %ebx,%edi
  call   <wigNaiveSynthesis@plt>
  mov    %r14,(%rsp)
  mov    0x40(%rsp),%r9
  mov    0x10(%rsp),%r8
  mov    %r13,%rcx
  mov    %r15d,%edx
  mov    %ebp,%esi
  mov    %ebx,%edi
  call   <wigNaiveSynthesis@plt>
  mov    %r15d,%edx
  mov    %ebp,%esi
  mov    %ebx,%edi
  call   <howMany_so3@plt>
  cltq
  lea    (%r12,%rax,8),%r12
  mov    %r15d,%edx
  mov    %ebp,%esi
  mov    %ebx,%edi
  call   <howMany_so3@plt>
  cltq
  lea    0x0(%r13,%rax,8),%r13
  mov    0x18(%rsp),%rdi
  add    %rdi,0x38(%rsp)
  add    %rdi,0x40(%rsp)
  add    $0x1,%ebp
  add    $0x10,%rsp
  cmp    %ebp,%r15d
  jne    L25
  mov    0x58(%rsp),%rdx
  add    %rdx,0x40(%rsp)
  add    %rdx,0x38(%rsp)
L103:
  cmpl   $0x0,0x48(%rsp)
  jle    L100
  mov    $0x0,%eax
  mov    0x68(%rsp),%rcx
  mov    0x38(%rsp),%rsi
  mov    0x40(%rsp),%rdi
L47:
  movq   $0x0,(%rdi,%rax,8)
  movq   $0x0,(%rsi,%rax,8)
  mov    %rax,%rdx
  add    $0x1,%rax
  cmp    %rdx,%rcx
  jne    L47
  mov    0x60(%rsp),%rdx
  add    %rdx,0x40(%rsp)
  add    %rdx,0x38(%rsp)
L100:
  mov    0x38(%rsp),%rax
  mov    %rax,0x30(%rsp)
  mov    0x40(%rsp),%rax
  mov    %rax,0x28(%rsp)
  mov    0x4c(%rsp),%ebp
L15:
  sub    $0x8,%rsp
  push   %r14
  push   0x10(%rsp)
  push   0x30(%rsp)
  mov    0x30(%rsp),%r9
  mov    0x40(%rsp),%r8
  mov    0x100(%rsp),%rcx
  mov    %r15d,%edx
  mov    %ebp,%esi
  mov    %ebx,%edi
  call   <genWigTrans_L2@plt>
  add    $0x18,%rsp
  push   %r14
  mov    0x38(%rsp),%r9
  mov    0x10(%rsp),%r8
  mov    %r12,%rcx
  mov    %r15d,%edx
  mov    %ebp,%esi
  mov    %ebx,%edi
  call   <wigNaiveSynthesis@plt>
  mov    %r14,(%rsp)
  mov    0x40(%rsp),%r9
  mov    0x10(%rsp),%r8
  mov    %r13,%rcx
  mov    %r15d,%edx
  mov    %ebp,%esi
  mov    %ebx,%edi
  call   <wigNaiveSynthesis@plt>
  mov    %r15d,%edx
  mov    %ebp,%esi
  mov    %ebx,%edi
  call   <howMany_so3@plt>
  cltq
  lea    (%r12,%rax,8),%r12
  mov    %r15d,%edx
  mov    %ebp,%esi
  mov    %ebx,%edi
  call   <howMany_so3@plt>
  cltq
  lea    0x0(%r13,%rax,8),%r13
  mov    0x18(%rsp),%rsi
  add    %rsi,0x38(%rsp)
  add    %rsi,0x40(%rsp)
  add    $0x10,%rsp
  add    $0x1,%ebp
  jne    L15
  mov    0x50(%rsp),%rdx
  add    %rdx,0x40(%rsp)
  add    %rdx,0x38(%rsp)
  add    $0x1,%ebx
  je     L12
L169:
  mov    0x38(%rsp),%rax
  mov    %rax,0x30(%rsp)
  mov    0x40(%rsp),%rax
  mov    %rax,0x28(%rsp)
  mov    $0x0,%ebp
  test   %r15d,%r15d
  jg     L25
  jmp    L103
L12:
  mov    %r12,0x28(%rsp)
L203:
  mov    %r15d,%edi
  call   <totalCoeffs_so3@plt>
  cltq
  shl    $0x3,%rax
  mov    0x28(%rsp),%rbx
  sub    %rax,%rbx
  mov    %r15d,%edi
  call   <totalCoeffs_so3@plt>
  cltq
  shl    $0x3,%rax
  mov    %r13,%rbp
  sub    %rax,%rbp
  mov    0x40(%rsp),%r12
  mov    0x88(%rsp),%rax
  sub    %rax,%r12
  mov    0x38(%rsp),%r13
  sub    %rax,%r13
  mov    0x80(%rsp),%ecx
  mov    0x48(%rsp),%edx
  mov    %rbx,%rsi
  mov    %r12,%rdi
  call   <transpose_so3@plt>
  mov    0x80(%rsp),%ecx
  mov    0x48(%rsp),%edx
  mov    %rbp,%rsi
  mov    %r13,%rdi
  call   <transpose_so3@plt>
  sub    $0x8,%rsp
  push   %r14
  mov    0x58(%rsp),%r9d
  mov    0x90(%rsp),%r8d
  mov    %r13,%rcx
  mov    %r12,%rdx
  mov    %rbp,%rsi
  mov    %rbx,%rdi
  call   <grid_fourier_so3@plt>
  mov    0x90(%rsp),%ecx
  mov    0x58(%rsp),%edx
  mov    %rbx,%rsi
  mov    %r12,%rdi
  call   <transpose_so3@plt>
  mov    0x90(%rsp),%ecx
  mov    0x58(%rsp),%r12d
  mov    %r12d,%edx
  mov    %rbp,%rsi
  mov    %r13,%rdi
  call   <transpose_so3@plt>
  mov    %r14,(%rsp)
  mov    %r12d,%r14d
  mov    %r12d,%r9d
  mov    0x90(%rsp),%r8d
  mov    0xa8(%rsp),%r12
  mov    %r12,%rcx
  mov    0xa0(%rsp),%r13
  mov    %r13,%rdx
  mov    %rbp,%rsi
  mov    %rbx,%rdi
  call   <grid_fourier_so3@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %r14d,%xmm1
  pxor   %xmm0,%xmm0
  cvtsi2sd %r15d,%xmm0
  divsd  D8(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  add    $0x10,%rsp
  mov    0x84(%rsp),%eax
  test   %eax,%eax
  jle    L22
  mov    %eax,%edx
  mov    $0x0,%eax
  mov    %r13,%rcx
  mov    %r12,%rsi
L114:
  movapd %xmm0,%xmm1
  mulsd  (%rcx,%rax,8),%xmm1
  movsd  %xmm1,(%rcx,%rax,8)
  movapd %xmm0,%xmm1
  mulsd  (%rsi,%rax,8),%xmm1
  movsd  %xmm1,(%rsi,%rax,8)
  add    $0x1,%rax
  cmp    %rax,%rdx
  jne    L114
L22:
  add    $0xa8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

tool_calls: name: parse_data
arguments: label: D8
type_infered: f64

tool: D8: 3.141592653589793

assistant: ```c
void Inverse_SO3_Naive(int bw, double *rcoeffs, double *icoeffs, double *rdata, double *idata, double *workspace1, double *workspace2) {
  int j, n;
  int m1, m2;
  double *t1r, *t1i, *t2r, *t2i;
  double *sinPts, *cosPts, *sinPts2, *cosPts2;
  double *wignersTrans, *scratch;
  double *rdataPtr, *idataPtr;
  double *rcoeffsPtr, *icoeffsPtr;
  double dn;
  int tmpInt;
  n = 2 * bw;
  t1r = workspace1;
  t1i = workspace1 + (n * n * n);
  t2r = t1i + (n * n * n);
  t2i = t2r + (n * n * n);
  rdataPtr = rdata;
  idataPtr = idata;
  rcoeffsPtr = rcoeffs;
  icoeffsPtr = icoeffs;
  sinPts = workspace2;
  cosPts = sinPts + n;
  sinPts2 = cosPts + n;
  cosPts2 = sinPts2 + n;
  wignersTrans = cosPts2 + n;
  scratch = wignersTrans + (bw * n);
  SinEvalPts(n, sinPts);
  CosEvalPts(n, cosPts);
  SinEvalPts2(n, sinPts2);
  CosEvalPts2(n, cosPts2);
  tmpInt = totalCoeffs_so3(bw);
  memcpy(t1r, rcoeffs, sizeof(double) * tmpInt);
  memcpy(t1i, icoeffs, sizeof(double) * tmpInt);
  for (m1 = 0; m1 < bw; m1++) {
    for (m2 = 0; m2 < bw; m2++) {
      genWigTrans_L2(m1, m2, bw, sinPts, cosPts, sinPts2, cosPts2, wignersTrans, scratch);
      wigNaiveSynthesis(m1, m2, bw, t1r, wignersTrans, t2r, scratch);
      wigNaiveSynthesis(m1, m2, bw, t1i, wignersTrans, t2i, scratch);
      t1r += howMany_so3(m1, m2, bw);
      t1i += howMany_so3(m1, m2, bw);
      t2r += n;
      t2i += n;
    }
    for (j = 0; j < n; j++) {
      *t2r++ = 0.0;
      *t2i++ = 0.0;
    }
    for (m2 = -(bw - 1); m2 < 0; m2++) {
      genWigTrans_L2(m1, m2, bw, sinPts, cosPts, sinPts2, cosPts2, wignersTrans, scratch);
      wigNaiveSynthesis(m1, m2, bw, t1r, wignersTrans, t2r, scratch);
      wigNaiveSynthesis(m1, m2, bw, t1i, wignersTrans, t2i, scratch);
      t1r += howMany_so3(m1, m2, bw);
      t1i += howMany_so3(m1, m2, bw);
      t2r += n;
      t2i += n;
    }
  }
  for (j = 0; j < n * n; j++) {
    *t2r++ = 0.0;
    *t2i++ = 0.0;
  }
  for (m1 = -(bw - 1); m1 < 0; m1++) {
    for (m2 = 0; m2 < bw; m2++) {
      genWigTrans_L2(m1, m2, bw, sinPts, cosPts, sinPts2, cosPts2, wignersTrans, scratch);
      wigNaiveSynthesis(m1, m2, bw, t1r, wignersTrans, t2r, scratch);
      wigNaiveSynthesis(m1, m2, bw, t1i, wignersTrans, t2i, scratch);
      t1r += howMany_so3(m1, m2, bw);
      t1i += howMany_so3(m1, m2, bw);
      t2r += n;
      t2i += n;
    }
    for (j = 0; j < n; j++) {
      *t2r++ = 0.0;
      *t2i++ = 0.0;
    }
    for (m2 = -(bw - 1); m2 < 0; m2++) {
      genWigTrans_L2(m1, m2, bw, sinPts, cosPts, sinPts2, cosPts2, wignersTrans, scratch);
      wigNaiveSynthesis(m1, m2, bw, t1r, wignersTrans, t2r, scratch);
      wigNaiveSynthesis(m1, m2, bw, t1i, wignersTrans, t2i, scratch);
      t1r += howMany_so3(m1, m2, bw);
      t1i += howMany_so3(m1, m2, bw);
      t2r += n;
      t2i += n;
    }
  }
  t1r -= totalCoeffs_so3(bw);
  t1i -= totalCoeffs_so3(bw);
  t2r -= (n * n * n);
  t2i -= (n * n * n);
  transpose_so3(t2r, t1r, n, n * n);
  transpose_so3(t2i, t1i, n, n * n);
  grid_fourier_so3(t1r, t1i, t2r, t2i, n * n, n, scratch);
  transpose_so3(t2r, t1r, n, n * n);
  transpose_so3(t2i, t1i, n, n * n);
  grid_fourier_so3(t1r, t1i, rdata, idata, n * n, n, scratch);
  dn = (double)n;
  dn *= ((double)bw) / 3.14159265358979323846;
  for (j = 0; j < n * n * n; j++) {
    rdata[j] *= dn;
    idata[j] *= dn;
  }
}
```