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

```asm
<erf__>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x180,%rsp
  movsd  %xmm0,-0x178(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  movsd  D24(%rip),%xmm0
  movsd  %xmm0,-0x160(%rbp)
  movsd  D198(%rip),%xmm0
  movsd  %xmm0,-0xf0(%rbp)
  movsd  D59(%rip),%xmm0
  movsd  %xmm0,-0xe8(%rbp)
  movsd  D342(%rip),%xmm0
  movsd  %xmm0,-0xe0(%rbp)
  movsd  D498(%rip),%xmm0
  movsd  %xmm0,-0xd8(%rbp)
  movsd  D148(%rip),%xmm0
  movsd  %xmm0,-0xd0(%rbp)
  movsd  D397(%rip),%xmm0
  movsd  %xmm0,-0x130(%rbp)
  movsd  D38(%rip),%xmm0
  movsd  %xmm0,-0x128(%rbp)
  movsd  D54(%rip),%xmm0
  movsd  %xmm0,-0x120(%rbp)
  movsd  D240(%rip),%xmm0
  movsd  %xmm0,-0x90(%rbp)
  movsd  D481(%rip),%xmm0
  movsd  %xmm0,-0x88(%rbp)
  movsd  D152(%rip),%xmm0
  movsd  %xmm0,-0x80(%rbp)
  movsd  D187(%rip),%xmm0
  movsd  %xmm0,-0x78(%rbp)
  movsd  D364(%rip),%xmm0
  movsd  %xmm0,-0x70(%rbp)
  movsd  D490(%rip),%xmm0
  movsd  %xmm0,-0x68(%rbp)
  movsd  D31(%rip),%xmm0
  movsd  %xmm0,-0x60(%rbp)
  movsd  D99(%rip),%xmm0
  movsd  %xmm0,-0x58(%rbp)
  movsd  D116(%rip),%xmm0
  movsd  %xmm0,-0x50(%rbp)
  movsd  D214(%rip),%xmm0
  movsd  %xmm0,-0x48(%rbp)
  movsd  D444(%rip),%xmm0
  movsd  %xmm0,-0x40(%rbp)
  movsd  D101(%rip),%xmm0
  movsd  %xmm0,-0x38(%rbp)
  movsd  D191(%rip),%xmm0
  movsd  %xmm0,-0x30(%rbp)
  movsd  D189(%rip),%xmm0
  movsd  %xmm0,-0x28(%rbp)
  movsd  D309(%rip),%xmm0
  movsd  %xmm0,-0x20(%rbp)
  movsd  D507(%rip),%xmm0
  movsd  %xmm0,-0x18(%rbp)
  movsd  D247(%rip),%xmm0
  movsd  %xmm0,-0xc0(%rbp)
  movsd  D143(%rip),%xmm0
  movsd  %xmm0,-0xb8(%rbp)
  movsd  D233(%rip),%xmm0
  movsd  %xmm0,-0xb0(%rbp)
  movsd  D29(%rip),%xmm0
  movsd  %xmm0,-0xa8(%rbp)
  movsd  D135(%rip),%xmm0
  movsd  %xmm0,-0xa0(%rbp)
  movsd  D306(%rip),%xmm0
  movsd  %xmm0,-0x110(%rbp)
  movsd  D412(%rip),%xmm0
  movsd  %xmm0,-0x108(%rbp)
  movsd  D15(%rip),%xmm0
  movsd  %xmm0,-0x100(%rbp)
  movsd  D145(%rip),%xmm0
  movsd  %xmm0,-0xf8(%rbp)
  movsd  -0x178(%rbp),%xmm0
  movq   D276(%rip),%xmm1
  andpd  %xmm1,%xmm0
  movsd  %xmm0,-0x158(%rbp)
  movsd  D370(%rip),%xmm0
  comisd -0x158(%rbp),%xmm0
  jb     L104
  movsd  -0x178(%rbp),%xmm0
  mulsd  %xmm0,%xmm0
  movsd  %xmm0,-0x148(%rbp)
  movsd  -0xf0(%rbp),%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0xe8(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0xe0(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0xd8(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0xd0(%rbp),%xmm0
  addsd  %xmm0,%xmm1
  movsd  D116(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x140(%rbp)
  movsd  -0x130(%rbp),%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0x128(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0x120(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  D116(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x138(%rbp)
  movsd  -0x140(%rbp),%xmm0
  divsd  -0x138(%rbp),%xmm0
  mulsd  -0x178(%rbp),%xmm0
  jmp    L86
L104:
  movsd  D404(%rip),%xmm0
  comisd -0x158(%rbp),%xmm0
  jb     L54
  movsd  -0x90(%rbp),%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x88(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x80(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x78(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x70(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x68(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x60(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x58(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x140(%rbp)
  movsd  -0x50(%rbp),%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x48(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x40(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x38(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x30(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x28(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x20(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x158(%rbp),%xmm1
  movsd  -0x18(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x138(%rbp)
  movsd  -0x178(%rbp),%xmm0
  movq   D95(%rip),%xmm1
  xorpd  %xmm1,%xmm0
  mulsd  -0x178(%rbp),%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <exp@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  mulsd  -0x140(%rbp),%xmm0
  movapd %xmm0,%xmm2
  divsd  -0x138(%rbp),%xmm2
  movsd  D370(%rip),%xmm0
  movapd %xmm0,%xmm1
  subsd  %xmm2,%xmm1
  movsd  D370(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x168(%rbp)
  pxor   %xmm0,%xmm0
  comisd -0x178(%rbp),%xmm0
  jbe    L60
  movsd  -0x168(%rbp),%xmm0
  movq   D95(%rip),%xmm1
  xorpd  %xmm1,%xmm0
  movsd  %xmm0,-0x168(%rbp)
L60:
  movsd  -0x168(%rbp),%xmm0
  jmp    L86
L54:
  movsd  -0x158(%rbp),%xmm0
  comisd D448(%rip),%xmm0
  jb     L16
  movsd  -0x178(%rbp),%xmm0
  pxor   %xmm1,%xmm1
  comisd %xmm1,%xmm0
  jbe    L18
  movsd  D116(%rip),%xmm0
  jmp    L86
L18:
  movsd  D218(%rip),%xmm0
  jmp    L86
L16:
  movsd  -0x178(%rbp),%xmm0
  mulsd  %xmm0,%xmm0
  movsd  %xmm0,-0x150(%rbp)
  movsd  D116(%rip),%xmm0
  divsd  -0x150(%rbp),%xmm0
  movsd  %xmm0,-0x148(%rbp)
  movsd  -0xc0(%rbp),%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0xb8(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0xb0(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0xa8(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0xa0(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x140(%rbp)
  movsd  -0x110(%rbp),%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0x108(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0x100(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  -0xf8(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  mulsd  -0x148(%rbp),%xmm1
  movsd  D116(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x138(%rbp)
  movsd  -0x150(%rbp),%xmm0
  movapd %xmm0,%xmm2
  mulsd  -0x138(%rbp),%xmm2
  movsd  -0x140(%rbp),%xmm0
  movapd %xmm0,%xmm1
  divsd  %xmm2,%xmm1
  movsd  -0x160(%rbp),%xmm0
  subsd  %xmm1,%xmm0
  divsd  -0x158(%rbp),%xmm0
  movsd  %xmm0,-0x148(%rbp)
  movsd  -0x150(%rbp),%xmm0
  movq   D95(%rip),%xmm1
  xorpd  %xmm1,%xmm0
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  call   <exp@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm2
  mulsd  -0x148(%rbp),%xmm2
  movsd  D370(%rip),%xmm0
  movapd %xmm0,%xmm1
  subsd  %xmm2,%xmm1
  movsd  D370(%rip),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x168(%rbp)
  pxor   %xmm0,%xmm0
  comisd -0x178(%rbp),%xmm0
  jbe    L85
  movsd  -0x168(%rbp),%xmm0
  movq   D95(%rip),%xmm1
  xorpd  %xmm1,%xmm0
  movsd  %xmm0,-0x168(%rbp)
L85:
  movsd  -0x168(%rbp),%xmm0
L86:
  movq   %xmm0,%rax
  mov    -0x8(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L40
  call   <__stack_chk_fail@plt>
L40:
  movq   %rax,%xmm0
  leave
  ret
```

