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

```asm
<benchmark>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbx
  sub    $0x38,%rsp
  mov    %edi,%r15d
  mov    %esi,-0x44(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x38(%rbp)
  xor    %eax,%eax
  movslq %esi,%rdx
  shl    $0x3,%rdx
  lea    0xf(%rdx),%rax
  mov    %rax,%rsi
  and    $0xfffffffffffffff0,%rsi
  and    $0xfffffffffffff000,%rax
  mov    %rsp,%rcx
  sub    %rax,%rcx
L49:
  cmp    %rcx,%rsp
  je     L93
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L49
L93:
  mov    %rsi,%rax
  and    $0xfff,%eax
  sub    %rax,%rsp
  test   %rax,%rax
  je     L171
  orq    $0x0,-0x8(%rsp,%rax,1)
L171:
  mov    %rsp,%r13
  lea    0xf(%rdx),%rax
  mov    %rax,%rsi
  and    $0xfffffffffffffff0,%rsi
  and    $0xfffffffffffff000,%rax
  mov    %rsp,%rcx
  sub    %rax,%rcx
L22:
  cmp    %rcx,%rsp
  je     L31
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L22
L31:
  mov    %rsi,%rax
  and    $0xfff,%eax
  sub    %rax,%rsp
  test   %rax,%rax
  je     L148
  orq    $0x0,-0x8(%rsp,%rax,1)
L148:
  mov    %rsp,%r14
  add    $0xf,%rdx
  mov    %rdx,%rcx
  and    $0xfffffffffffffff0,%rcx
  and    $0xfffffffffffff000,%rdx
  mov    %rsp,%rax
  sub    %rdx,%rax
L137:
  cmp    %rax,%rsp
  je     L123
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L137
L123:
  mov    %rcx,%rax
  and    $0xfff,%eax
  sub    %rax,%rsp
  test   %rax,%rax
  je     L79
  orq    $0x0,-0x8(%rsp,%rax,1)
L79:
  lea    0x7(%rsp),%r12
  mov    %r12,%rax
  shr    $0x3,%rax
  mov    %rax,-0x58(%rbp)
  and    $0xfffffffffffffff8,%r12
  mov    -0x44(%rbp),%eax
  test   %eax,%eax
  jle    L163
  mov    %eax,%eax
  mov    %rax,-0x50(%rbp)
  mov    $0x0,%ebx
L67:
  mov    D0(%rip),%rax
  movq   %rax,%xmm1
  pxor   %xmm0,%xmm0
  call   <rand_uniform@plt>
  movsd  %xmm0,(%r14,%rbx,8)
  movq   $0x0,(%r12,%rbx,8)
  movq   $0x0,0x0(%r13,%rbx,8)
  add    $0x1,%rbx
  cmp    -0x50(%rbp),%rbx
  jne    L67
L163:
  mov    $0x0,%eax
  call   <tic@plt>
  movsd  %xmm0,-0x50(%rbp)
  test   %r15d,%r15d
  jle    L25
  mov    $0x0,%ebx
L71:
  sub    $0x8,%rsp
  push   $0x1
  mov    %r12,%r9
  mov    $0x1,%r8d
  mov    %r13,%rcx
  mov    $0x1,%edx
  mov    %r14,%rsi
  mov    -0x44(%rbp),%edi
  call   <stdlib_strided_dmskrsqrt@plt>
  movsd  (%r12),%xmm0
  add    $0x10,%rsp
  ucomisd %xmm0,%xmm0
  jp     L158
  add    $0x1,%ebx
  cmp    %ebx,%r15d
  jne    L71
  jmp    L25
L158:
  lea    D3(%rip),%rdi
  call   <printf@plt>
L25:
  mov    $0x0,%eax
  call   <tic@plt>
  subsd  -0x50(%rbp),%xmm0
  movq   %xmm0,%rbx
  mov    -0x58(%rbp),%rax
  movsd  0x0(,%rax,8),%xmm0
  ucomisd %xmm0,%xmm0
  jp     L8
L141:
  mov    -0x38(%rbp),%rax
  sub    %fs:0x28,%rax
  jne    L117
  movq   %rbx,%xmm0
  lea    -0x28(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
L8:
  lea    D3(%rip),%rdi
  call   <printf@plt>
  jmp    L141
L117:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: disassemble_data
arguments: data_tag: D0
data_type: f64
name: disassemble_data
arguments: data_tag: D3
data_type: string

tool: D0: 200

tool: D3: should not return NaN


assistant: ```c
double benchmark(int iterations, int len) {
  double elapsed;
  uint8_t m[len];
  double x[len];
  double y[len];
  double t;
  int i;
  for (i = 0; i < len; i++) {
    x[i] = rand_uniform(0.0, 200.0);
    y[i] = 0.0;
    m[i] = 0;
  }
  t = tic();
  for (i = 0; i < iterations; i++) {
    stdlib_strided_dmskrsqrt(len, x, 1, m, 1, y, 1);
    if (y[0] != y[0]) {
      printf("should not return NaN\n");
      break;
    }
  }
  elapsed = tic() - t;
  if (y[0] != y[0]) {
    printf("should not return NaN\n");
  }
  return elapsed;
}
```