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

```asm
<angle_fmt>:
  endbr64
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x10,%rsp
  mov    %rdi,%rbp
  mov    %rsi,%r12
  mov    $0x2b,%r13d
  comisd D28(%rip),%xmm0
  jb     L6
L60:
  movsd  D61(%rip),%xmm2
  movapd %xmm0,%xmm1
  divsd  %xmm2,%xmm1
  cvttsd2si %xmm1,%eax
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  mulsd  %xmm2,%xmm1
  subsd  %xmm1,%xmm0
  movsd  D71(%rip),%xmm1
  movapd %xmm0,%xmm2
  divsd  %xmm1,%xmm2
  cvttsd2si %xmm2,%r14d
  pxor   %xmm3,%xmm3
  cvtsi2sd %r14d,%xmm3
  movsd  %xmm3,0x8(%rsp)
  mulsd  %xmm3,%xmm1
  subsd  %xmm1,%xmm0
  movsd  %xmm0,(%rsp)
  movslq %eax,%rbx
  imul   $0xffffffffb60b60b7,%rbx,%rbx
  shr    $0x20,%rbx
  add    %eax,%ebx
  sar    $0x8,%ebx
  cltd
  sub    %edx,%ebx
  imul   $0x168,%ebx,%edx
  sub    %edx,%eax
  mov    %eax,%ebx
  mov    $0x2e,%esi
  mov    %rbp,%rdi
  call   <strchr@plt>
  movsd  D77(%rip),%xmm0
  test   %rax,%rax
  je     L7
  movsd  D71(%rip),%xmm0
  cmpb   $0x66,0x2(%rax)
  je     L66
L7:
  minsd  (%rsp),%xmm0
  movsd  %xmm0,(%rsp)
  lea    D9(%rip),%rsi
  mov    %rbp,%rdi
  call   <strstr@plt>
  test   %rax,%rax
  je     L11
  movsbl %r13b,%edx
  movsd  (%rsp),%xmm1
  movsd  0x8(%rsp),%xmm0
  mov    %ebx,%ecx
  mov    %rbp,%rsi
  mov    %r12,%rdi
  mov    $0x2,%eax
  call   <sprintf@plt>
L54:
  mov    %r12,%rax
  add    $0x10,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
L6:
  xorpd  D14(%rip),%xmm0
  mov    $0x2d,%r13d
  jmp    L60
L66:
  movsbl 0x1(%rax),%edx
  mov    $0x30,%eax
  sub    %edx,%eax
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  mov    $0xa,%edi
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D71(%rip),%xmm0
  subsd  %xmm1,%xmm0
  jmp    L7
L11:
  movsd  (%rsp),%xmm0
  mov    %r14d,%ecx
  mov    %ebx,%edx
  mov    %rbp,%rsi
  mov    %r12,%rdi
  mov    $0x1,%eax
  call   <sprintf@plt>
  jmp    L54
```

tool_calls: name: extract_symbolic_data
arguments: data_tag: D28
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D61
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D71
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D77
datatype: f64
name: extract_symbolic_data
arguments: data_tag: D9
datatype: string
name: extract_symbolic_data
arguments: data_tag: D14
datatype: byte[16]

tool: D28: 0

tool: D61: 3600

tool: D71: 60

tool: D77: 59

tool: D9: %c

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

assistant: ```c
char *angle_fmt(double a, char *format, char *lin) {
  char s, *p;
  int d, min, n;
  double sec, msec;
  if (a >= 0.)
    s = '+';
  else {
    s = '-';
    a = -a;
  }
  d = (int)(a / 3600.);
  min = (int)((a - (double)d * 3600.) / 60.);
  sec = a - (double)d * 3600. - (double)min * 60.;
  d %= 360;
  if ((p = strchr(format, '.')) == NULL)
    msec = 59.;
  else if (*(p + 2) == 'f') {
    n = *(p + 1) - '0';
    msec = 60. - pow(10., (double)(-n));
  } else
    msec = 60.;
  if (sec > msec)
    sec = msec;
  if (strstr(format, "%c"))
    sprintf(lin, format, s, d, min, sec);
  else
    sprintf(lin, format, d, min, sec);
  return lin;
}
```