tool_calls: name: parse_data
arguments: data_tag: D24
datatype: byte[8]
name: parse_data
arguments: data_tag: D198
datatype: byte[8]
name: parse_data
arguments: data_tag: D59
datatype: byte[8]
name: parse_data
arguments: data_tag: D342
datatype: byte[8]
name: parse_data
arguments: data_tag: D498
datatype: byte[8]
name: parse_data
arguments: data_tag: D148
datatype: byte[8]
name: parse_data
arguments: data_tag: D397
datatype: byte[8]
name: parse_data
arguments: data_tag: D38
datatype: byte[8]
name: parse_data
arguments: data_tag: D54
datatype: byte[8]
name: parse_data
arguments: data_tag: D240
datatype: byte[8]
name: parse_data
arguments: data_tag: D481
datatype: byte[8]
name: parse_data
arguments: data_tag: D152
datatype: f64
name: parse_data
arguments: data_tag: D187
datatype: f64
name: parse_data
arguments: data_tag: D364
datatype: f64
name: parse_data
arguments: data_tag: D490
datatype: f64
name: parse_data
arguments: data_tag: D31
datatype: f64
name: parse_data
arguments: data_tag: D99
datatype: f64
name: parse_data
arguments: data_tag: D116
datatype: f64
name: parse_data
arguments: data_tag: D214
datatype: f64
name: parse_data
arguments: data_tag: D444
datatype: f64
name: parse_data
arguments: data_tag: D101
datatype: f64
name: parse_data
arguments: data_tag: D191
datatype: f64
name: parse_data
arguments: data_tag: D189
datatype: f64
name: parse_data
arguments: data_tag: D309
datatype: f64
name: parse_data
arguments: data_tag: D507
datatype: f64
name: parse_data
arguments: data_tag: D247
datatype: f64
name: parse_data
arguments: data_tag: D143
datatype: f64
name: parse_data
arguments: data_tag: D233
datatype: f64
name: parse_data
arguments: data_tag: D29
datatype: f64
name: parse_data
arguments: data_tag: D135
datatype: byte[8]
name: parse_data
arguments: data_tag: D306
datatype: f64
name: parse_data
arguments: data_tag: D412
datatype: f64
name: parse_data
arguments: data_tag: D15
datatype: f64
name: parse_data
arguments: data_tag: D145
datatype: f64
name: parse_data
arguments: data_tag: D276
datatype: qword
name: parse_data
arguments: data_tag: D370
datatype: f64
name: parse_data
arguments: data_tag: D404
datatype: f64
name: parse_data
arguments: data_tag: D95
datatype: f32[2]
name: parse_data
arguments: data_tag: D448
datatype: f64[2]
name: parse_data
arguments: data_tag: D218
datatype: f32[2]

