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

```asm
<Aberration>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %rbx
  sub    $0xf8,%rsp
  mov    %rdi,-0xc8(%rbp)
  mov    %rsi,-0xd0(%rbp)
  mov    %edx,-0xd4(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x18(%rbp)
  xor    %eax,%eax
  movsd  D428(%rip),%xmm0
  movsd  %xmm0,-0x80(%rbp)
  cmpl   $0x0,-0xd4(%rbp)
  jns    L20
  movsd  D615(%rip),%xmm0
  movsd  %xmm0,-0x80(%rbp)
L20:
  movsd  D443(%rip),%xmm0
  movsd  %xmm0,-0x78(%rbp)
  mov    $0x0,%eax
  call   <LongitudeSun@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x70(%rbp)
  mov    $0x0,%eax
  call   <Eccentricity@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x68(%rbp)
  mov    $0x0,%eax
  call   <LongitudePerihelion@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x60(%rbp)
  mov    $0x0,%eax
  call   <MeanObliquity@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x58(%rbp)
  mov    -0xc8(%rbp),%rax
  movsd  (%rax),%xmm0
  movsd  %xmm0,-0x50(%rbp)
  mov    -0xd0(%rbp),%rax
  movsd  (%rax),%xmm0
  movsd  %xmm0,-0x48(%rbp)
  movsd  -0x48(%rbp),%xmm0
  movq   D156(%rip),%xmm1
  andpd  %xmm1,%xmm0
  comisd D852(%rip),%xmm0
  jbe    L55
  lea    -0xa0(%rbp),%rcx
  lea    -0xa8(%rbp),%rdx
  movsd  -0x48(%rbp),%xmm0
  mov    -0x50(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rdx,%rdi
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <CelestialToEcliptical@plt>
  movsd  -0xa8(%rbp),%xmm0
  movsd  %xmm0,-0x98(%rbp)
  movsd  -0xa0(%rbp),%xmm0
  movsd  %xmm0,-0x90(%rbp)
  movsd  -0x60(%rbp),%xmm0
  movapd %xmm0,%xmm1
  subsd  -0x98(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm2
  mulsd  -0x68(%rbp),%xmm2
  movsd  %xmm2,-0xe0(%rbp)
  movsd  -0x70(%rbp),%xmm0
  movapd %xmm0,%xmm1
  subsd  -0x98(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm7
  divsd  %xmm1,%xmm7
  movq   %xmm7,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movapd %xmm0,%xmm1
  movsd  -0xe0(%rbp),%xmm0
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x30(%rbp)
  movsd  -0x90(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x88(%rbp)
  movsd  D599(%rip),%xmm0
  comisd -0x88(%rbp),%xmm0
  jbe    L33
  movsd  D599(%rip),%xmm0
  movsd  %xmm0,-0x88(%rbp)
L33:
  movsd  -0x80(%rbp),%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x78(%rbp),%xmm1
  movsd  -0x30(%rbp),%xmm0
  divsd  -0x88(%rbp),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D865(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x28(%rbp)
  movsd  -0x90(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movq   %xmm0,%rax
  movq   D609(%rip),%xmm0
  movq   %rax,%xmm2
  xorpd  %xmm0,%xmm2
  movapd %xmm2,%xmm0
  movsd  %xmm0,-0x30(%rbp)
  movsd  -0x70(%rbp),%xmm0
  movapd %xmm0,%xmm1
  subsd  -0x98(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movq   %xmm0,%rbx
  movsd  -0x60(%rbp),%xmm0
  movapd %xmm0,%xmm1
  subsd  -0x98(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm1
  mulsd  -0x68(%rbp),%xmm1
  movq   %rbx,%xmm0
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x88(%rbp)
  movsd  -0x80(%rbp),%xmm0
  mulsd  -0x78(%rbp),%xmm0
  mulsd  -0x30(%rbp),%xmm0
  mulsd  -0x88(%rbp),%xmm0
  movsd  D865(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x20(%rbp)
  movsd  -0x98(%rbp),%xmm0
  addsd  -0x28(%rbp),%xmm0
  movsd  %xmm0,-0x98(%rbp)
  movsd  -0x90(%rbp),%xmm0
  addsd  -0x20(%rbp),%xmm0
  movsd  %xmm0,-0x90(%rbp)
  mov    -0x90(%rbp),%rax
  movq   %rax,%xmm0
  call   <Map180@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x90(%rbp)
  movsd  -0x90(%rbp),%xmm0
  comisd D879(%rip),%xmm0
  jbe    L39
  movsd  -0xb0(%rbp),%xmm1
  movsd  D41(%rip),%xmm0
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x90(%rbp)
  movsd  -0x98(%rbp),%xmm1
  movsd  D41(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x98(%rbp)
L39:
  movsd  D785(%rip),%xmm0
  comisd -0x90(%rbp),%xmm0
  jbe    L47
  movsd  D587(%rip),%xmm0
  subsd  -0x90(%rbp),%xmm0
  movsd  %xmm0,-0x90(%rbp)
  movsd  -0x98(%rbp),%xmm1
  movsd  D41(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x98(%rbp)
L47:
  mov    -0x98(%rbp),%rax
  movq   %rax,%xmm0
  call   <Map360@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x98(%rbp)
  lea    -0xb0(%rbp),%rcx
  lea    -0xb8(%rbp),%rdx
  movsd  -0x90(%rbp),%xmm0
  mov    -0x98(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rdx,%rdi
  movapd %xmm0,%xmm1
  movq   %rax,%xmm0
  call   <EclipticalToCelestial@plt>
  jmp    L54
L55:
  movsd  -0x50(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D570(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rax
  movq   D609(%rip),%xmm0
  movq   %rax,%xmm4
  xorpd  %xmm0,%xmm4
  movsd  %xmm4,-0xe0(%rbp)
  movsd  -0x70(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  mulsd  -0xe0(%rbp),%xmm0
  movsd  %xmm0,-0xe0(%rbp)
  movsd  -0x58(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm7
  divsd  %xmm1,%xmm7
  movq   %xmm7,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  mulsd  -0xe0(%rbp),%xmm0
  movsd  %xmm0,-0xe0(%rbp)
  movsd  -0x50(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D570(%rip),%xmm1
  movapd %xmm0,%xmm5
  divsd  %xmm1,%xmm5
  movq   %xmm5,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  %xmm0,-0xe8(%rbp)
  movsd  -0x70(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm6
  divsd  %xmm1,%xmm6
  movq   %xmm6,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  mulsd  -0xe8(%rbp),%xmm0
  movsd  -0xe0(%rbp),%xmm3
  subsd  %xmm0,%xmm3
  movsd  %xmm3,-0xe0(%rbp)
  movsd  -0x50(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D570(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm2
  mulsd  -0x68(%rbp),%xmm2
  movsd  %xmm2,-0xe8(%rbp)
  movsd  -0x60(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  mulsd  -0xe8(%rbp),%xmm0
  movsd  %xmm0,-0xe8(%rbp)
  movsd  -0x58(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm4
  divsd  %xmm1,%xmm4
  movq   %xmm4,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  mulsd  -0xe8(%rbp),%xmm0
  addsd  -0xe0(%rbp),%xmm0
  movsd  %xmm0,-0xe0(%rbp)
  movsd  -0x50(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D570(%rip),%xmm1
  movapd %xmm0,%xmm5
  divsd  %xmm1,%xmm5
  movq   %xmm5,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm6
  mulsd  -0x68(%rbp),%xmm6
  movsd  %xmm6,-0xe8(%rbp)
  movsd  -0x60(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm7
  divsd  %xmm1,%xmm7
  movq   %xmm7,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  mulsd  -0xe8(%rbp),%xmm0
  addsd  -0xe0(%rbp),%xmm0
  movsd  %xmm0,-0xe0(%rbp)
  movsd  -0x48(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm3
  divsd  %xmm1,%xmm3
  movq   %xmm3,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movapd %xmm0,%xmm1
  movsd  -0xe0(%rbp),%xmm0
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x40(%rbp)
  movsd  -0x80(%rbp),%xmm0
  mulsd  -0x78(%rbp),%xmm0
  movsd  -0x40(%rbp),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x40(%rbp)
  movsd  -0x40(%rbp),%xmm0
  movsd  D483(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x40(%rbp)
  movsd  -0x70(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rax
  movq   D609(%rip),%xmm0
  movq   %rax,%xmm3
  xorpd  %xmm0,%xmm3
  movsd  %xmm3,-0xe0(%rbp)
  movsd  -0x58(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  mulsd  -0xe0(%rbp),%xmm0
  movsd  %xmm0,-0xe0(%rbp)
  movsd  -0x58(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm4
  divsd  %xmm1,%xmm4
  movq   %xmm4,%rax
  movq   %rax,%xmm0
  call   <tan@plt>
  movsd  %xmm0,-0xe8(%rbp)
  movsd  -0x48(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm5
  divsd  %xmm1,%xmm5
  movq   %xmm5,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movapd %xmm0,%xmm4
  mulsd  -0xe8(%rbp),%xmm4
  movsd  %xmm4,-0xe8(%rbp)
  movsd  -0x50(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D570(%rip),%xmm1
  movapd %xmm0,%xmm7
  divsd  %xmm1,%xmm7
  movq   %xmm7,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  %xmm0,-0xf0(%rbp)
  movsd  -0x48(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm6
  divsd  %xmm1,%xmm6
  movq   %xmm6,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  -0xf0(%rbp),%xmm1
  mulsd  %xmm0,%xmm1
  movsd  -0xe8(%rbp),%xmm0
  subsd  %xmm1,%xmm0
  mulsd  -0xe0(%rbp),%xmm0
  movsd  %xmm0,-0xe0(%rbp)
  movsd  -0x50(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D570(%rip),%xmm1
  movapd %xmm0,%xmm2
  divsd  %xmm1,%xmm2
  movq   %xmm2,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movsd  %xmm0,-0xe8(%rbp)
  movsd  -0x48(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm4
  divsd  %xmm1,%xmm4
  movq   %xmm4,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movapd %xmm0,%xmm7
  mulsd  -0xe8(%rbp),%xmm7
  movsd  %xmm7,-0xe8(%rbp)
  movsd  -0x70(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm3
  divsd  %xmm1,%xmm3
  movq   %xmm3,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  mulsd  -0xe8(%rbp),%xmm0
  movsd  -0xe0(%rbp),%xmm5
  subsd  %xmm0,%xmm5
  movsd  %xmm5,-0xe0(%rbp)
  movsd  -0x60(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm2
  mulsd  -0x68(%rbp),%xmm2
  movsd  %xmm2,-0xe8(%rbp)
  movsd  -0x58(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  mulsd  -0xe8(%rbp),%xmm0
  movsd  %xmm0,-0xe8(%rbp)
  movsd  -0x58(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm4
  divsd  %xmm1,%xmm4
  movq   %xmm4,%rax
  movq   %rax,%xmm0
  call   <tan@plt>
  movsd  %xmm0,-0xf0(%rbp)
  movsd  -0x48(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm3
  divsd  %xmm1,%xmm3
  movq   %xmm3,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movapd %xmm0,%xmm6
  mulsd  -0xf0(%rbp),%xmm6
  movsd  %xmm6,-0xf0(%rbp)
  movsd  -0x50(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D570(%rip),%xmm1
  movapd %xmm0,%xmm7
  divsd  %xmm1,%xmm7
  movq   %xmm7,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  %xmm0,-0xf8(%rbp)
  movsd  -0x48(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm4
  divsd  %xmm1,%xmm4
  movq   %xmm4,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movsd  -0xf8(%rbp),%xmm1
  mulsd  %xmm0,%xmm1
  movsd  -0xf0(%rbp),%xmm0
  subsd  %xmm1,%xmm0
  mulsd  -0xe8(%rbp),%xmm0
  addsd  -0xe0(%rbp),%xmm0
  movsd  %xmm0,-0xe0(%rbp)
  movsd  -0x50(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D570(%rip),%xmm1
  movapd %xmm0,%xmm6
  divsd  %xmm1,%xmm6
  movq   %xmm6,%rax
  movq   %rax,%xmm0
  call   <cos@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm2
  mulsd  -0x68(%rbp),%xmm2
  movsd  %xmm2,-0xe8(%rbp)
  movsd  -0x48(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm3
  divsd  %xmm1,%xmm3
  movq   %xmm3,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  movapd %xmm0,%xmm6
  mulsd  -0xe8(%rbp),%xmm6
  movsd  %xmm6,-0xe8(%rbp)
  movsd  -0x60(%rbp),%xmm1
  movsd  D167(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D41(%rip),%xmm1
  movapd %xmm0,%xmm7
  divsd  %xmm1,%xmm7
  movq   %xmm7,%rax
  movq   %rax,%xmm0
  call   <sin@plt>
  mulsd  -0xe8(%rbp),%xmm0
  addsd  -0xe0(%rbp),%xmm0
  movsd  %xmm0,-0x38(%rbp)
  movsd  -0x80(%rbp),%xmm0
  mulsd  -0x78(%rbp),%xmm0
  movsd  -0x38(%rbp),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x38(%rbp)
  movsd  -0x38(%rbp),%xmm0
  movsd  D865(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x38(%rbp)
  movsd  -0x50(%rbp),%xmm0
  addsd  -0x40(%rbp),%xmm0
  movsd  %xmm0,-0xb8(%rbp)
  movsd  -0x48(%rbp),%xmm0
  addsd  -0x38(%rbp),%xmm0
  movsd  %xmm0,-0xb0(%rbp)
L54:
  movsd  -0xb8(%rbp),%xmm0
  mov    -0xc8(%rbp),%rax
  movsd  %xmm0,(%rax)
  movsd  -0xb0(%rbp),%xmm0
  mov    -0xd0(%rbp),%rax
  movsd  %xmm0,(%rax)
  nop
  mov    -0x18(%rbp),%rax
  sub    %fs:0x28,%rax
  je     L32
  call   <__stack_chk_fail@plt>
L32:
  mov    -0x8(%rbp),%rbx
  leave
  ret
```

