user: Please show me the C implementation that matches the assembly code listed below:

```asm
<atof>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x28,%rsp
  mov    %rdi,%r13
  mov    %rdi,%rbx
  mov    $0x0,%r12d
  jmp    L154
L196:
  add    $0x1,%r12d
L154:
  mov    %rbx,%rbp
  movsbl (%rbx),%edi
  call   <isspace@plt>
  add    $0x1,%rbx
  test   %rax,%rax
  jne    L196
  movzbl 0x0(%rbp),%eax
  cmp    $0x2d,%al
  je     L16
  sub    $0x2b,%eax
  movl   $0x1,0x1c(%rsp)
  test   $0xfd,%al
  je     L198
L112:
  movslq %r12d,%r14
  add    %r13,%r14
  mov    %r14,%rbx
  pxor   %xmm5,%xmm5
  movsd  %xmm5,0x8(%rsp)
  jmp    L73
L16:
  movl   $0xffffffff,0x1c(%rsp)
L198:
  add    $0x1,%r12d
  jmp    L112
L126:
  movsd  0x8(%rsp),%xmm0
  mulsd  D41(%rip),%xmm0
  movsbl (%rbx),%eax
  sub    $0x30,%eax
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  addsd  %xmm0,%xmm1
  movsd  %xmm1,0x8(%rsp)
  add    $0x1,%rbx
L73:
  mov    %r12d,%ebp
  sub    %r14d,%ebp
  add    %ebx,%ebp
  movsbl (%rbx),%edi
  call   <isdigit@plt>
  test   %rax,%rax
  jne    L126
  cmpb   $0x2e,(%rbx)
  sete   %al
  movzbl %al,%eax
  add    %eax,%ebp
  movslq %ebp,%r14
  add    %r13,%r14
  mov    %r14,%rbx
  movsd  D7(%rip),%xmm6
  movsd  %xmm6,0x10(%rsp)
  jmp    L169
L2:
  movsd  0x8(%rsp),%xmm0
  mulsd  D41(%rip),%xmm0
  movsbl (%rbx),%eax
  sub    $0x30,%eax
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  addsd  %xmm0,%xmm1
  movsd  %xmm1,0x8(%rsp)
  movsd  0x10(%rsp),%xmm2
  mulsd  D41(%rip),%xmm2
  movsd  %xmm2,0x10(%rsp)
  add    $0x1,%rbx
L169:
  mov    %ebp,%r12d
  sub    %r14d,%r12d
  add    %ebx,%r12d
  movsbl (%rbx),%edi
  call   <isdigit@plt>
  test   %rax,%rax
  jne    L2
  movzbl (%rbx),%eax
  and    $0xffffffdf,%eax
  cmp    $0x45,%al
  jne    L208
  lea    0x1(%r12),%ebp
  movslq %ebp,%rax
  movzbl 0x0(%r13,%rax,1),%eax
  cmp    $0x2d,%al
  je     L132
  sub    $0x2b,%eax
  mov    $0x1,%ebx
  test   $0xfd,%al
  je     L139
L193:
  movslq %ebp,%rbp
  add    %r13,%rbp
  mov    $0x0,%r12d
L134:
  movsbl 0x0(%rbp),%edi
  call   <isdigit@plt>
  test   %rax,%rax
  je     L204
  lea    (%r12,%r12,4),%edx
  movsbl 0x0(%rbp),%eax
  lea    -0x30(%rax,%rdx,2),%r12d
  add    $0x1,%rbp
  jmp    L134
L132:
  mov    $0xffffffff,%ebx
L139:
  lea    0x2(%r12),%ebp
  jmp    L193
L204:
  cmp    $0x1,%ebx
  je     L140
  lea    -0x1(%r12),%eax
  movsd  D41(%rip),%xmm0
  test   %r12d,%r12d
  jle    L208
L5:
  movsd  0x10(%rsp),%xmm3
  mulsd  %xmm0,%xmm3
  movsd  %xmm3,0x10(%rsp)
  sub    $0x1,%eax
  cmp    $0xffffffff,%eax
  jne    L5
L208:
  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
L140:
  lea    -0x1(%r12),%eax
  test   %r12d,%r12d
  jle    L208
  movsd  D41(%rip),%xmm0
L97:
  movsd  0x10(%rsp),%xmm4
  divsd  %xmm0,%xmm4
  movsd  %xmm4,0x10(%rsp)
  sub    $0x1,%eax
  cmp    $0xffffffff,%eax
  jne    L97
  jmp    L208
```

tool_calls: name: extract_symbolic_data
arguments: label: D41
datatype: f64
name: extract_symbolic_data
arguments: label: D7
datatype: f64

tool: D41: 10

tool: D7: 1

assistant: ```c
double atof(char s[]) {
  int i, sign;
  double val, power;
  int sign_power;
  int e;
  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 = 10.0 * val + (s[i] - '0');
  if (s[i] == '.')
    i++;
  for (power = 1.0; isdigit(s[i]); i++) {
    val = 10.0 * val + (s[i] - '0');
    power *= 10.0;
  }
  if (s[i] == 'e' || s[i] == 'E') {
    sign_power = (s[++i] == '-') ? -1 : 1;
    if (s[i] == '+' || s[i] == '-')
      i++;
    for (e = 0; isdigit(s[i]); i++)
      e = 10 * e + (s[i] - '0');
    if (sign_power == 1)
      while (e-- > 0)
        power /= 10;
    else
      while (e-- > 0)
        power *= 10;
  }
  return sign * val / power;
}
```