tool: {"D24": [0x6a,0x9b,0x42,0x50,0xd7,0x0d,0xe2,0x3f]}

tool: {"D198": [0x52,0x38,0x61,0x68,0x7c,0x36,0x14,0x3f]}

tool: {"D59": [0xa8,0xa2,0x17,0x74,0x33,0xe9,0x55,0xbf]}

tool: {"D342": [0x02,0x2e,0x60,0x1c,0xa1,0x8a,0xa0,0x3f]}

tool: {"D498": [0x71,0x02,0x23,0x7a,0x25,0x88,0xa8,0x3f]}

tool: {"D148": [0x78,0xdb,0x14,0x82,0xba,0x6e,0xc0,0x3f]}

tool: {"D397": [0x2f,0x09,0xdb,0x88,0x72,0xa9,0x68,0x3f]}

tool: {"D38": [0xfe,0x7f,0x76,0xe2,0x68,0x98,0xab,0x3f]}

tool: {"D54": [0x9f,0x56,0xde,0xa5,0x09,0x0d,0xd8,0x3f]}

tool: {"D240": [0xe7,0xbd,0x5a,0x04,0xa4,0x5e,0x82,0xbe]}

tool: {"D481": [0x57,0xe7,0x03,0xc2,0xe3,0x0d,0xe2,0x3f]}

