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

```asm
<a2f>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x28,%rsp
  mov    %rdi,%r13
  mov    %rdi,%rbx
  mov    $0x0,%ebp
  jmp    L81
L63:
  add    $0x1,%ebp
L81:
  mov    %rbx,%r12
  movsbl (%rbx),%edi
  call   <isspace@plt>
  add    $0x1,%rbx
  test   %rax,%rax
  jne    L63
  movzbl (%r12),%eax
  cmp    $0x2d,%al
  je     L128
  sub    $0x2b,%eax
  movl   $0x1,0x1c(%rsp)
  test   $0xfd,%al
  je     L161
L83:
  movslq %ebp,%r14
  add    %r13,%r14
  mov    %r14,%rbx
  pxor   %xmm5,%xmm5
  movsd  %xmm5,0x8(%rsp)
  jmp    L57
L128:
  movl   $0xffffffff,0x1c(%rsp)
L161:
  add    $0x1,%ebp
  jmp    L83
L119:
  movsd  0x8(%rsp),%xmm0
  mulsd  D35(%rip),%xmm0
  movsbl (%rbx),%eax
  sub    $0x30,%eax
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  addsd  %xmm0,%xmm1
  movsd  %xmm1,0x8(%rsp)
  add    $0x1,%rbx
L57:
  mov    %ebp,%r12d
  sub    %r14d,%r12d
  add    %ebx,%r12d
  movsbl (%rbx),%edi
  call   <isdigit@plt>
  test   %rax,%rax
  jne    L119
  cmpb   $0x2e,(%rbx)
  sete   %al
  movzbl %al,%eax
  add    %eax,%r12d
  movslq %r12d,%r14
  add    %r13,%r14
  mov    %r14,%rbp
  movsd  D41(%rip),%xmm6
  movsd  %xmm6,0x10(%rsp)
  jmp    L4
L85:
  movsd  0x8(%rsp),%xmm0
  mulsd  D35(%rip),%xmm0
  movsbl 0x0(%rbp),%eax
  sub    $0x30,%eax
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  addsd  %xmm0,%xmm1
  movsd  %xmm1,0x8(%rsp)
  movsd  0x10(%rsp),%xmm2
  mulsd  D35(%rip),%xmm2
  movsd  %xmm2,0x10(%rsp)
  add    $0x1,%rbp
L4:
  mov    %r12d,%ebx
  sub    %r14d,%ebx
  add    %ebp,%ebx
  movsbl 0x0(%rbp),%edi
  call   <isdigit@plt>
  test   %rax,%rax
  jne    L85
  movzbl 0x0(%rbp),%eax
  and    $0xffffffdf,%eax
  cmp    $0x45,%al
  sete   %al
  movzbl %al,%eax
  add    %eax,%ebx
  movslq %ebx,%rax
  movzbl 0x0(%r13,%rax,1),%eax
  cmp    $0x2d,%al
  je     L103
  sub    $0x2b,%eax
  mov    $0x1,%ebp
  test   $0xfd,%al
  je     L27
L54:
  movslq %ebx,%rbx
  add    %r13,%rbx
  mov    $0x0,%r12d
  jmp    L113
L103:
  mov    $0xffffffff,%ebp
L27:
  add    $0x1,%ebx
  jmp    L54
L13:
  lea    (%r12,%r12,4),%edx
  movsbl (%rbx),%eax
  lea    -0x30(%rax,%rdx,2),%r12d
  add    $0x1,%rbx
L113:
  movsbl (%rbx),%edi
  call   <isdigit@plt>
  test   %rax,%rax
  jne    L13
  test   %ebp,%ebp
  jle    L175
  test   %r12d,%r12d
  jle    L34
  mov    $0x0,%eax
  movsd  D35(%rip),%xmm0
L160:
  movsd  0x8(%rsp),%xmm3
  mulsd  %xmm0,%xmm3
  movsd  %xmm3,0x8(%rsp)
  add    $0x1,%eax
  cmp    %eax,%r12d
  jne    L160
L34:
  pxor   %xmm0,%xmm0
  cvtsi2sdl 0x1c(%rsp),%xmm0
  mulsd  0x8(%rsp),%xmm0
  divsd  0x10(%rsp),%xmm0
  add    $0x28,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L175:
  movsd  D2(%rip),%xmm0
  test   %r12d,%r12d
  jle    L34
L91:
  movsd  0x8(%rsp),%xmm4
  mulsd  %xmm0,%xmm4
  movsd  %xmm4,0x8(%rsp)
  add    $0x1,%eax
  cmp    %eax,%r12d
  jne    L91
  jmp    L34
```

tool_calls: name: disassemble_data
arguments: data_tag: D35
data_type: f64
name: disassemble_data
arguments: data_tag: D41
data_type: f64
name: disassemble_data
arguments: data_tag: D2
data_type: f64

tool: D35: 10

tool: D41: 1

tool: D2: 0.1

assistant: ```c
double a2f(char s[]) {
  double val, power;
  int i, sign, exp_sign, exp;
  for (i = 0; isspace(s[i]); i++)
    ;
  sign = (s[i] == '-') ? -1 : 1;
  if (s[i] == '+' || s[i] == '-')
    i++;
  for (val = 0.0; isdigit(s[i]); i++)
    val = val * 10 + (s[i] - '0');
  if (s[i] == '.')
    i++;
  for (power = 1.0; isdigit(s[i]); i++) {
    val = val * 10 + (s[i] - '0');
    power *= 10.0;
  }
  if (s[i] == 'e' || s[i] == 'E')
    i++;
  exp_sign = (s[i] == '-') ? -1 : 1;
  if (s[i] == '+' || s[i] == '-')
    i++;
  for (exp = 0; isdigit(s[i]); i++)
    exp = exp * 10 + (s[i] - '0');
  if (exp_sign > 0) {
    for (i = 0; i < exp; i++)
      val *= 10;
  } else {
    for (i = 0; i < exp; i++)
      val *= 0.1;
  }
  return sign * val / power;
}
```