tool_calls: name: unpack_data
arguments: label: D428
datatype: f64
name: unpack_data
arguments: label: D615
datatype: byte[8]
name: unpack_data
arguments: label: D443
datatype: f64
name: unpack_data
arguments: label: D156
datatype: qword
name: unpack_data
arguments: label: D852
datatype: f64[2]
name: unpack_data
arguments: label: D167
datatype: f64
name: unpack_data
arguments: label: D41
datatype: f64
name: unpack_data
arguments: label: D599
datatype: f64
name: unpack_data
arguments: label: D865
datatype: f64
name: unpack_data
arguments: label: D609
datatype: byte[8]
name: unpack_data
arguments: label: D879
datatype: f64[2]
name: unpack_data
arguments: label: D785
datatype: byte[8]
name: unpack_data
arguments: label: D587
datatype: byte[8]
name: unpack_data
arguments: label: D570
datatype: f64
name: unpack_data
arguments: label: D483
datatype: byte[8]

tool: D428: 1

tool: {"D615": [0x00,0x00,0x00,0x00,0x00,0x00,0xf0,0xbf]}

tool: D443: 20.49552

tool: D156: 9223372036854775807

tool: {"D852": [85.0,3.14159265358]}

tool: D167: 3.14159265358

tool: D41: 180