tool: D152: 7.21175825088309

tool: D187: 43.1622272220567

tool: D364: 152.98928504694

tool: D490: 339.320816734344

tool: D31: 451.918953711873

tool: D99: 300.459261020162

tool: D116: 1

tool: D214: 12.7827273196294

tool: D444: 77.0001529352295

tool: D101: 277.585444743988

tool: D191: 638.980264465631

tool: D189: 931.35409485061

tool: D309: 790.950925327898

tool: D507: 300.459260956983

tool: D247: 2.10144126479064

tool: D143: 26.2370141675169

tool: D233: 21.3688200555087

tool: D29: 4.6580782871847

tool: {"D135": [0x6f,0x82,0x42,0x50,0xd7,0x0d,0xd2,0x3f]}

tool: D306: 94.153775055546

tool: D412: 187.11481179959

tool: D15: 99.0191814623914

tool: D145: 18.0124575948747

tool: D276: 9223372036854775807

tool: D370: 0.5

tool: D404: 4

tool: {"D95": [0.0,-0.0]}

tool: {"D448": [5.8,-1.0]}

tool: {"D218": [0.0,-1.875]}

assistant: ```c
double erf__(double x) {
  double c = .564189583547756;
  double a[5] = {7.7105849500132e-5, -.00133733772997339, .0323076579225834, .0479137145607681, .128379167095513};
  double b[3] = {.00301048631703895, .0538971687740286, .375795757275549};
  double p[8] = {-1.36864857382717e-7, .564195517478974, 7.21175825088309, 43.1622272220567, 152.98928504694, 339.320816734344, 451.918953711873, 300.459261020162};
  double q[8] = {1., 12.7827273196294, 77.0001529352295, 277.585444743988, 638.980264465631, 931.35409485061, 790.950925327898, 300.459260956983};
  double r[5] = {2.10144126479064, 26.2370141675169, 21.3688200555087, 4.6580782871847, .282094791773523};
  double s[4] = {94.153775055546, 187.11481179959, 99.0191814623914, 18.0124575948747};
  double ret_val;
  double t, x2, ax, bot, top;
  ax = fabs(x);
  if (ax <= 0.5) {
    t = x * x;
    top = (((a[0] * t + a[1]) * t + a[2]) * t + a[3]) * t + a[4] + 1.0;
    bot = ((b[0] * t + b[1]) * t + b[2]) * t + 1.0;
    return x * (top / bot);
  }
  if (ax <= 4.) {
    top = ((((((p[0] * ax + p[1]) * ax + p[2]) * ax + p[3]) * ax + p[4]) * ax + p[5]) * ax + p[6]) * ax + p[7];
    bot = ((((((q[0] * ax + q[1]) * ax + q[2]) * ax + q[3]) * ax + q[4]) * ax + q[5]) * ax + q[6]) * ax + q[7];
    ret_val = 0.5 - exp(-x * x) * top / bot + 0.5;
    if (x < 0.0) {
      ret_val = -ret_val;
    }
    return ret_val;
  }
  if (ax >= 5.8) {
    return x > 0 ? 1 : -1;
  }
  x2 = x * x;
  t = 1.0 / x2;
  top = (((r[0] * t + r[1]) * t + r[2]) * t + r[3]) * t + r[4];
  bot = (((s[0] * t + s[1]) * t + s[2]) * t + s[3]) * t + 1.0;
  t = (c - top / (x2 * bot)) / ax;
  ret_val = 0.5 - exp(-x2) * t + 0.5;
  if (x < 0.0) {
    ret_val = -ret_val;
  }
  return ret_val;
}
```