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

```asm
<arotate>:
  endbr64
  push   %r15
  cvtsd2ss %xmm0,%xmm0
  cvtss2sd %xmm0,%xmm0
  push   %r14
  push   %r13
  mov    %rsi,%r13
  push   %r12
  mov    %rdi,%r12
  push   %rbp
  mov    %r9,%rbp
  push   %rbx
  sub    $0x78,%rsp
  divsd  D5(%rip),%xmm0
  lea    0x68(%rsp),%rdi
  lea    0x60(%rsp),%rsi
  mov    %r8d,0x5c(%rsp)
  mov    0xb0(%rsp),%r15
  mov    %dx,0x58(%rsp)
  mov    %cx,0x5a(%rsp)
  call   <sincos@plt>
  movsd  0x60(%rsp),%xmm4
  movsd  0x68(%rsp),%xmm3
  mov    $0xa,%edi
  movsd  %xmm4,0x10(%rsp)
  movsd  %xmm3,0x8(%rsp)
  call   <putchar@plt>
  test   %rbp,%rbp
  movsd  0x8(%rsp),%xmm3
  movsd  0x10(%rsp),%xmm4
  jle    L103
  xor    %ebx,%ebx
  nopw   0x0(%rax,%rax,1)
L114:
  imul   $0xcccccccd,%ebx,%eax
  mov    %ebx,%r14d
  ror    %eax
  cmp    $0x19999999,%eax
  jbe    L107
L73:
  test   %r15,%r15
  jle    L123
  pxor   %xmm5,%xmm5
  pxor   %xmm2,%xmm2
  pxor   %xmm6,%xmm6
  mov    0x5c(%rsp),%ecx
  movswl 0x58(%rsp),%eax
  cvtsi2sd %r14d,%xmm2
  cvtsi2sd %eax,%xmm5
  movswl 0x5a(%rsp),%eax
  cvtsi2sd %eax,%xmm6
  movapd %xmm2,%xmm7
  mulsd  %xmm3,%xmm7
  mulsd  %xmm4,%xmm2
  movapd %xmm5,%xmm8
  movapd %xmm5,%xmm10
  mulsd  %xmm4,%xmm8
  mulsd  %xmm3,%xmm10
  movapd %xmm6,%xmm9
  movapd %xmm6,%xmm11
  mulsd  %xmm3,%xmm9
  mulsd  %xmm4,%xmm11
  test   %ecx,%ecx
  jne    L85
  mov    0x0(%r13),%rsi
  xor    %eax,%eax
  jmp    L12
  nopw   0x0(%rax,%rax,1)
L97:
  mov    $0x96,%edx
  add    $0x1,%rax
  mov    %dx,(%r8)
  cmp    %rax,%r15
  je     L123
L12:
  pxor   %xmm0,%xmm0
  lea    (%rsi,%rax,2),%r8
  cvtsi2sd %eax,%xmm0
  movapd %xmm0,%xmm1
  mulsd  %xmm4,%xmm0
  mulsd  %xmm3,%xmm1
  subsd  %xmm7,%xmm0
  addsd  %xmm2,%xmm1
  subsd  %xmm8,%xmm0
  subsd  %xmm10,%xmm1
  addsd  %xmm5,%xmm0
  subsd  %xmm11,%xmm1
  addsd  %xmm9,%xmm0
  addsd  %xmm6,%xmm1
  cvttsd2si %xmm0,%edi
  test   %edi,%edi
  js     L97
  movslq %edi,%rdi
  cvttsd2si %xmm1,%r9d
  cmp    %r15,%rdi
  jge    L97
  test   %r9d,%r9d
  js     L97
  movslq %r9d,%r9
  cmp    %rbp,%r9
  jge    L97
  mov    (%r12,%r9,8),%r9
  add    $0x1,%rax
  movzwl (%r9,%rdi,2),%edi
  mov    %di,(%r8)
  cmp    %rax,%r15
  jne    L12
  cs nopw 0x0(%rax,%rax,1)
L123:
  add    $0x1,%rbx
  add    $0x8,%r13
  cmp    %rbp,%rbx
  jne    L114
L103:
  add    $0x78,%rsp
  mov    $0x1,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   (%rax)
L107:
  mov    %ebx,%esi
  lea    D13(%rip),%rdi
  xor    %eax,%eax
  movsd  %xmm3,0x10(%rsp)
  movsd  %xmm4,0x8(%rsp)
  call   <printf@plt>
  movsd  0x10(%rsp),%xmm3
  movsd  0x8(%rsp),%xmm4
  jmp    L73
  nopl   (%rax)
L85:
  xor    %r14d,%r14d
  nopl   0x0(%rax,%rax,1)
L129:
  pxor   %xmm0,%xmm0
  movapd %xmm3,%xmm1
  mov    %r15,%rdx
  mov    %rbp,%rsi
  cvtsi2sd %r14d,%xmm0
  mov    %r12,%rdi
  mov    $0x2,%eax
  movsd  %xmm3,0x50(%rsp)
  movsd  %xmm2,0x48(%rsp)
  movsd  %xmm10,0x40(%rsp)
  movsd  %xmm11,0x38(%rsp)
  mulsd  %xmm0,%xmm1
  movsd  %xmm4,0x30(%rsp)
  mulsd  %xmm4,%xmm0
  movsd  %xmm7,0x28(%rsp)
  movsd  %xmm8,0x20(%rsp)
  movsd  %xmm5,0x18(%rsp)
  movsd  %xmm9,0x10(%rsp)
  addsd  %xmm2,%xmm1
  movsd  %xmm6,0x8(%rsp)
  subsd  %xmm7,%xmm0
  subsd  %xmm10,%xmm1
  subsd  %xmm8,%xmm0
  subsd  %xmm11,%xmm1
  addsd  %xmm5,%xmm0
  addsd  %xmm6,%xmm1
  addsd  %xmm9,%xmm0
  call   <bilinear_interpolate@plt>
  mov    0x0(%r13),%rdx
  movsd  0x8(%rsp),%xmm6
  movsd  0x10(%rsp),%xmm9
  movsd  0x18(%rsp),%xmm5
  mov    %ax,(%rdx,%r14,2)
  add    $0x1,%r14
  movsd  0x20(%rsp),%xmm8
  cmp    %r15,%r14
  movsd  0x28(%rsp),%xmm7
  movsd  0x30(%rsp),%xmm4
  movsd  0x38(%rsp),%xmm11
  movsd  0x40(%rsp),%xmm10
  movsd  0x48(%rsp),%xmm2
  movsd  0x50(%rsp),%xmm3
  jne    L129
  add    $0x1,%rbx
  add    $0x8,%r13
  cmp    %rbp,%rbx
  jne    L114
  jmp    L103
```

