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

```asm
<pow>:
  endbr64
  pxor   %xmm4,%xmm4
  movapd %xmm1,%xmm5
  movapd %xmm0,%xmm2
  comisd %xmm0,%xmm4
  jb     L33
  xorpd  D94(%rip),%xmm2
L33:
  mov    0x4(%rsp),%eax
  shr    $0x4,%eax
  and    $0xffff7ff,%eax
  ucomisd %xmm4,%xmm2
  jp     L36
  jne    L36
  sub    $0x3ff,%eax
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
L5:
  mulsd  %xmm5,%xmm1
  movsd  D112(%rip),%xmm0
  comisd D115(%rip),%xmm1
  ja     L103
  movsd  D165(%rip),%xmm2
  comisd %xmm1,%xmm2
  ja     L103
  cvttsd2si %xmm1,%eax
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  subsd  %xmm0,%xmm1
  ucomisd %xmm4,%xmm1
  jp     L32
  movapd %xmm4,%xmm0
  je     L103
L32:
  comisd %xmm1,%xmm4
  movsd  D84(%rip),%xmm0
  jbe    L39
  nopl   (%rax)
L3:
  addsd  %xmm0,%xmm1
  comisd %xmm1,%xmm4
  ja     L3
L39:
  movsd  D143(%rip),%xmm0
  comisd %xmm0,%xmm1
  jb     L64
  subsd  %xmm0,%xmm1
L64:
  movapd %xmm1,%xmm0
  movsd  D135(%rip),%xmm2
  mulsd  %xmm1,%xmm0
  mulsd  %xmm0,%xmm2
  addsd  D7(%rip),%xmm0
  addsd  D104(%rip),%xmm2
  mulsd  %xmm1,%xmm2
  movapd %xmm0,%xmm1
  movapd %xmm2,%xmm0
  addsd  %xmm1,%xmm0
  subsd  %xmm2,%xmm1
  mulsd  %xmm4,%xmm0
  divsd  %xmm1,%xmm0
L103:
  ret
  nopl   (%rax)
L36:
  mulsd  D62(%rip),%xmm2
  movsd  D84(%rip),%xmm0
  sub    $0x3fe,%eax
  movsd  D127(%rip),%xmm3
  movapd %xmm2,%xmm1
  addsd  %xmm0,%xmm2
  subsd  %xmm0,%xmm1
  movapd %xmm1,%xmm0
  divsd  %xmm2,%xmm0
  movsd  D129(%rip),%xmm2
  movapd %xmm0,%xmm1
  mulsd  %xmm0,%xmm1
  mulsd  %xmm1,%xmm3
  addsd  D136(%rip),%xmm3
  mulsd  %xmm1,%xmm3
  addsd  D56(%rip),%xmm3
  mulsd  %xmm1,%xmm3
  addsd  D66(%rip),%xmm3
  mulsd  %xmm1,%xmm3
  addsd  %xmm3,%xmm2
  mulsd  %xmm0,%xmm2
  pxor   %xmm0,%xmm0
  mulsd  D90(%rip),%xmm2
  cvtsi2sd %eax,%xmm0
  addsd  %xmm0,%xmm2
  movapd %xmm2,%xmm1
  subsd  D143(%rip),%xmm1
  jmp    L5
```

tool_calls: name: retrieve_data
arguments: data_label: D94
type_guessed: f32[4]
name: retrieve_data
arguments: data_label: D112
type_guessed: f64
name: retrieve_data
arguments: data_label: D115
type_guessed: f64[2]
name: retrieve_data
arguments: data_label: D165
type_guessed: f32[2]
name: retrieve_data
arguments: data_label: D84
type_guessed: f64
name: retrieve_data
arguments: data_label: D143
type_guessed: f64
name: retrieve_data
arguments: data_label: D135
type_guessed: f64
name: retrieve_data
arguments: data_label: D7
type_guessed: f64
name: retrieve_data
arguments: data_label: D104
type_guessed: f64
name: retrieve_data
arguments: data_label: D62
type_guessed: f64
name: retrieve_data
arguments: data_label: D127
type_guessed: f64
name: retrieve_data
arguments: data_label: D129
type_guessed: f64
name: retrieve_data
arguments: data_label: D136
type_guessed: f64
name: retrieve_data
arguments: data_label: D56
type_guessed: f64
name: retrieve_data
arguments: data_label: D66
type_guessed: f64
name: retrieve_data
arguments: data_label: D90
type_guessed: f64

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

tool: D112: 1e+307

tool: {"D115": [1023.0,-1023.0]}

tool: {"D165": [0.0,-4.4990234375]}

tool: D84: 1

tool: D143: 0.5

tool: D135: 0.0576900723731

tool: D7: 20.8189237930062

tool: D104: 7.2152891511493

tool: D62: 1.4142135623730951

tool: D127: 0.2376245609

tool: D129: 2.000000000046727

tool: D136: 0.28525381498

tool: D56: 0.4000059794795

tool: D66: 0.666666635059382

tool: D90: 1.442695040888634

assistant: ```c
double pow(y, x)
double y, x;
{
  typedef union {
    double d;
    unsigned u[4];
  } DBL;
  double z, w, p, p2, q, re;
  unsigned ex;
  int iz;
  DBL *yp, *zp, *wp;
  yp = (DBL *)&y;
  if (yp->d <= 0.0)
    y = -y;
  z = 0.0;
  zp = (DBL *)&z;
  zp->u[3] = yp->u[3] & ~0100017;
  iz = (zp->u[3] >> 4) - 1023;
  if ((yp->d - zp->d) == 0.0)
    z = (double)iz;
  else {
    yp->u[3] -= ++iz << 4;
    yp->d *= 1.4142135623730950488;
    p = (yp->d - 1.0) / (yp->d + 1.0);
    p2 = p * p;
    z = p * (2.000000000046727 + p2 * (0.666666635059382 + p2 * (0.4000059794795 + p2 * (0.28525381498 + p2 * 0.2376245609))));
    z = z * 1.442695040888634 + (double)iz - 0.5;
  }
  z *= x;
  w = 0.0;
  wp = (DBL *)&w;
  if (zp->d > 1023.0 || zp->d < -1023.0)
    return (1E307);
  iz = (int)zp->d;
  wp->u[3] += iz + 1023 << 4;
  wp->u[3] &= ~0100017;
  if ((zp->d -= (double)iz) == 0.0)
    return (wp->d);
  while (zp->d < 0.0) {
    wp->u[3] -= 1 << 4;
    wp->u[3] &= ~0100017;
    zp->d++;
  }
  if (zp->d >= 0.5) {
    zp->d -= 0.5;
    re = 1.41421356237309504880;
  } else
    re = 1.0;
  p2 = zp->d * zp->d;
  p = zp->d * (7.2152891511493 + p2 * 0.0576900723731);
  q = 20.8189237930062 + p2;
  zp->d = re * wp->d * (q + p) / (q - p);
  return (zp->d);
}
```