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

```asm
<main>:
  endbr64
  push   %r15
  mov    $0x63,%esi
  xor    %edi,%edi
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x18,%rsp
  call   <vector@plt>
  mov    $0x63,%esi
  xor    %edi,%edi
  mov    %rax,%r12
  call   <vector@plt>
  mov    $0x63,%esi
  xor    %edi,%edi
  mov    %rax,%r14
  call   <vector@plt>
  mov    $0x63,%esi
  xor    %edi,%edi
  mov    %rax,%rbp
  call   <vector@plt>
  movss  D138(%rip),%xmm1
  movss  D3(%rip),%xmm3
  movl   $0x0,(%rax)
  mov    %rax,%r13
  xor    %eax,%eax
  movl   $0x0,0x0(%rbp)
  jmp    L4
  nop
L72:
  movss  D138(%rip),%xmm0
  divss  %xmm1,%xmm0
L33:
  add    $0x1,%edx
  pxor   %xmm2,%xmm2
  movss  %xmm0,0x0(%rbp,%rax,4)
  cvtsi2ss %edx,%xmm2
  movss  %xmm0,0x0(%r13,%rax,4)
  add    $0x1,%rax
  mulss  %xmm2,%xmm1
  cmp    $0x11,%rax
  je     L55
L4:
  mov    %eax,%edx
  pxor   %xmm0,%xmm0
  test   $0x1,%al
  jne    L33
  test   $0x3,%al
  je     L72
  movaps %xmm3,%xmm0
  divss  %xmm1,%xmm0
  jmp    L33
L55:
  movss  D149(%rip),%xmm1
  movss  D7(%rip),%xmm0
  mov    %rbp,%rdi
  xor    %ebx,%ebx
  mov    $0x11,%esi
  lea    D144(%rip),%r15
  call   <pcshft@plt>
  mov    $0x11,%edx
  mov    %r12,%rsi
  mov    %rbp,%rdi
  call   <pccheb@plt>
  lea    D75(%rip),%rdi
  call   <puts@plt>
  nopl   0x0(%rax,%rax,1)
L10:
  pxor   %xmm0,%xmm0
  pxor   %xmm1,%xmm1
  mov    %ebx,%esi
  mov    %r15,%rdi
  cvtss2sd 0x0(%rbp,%rbx,4),%xmm0
  cvtss2sd (%r12,%rbx,4),%xmm1
  mov    $0x2,%eax
  add    $0x2,%rbx
  call   <printf@plt>
  cmp    $0x12,%rbx
  jne    L10
  mov    $0xd,%edx
  mov    %r14,%rsi
  mov    %r12,%rdi
  xor    %ebx,%ebx
  call   <chebpc@plt>
  movss  D95(%rip),%xmm1
  mov    $0xd,%esi
  mov    %r14,%rdi
  movss  D103(%rip),%xmm0
  call   <pcshft@plt>
  lea    D114(%rip),%rdi
  call   <puts@plt>
  nopl   0x0(%rax,%rax,1)
L65:
  pxor   %xmm0,%xmm0
  pxor   %xmm2,%xmm2
  mov    %ebx,%esi
  mov    %r15,%rdi
  cvtss2sd 0x0(%r13,%rbx,4),%xmm0
  cvtss2sd (%r14,%rbx,4),%xmm2
  movapd %xmm2,%xmm1
  addsd  D140(%rip),%xmm0
  mov    $0x2,%eax
  add    $0x2,%rbx
  divsd  %xmm0,%xmm1
  movapd %xmm2,%xmm0
  call   <printf@plt>
  cmp    $0xe,%rbx
  jne    L65
  lea    D26(%rip),%rdi
  xor    %r15d,%r15d
  lea    D90(%rip),%rbx
  call   <puts@plt>
  nopl   0x0(%rax,%rax,1)
L24:
  pxor   %xmm5,%xmm5
  pxor   %xmm2,%xmm2
  movss  D138(%rip),%xmm1
  xor    %eax,%eax
  cvtsi2ss %r15d,%xmm5
  mulss  D67(%rip),%xmm5
  movaps %xmm2,%xmm3
  divss  D164(%rip),%xmm5
  subss  D95(%rip),%xmm5
  movaps %xmm5,%xmm0
  mulss  %xmm5,%xmm0
  nopl   0x0(%rax)
L57:
  movss  (%r14,%rax,1),%xmm4
  mulss  %xmm1,%xmm4
  addss  %xmm4,%xmm3
  movss  0x0(%r13,%rax,1),%xmm4
  add    $0x8,%rax
  mulss  %xmm1,%xmm4
  mulss  %xmm0,%xmm1
  addss  %xmm4,%xmm2
  cmp    $0x38,%rax
  jne    L57
  movaps %xmm5,%xmm0
  movss  %xmm2,0xc(%rsp)
  add    $0x1,%r15d
  movss  %xmm3,0x8(%rsp)
  movss  %xmm5,0x4(%rsp)
  call   <cos@plt>
  movss  0x8(%rsp),%xmm3
  mov    %rbx,%rdi
  mov    $0x4,%eax
  movss  0xc(%rsp),%xmm2
  movss  0x4(%rsp),%xmm5
  movaps %xmm0,%xmm1
  subss  %xmm0,%xmm3
  cvtss2sd %xmm1,%xmm1
  subss  %xmm0,%xmm2
  pxor   %xmm0,%xmm0
  cvtss2sd %xmm5,%xmm0
  cvtss2sd %xmm3,%xmm3
  cvtss2sd %xmm2,%xmm2
  call   <printf@plt>
  cmp    $0x10,%r15d
  jne    L24
  mov    %r13,%rdi
  mov    $0x63,%edx
  xor    %esi,%esi
  call   <free_vector@plt>
  mov    %rbp,%rdi
  mov    $0x63,%edx
  xor    %esi,%esi
  call   <free_vector@plt>
  mov    %r14,%rdi
  mov    $0x63,%edx
  xor    %esi,%esi
  call   <free_vector@plt>
  mov    %r12,%rdi
  mov    $0x63,%edx
  xor    %esi,%esi
  call   <free_vector@plt>
  add    $0x18,%rsp
  xor    %eax,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

tool_calls: name: parse_data
arguments: data_tag: D138
datatype: f32
name: parse_data
arguments: data_tag: D3
datatype: byte[4]
name: parse_data
arguments: data_tag: D149
datatype: byte[4]
name: parse_data
arguments: data_tag: D7
datatype: byte[4]
name: parse_data
arguments: data_tag: D144
datatype: string
name: parse_data
arguments: data_tag: D75
datatype: string
name: parse_data
arguments: data_tag: D95
datatype: f32
name: parse_data
arguments: data_tag: D103
datatype: byte[4]
name: parse_data
arguments: data_tag: D114
datatype: string
name: parse_data
arguments: data_tag: D140
datatype: byte[8]
name: parse_data
arguments: data_tag: D26
datatype: string
name: parse_data
arguments: data_tag: D90
datatype: string
name: parse_data
arguments: data_tag: D67
datatype: byte[4]
name: parse_data
arguments: data_tag: D164
datatype: byte[4]

tool: D138: 1

tool: {"D3": [0x00,0x00,0x80,0xbf]}

tool: {"D149": [0x83,0xf9,0xa2,0x3e]}

tool: {"D7": [0x83,0xf9,0xa2,0xbe]}

tool: D144: %3d %15.6e %15.6e


tool: D75: Index, series, Chebyshev coefficients

tool: D95: 3.14159265

tool: {"D103": [0xdb,0x0f,0x49,0xc0]}

tool: D114: Index, new series, coefficient ratios

tool: {"D140": [0xa0,0xc2,0xeb,0xfe,0x4b,0x48,0xb4,0x39]}

tool: D26:       Point tested, function value, error power series, error Cheb.

tool: D90: check: %15.6e %15.6e %15.6e %15.6e


tool: {"D67": [0xdb,0x0f,0xc9,0x40]}

tool: {"D164": [0x00,0x00,0x70,0x41]}

assistant: ```c
int main(void) {
  int i, j;
  float a = (-3.14159265), b = 3.14159265, fac, f, sum, sume, py, py2, *c, *d, *e, *ee;
  c = vector(0, 100 - 1);
  d = vector(0, 100 - 1);
  e = vector(0, 100 - 1);
  ee = vector(0, 100 - 1);
  fac = 1.0;
  e[0] = ee[0] = 0.0;
  for (j = 0; j < 17; j++) {
    i = j & 3;
    if (i == 1 || i == 3)
      e[j] = 0.0;
    else if (i == 0)
      e[j] = 1.0 / fac;
    else
      e[j] = -1.0 / fac;
    fac *= (j + 1);
    ee[j] = e[j];
  }
  pcshft((-2.0 - b - a) / (b - a), (2.0 - b - a) / (b - a), e, 17);
  pccheb(e, c, 17);
  printf("Index, series, Chebyshev coefficients\n");
  for (j = 0; j < 17; j += 2)
    printf("%3d %15.6e %15.6e\n", j, e[j], c[j]);
  chebpc(c, d, 13);
  pcshft(a, b, d, 13);
  printf("Index, new series, coefficient ratios\n");
  for (j = 0; j < 13; j += 2) {
    printf("%3d %15.6e %15.6e\n", j, d[j], d[j] / (ee[j] + 1.0e-30));
  }
  printf("      Point tested, function value, error power series, error Cheb.\n");
  for (i = 0; i <= 15; i++) {
    py = a + i * (b - a) / (float)15;
    py2 = py * py;
    sum = sume = 0.0;
    fac = 1.0;
    for (j = 0; j < 13; j += 2) {
      sum += fac * d[j];
      sume += fac * ee[j];
      fac *= py2;
    }
    f = cos(py);
    printf("check: %15.6e %15.6e %15.6e %15.6e\n", py, f, sume - f, sum - f);
  }
  free_vector(ee, 0, 100 - 1);
  free_vector(e, 0, 100 - 1);
  free_vector(d, 0, 100 - 1);
  free_vector(c, 0, 100 - 1);
  return 0;
}
```