tool_calls: name: extract_symbolic_data
arguments: label: D5
datatype: f64
name: extract_symbolic_data
arguments: label: D13
datatype: string

tool: D5: 57.29577951

tool: D13: %d 

assistant: ```c
int arotate(the_image, out_image, angle, m, n, bilinear, rows, cols)
float angle;
int bilinear;
long cols, rows;
short **the_image, **out_image, m, n;
{
  double cosa, sina, radian_angle, tmpx, tmpy;
  int i, j, new_i, new_j;
  radian_angle = angle / 57.29577951;
  cosa = cos(radian_angle);
  sina = sin(radian_angle);
  printf("\n");
  for (i = 0; i < rows; i++) {
    if ((i % 10) == 0)
      printf("%d ", i);
    for (j = 0; j < cols; j++) {
      tmpx = (double)(j)*cosa - (double)(i)*sina - (double)(m)*cosa + (double)(m) + (double)(n)*sina;
      tmpy = (double)(i)*cosa + (double)(j)*sina - (double)(m)*sina - (double)(n)*cosa + (double)(n);
      new_j = tmpx;
      new_i = tmpy;
      if (bilinear == 0) {
        if (new_j < 0 || new_j >= cols || new_i < 0 || new_i >= rows)
          out_image[i][j] = 150;
        else
          out_image[i][j] = the_image[new_i][new_j];
      } else {
        out_image[i][j] = bilinear_interpolate(the_image, tmpx, tmpy, rows, cols);
      }
    }
  }
  return (1);
}
```