tool: D599: 0.0001

tool: D865: 3600

tool: {"D609": [0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x80]}

tool: {"D879": [90.0,-90.0]}

tool: {"D785": [0x00,0x00,0x00,0x00,0x00,0x80,0x56,0xc0]}

tool: {"D587": [0x00,0x00,0x00,0x00,0x00,0x80,0x66,0xc0]}

tool: D570: 12

tool: {"D483": [0x00,0x00,0x00,0x00,0x00,0x5e,0xea,0x40]}

assistant: ```c
void Aberration(double *ra, double *dec, int dirflag) {
  double ra_in, dec_in, ra_out, dec_out;
  double lambda, beta;
  double elong, elat;
  double dlong, dlat;
  double ec, lp, glsun, ka, eps0;
  double c1, c2;
  double dra, ddec;
  double dir;
  dir = 1.0;
  if (dirflag < 0) {
    dir = -1.0;
  }
  ka = 20.49552;
  glsun = LongitudeSun();
  ec = Eccentricity();
  lp = LongitudePerihelion();
  eps0 = MeanObliquity();
  ra_in = *ra;
  dec_in = *dec;
  if (fabs(dec_in) > (double)85.) {
    CelestialToEcliptical(ra_in, dec_in, &lambda, &beta);
    elong = lambda;
    elat = beta;
    c1 = -cos((glsun - elong) * 3.14159265358 / 180.) + ec * cos((lp - elong) * 3.14159265358 / 180.);
    c2 = cos(elat * 3.14159265358 / 180.);
    if (c2 < (double)0.0001)
      c2 = 0.0001;
    dlong = dir * ka * (c1 / c2) / 3600.;
    c1 = -sin(elat * 3.14159265358 / 180.);
    c2 = sin((glsun - elong) * 3.14159265358 / 180.) - ec * sin((lp - elong) * 3.14159265358 / 180.);
    dlat = dir * ka * c1 * c2 / 3600.;
    elong = elong + dlong;
    elat = elat + dlat;
    elat = Map180(elat);
    if (elat > 90.) {
      elat = 180. - dec_out;
      elong = elong + 180.;
    }
    if (elat < -90.) {
      elat = -180. - elat;
      elong = elong + 180.;
    }
    elong = Map360(elong);
    EclipticalToCelestial(elong, elat, &ra_out, &dec_out);
  } else {
    dra = (-cos(ra_in * 3.14159265358 / 12.) * cos(glsun * 3.14159265358 / 180.) * cos(eps0 * 3.14159265358 / 180.) - sin(ra_in * 3.14159265358 / 12.) * sin(glsun * 3.14159265358 / 180.) + ec * cos(ra_in * 3.14159265358 / 12.) * cos(lp * 3.14159265358 / 180.) * cos(eps0 * 3.14159265358 / 180) + ec * sin(ra_in * 3.14159265358 / 12.) * sin(lp * 3.14159265358 / 180.)) / cos(dec_in * 3.14159265358 / 180.);
    dra = dir * ka * dra;
    dra = dra / (15. * 3600.);
    ddec = -cos(glsun * 3.14159265358 / 180) * cos(eps0 * 3.14159265358 / 180.) * (tan(eps0 * 3.14159265358 / 180) * cos(dec_in * 3.14159265358 / 180.) - sin(ra_in * 3.14159265358 / 12.) * sin(dec_in * 3.14159265358 / 180.)) - cos(ra_in * 3.14159265358 / 12.) * sin(dec_in * 3.14159265358 / 180.) * sin(glsun * 3.14159265358 / 180) + ec * cos(lp * 3.14159265358 / 180.) * cos(eps0 * 3.14159265358 / 180.) * (tan(eps0 * 3.14159265358 / 180.) * cos(dec_in * 3.14159265358 / 180.) - sin(ra_in * 3.14159265358 / 12.) * sin(dec_in * 3.14159265358 / 180.)) + ec * cos(ra_in * 3.14159265358 / 12.) * sin(dec_in * 3.14159265358 / 180.) * sin(lp * 3.14159265358 / 180.);
    ddec = dir * ka * ddec;
    ddec = ddec / 3600.;
    ra_out = ra_in + dra;
    dec_out = dec_in + ddec;
  }
  *ra = ra_out;
  *dec = dec_out;
}
```