user: Demonstrate the C code that generates the assembly output below:

```asm
<h12>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  mov    %ecx,%ebx
  sub    $0x78,%rsp
  mov    (%rsi),%ecx
  test   %ecx,%ecx
  jle    L339
  mov    %rdx,%r14
  mov    (%rdx),%edx
  cmp    %ebx,%edx
  jg     L339
  cmp    %edx,%ecx
  jge    L339
  mov    (%r9),%r15d
  mov    %rsi,%r13
  mov    %r8,%rbp
  pxor   %xmm3,%xmm3
  mov    %edi,%eax
  mov    %r8,%r12
  lea    0x1(%r15),%esi
  movslq %esi,%rsi
  shl    $0x2,%rsi
  sub    %rsi,%rbp
  mov    %rsi,(%rsp)
  mov    %ecx,%esi
  imul   %r15d,%esi
  movslq %esi,%rsi
  movss  0x4(%rbp,%rsi,4),%xmm5
  comiss %xmm3,%xmm5
  movaps %xmm5,%xmm2
  jb     L424
L39:
  cmp    $0x2,%eax
  je     L423
  movslq %edx,%rcx
  movss  D47(%rip),%xmm4
  mov    %rcx,%rax
  cmp    $0x1,%r15d
  jne    L585
  nopl   0x0(%rax,%rax,1)
L544:
  movss  0x4(%rbp,%rax,4),%xmm1
  comiss %xmm3,%xmm1
  jae    L204
  xorps  %xmm4,%xmm1
L204:
  movaps %xmm2,%xmm0
  add    $0x1,%rax
  cmpnless %xmm1,%xmm0
  andps  %xmm0,%xmm2
  andnps %xmm1,%xmm0
  orps   %xmm0,%xmm2
  cmp    %eax,%ebx
  jge    L544
  comiss %xmm2,%xmm3
  jae    L339
  movss  D5(%rip),%xmm0
  mov    %ebx,%eax
  mov    $0x1,%esi
  sub    %edx,%eax
  cmp    %ebx,%edx
  movaps %xmm0,%xmm4
  lea    0x1(%rax),%edi
  divss  %xmm2,%xmm4
  cmovg  %esi,%edi
  mulss  %xmm4,%xmm5
  mulss  %xmm5,%xmm5
  cmp    $0x2,%eax
  jbe    L376
  mov    %edi,%esi
  lea    0x4(,%rcx,4),%rax
  sub    (%rsp),%rax
  shr    $0x2,%esi
  add    %r12,%rax
  movaps %xmm4,%xmm6
  shl    $0x4,%rsi
  shufps $0x0,%xmm6,%xmm6
  add    %rax,%rsi
  nopl   0x0(%rax,%rax,1)
L92:
  movups (%rax),%xmm0
  add    $0x10,%rax
  mulps  %xmm6,%xmm0
  mulps  %xmm0,%xmm0
  movaps %xmm0,%xmm1
  addss  %xmm5,%xmm1
  movaps %xmm0,%xmm5
  shufps $0x55,%xmm0,%xmm5
  addss  %xmm5,%xmm1
  movaps %xmm0,%xmm5
  unpckhps %xmm0,%xmm5
  shufps $0xff,%xmm0,%xmm0
  addss  %xmm5,%xmm1
  movaps %xmm1,%xmm5
  addss  %xmm0,%xmm5
  cmp    %rsi,%rax
  jne    L92
  mov    %edi,%eax
  and    $0xfffffffc,%eax
  add    %eax,%edx
  cmp    %eax,%edi
  je     L54
L525:
  sub    %eax,%edi
  cmp    $0x1,%edi
  je     L588
  lea    0x1(%rax,%rcx,1),%rax
  movaps %xmm4,%xmm1
  shl    $0x2,%rax
  sub    (%rsp),%rax
  shufps $0xe0,%xmm1,%xmm1
  movq   (%r12,%rax,1),%xmm0
  mov    %edi,%eax
  and    $0xfffffffe,%eax
  mulps  %xmm1,%xmm0
  add    %eax,%edx
  mulps  %xmm0,%xmm0
  movaps %xmm0,%xmm1
  shufps $0xe5,%xmm0,%xmm0
  addss  %xmm5,%xmm1
  movaps %xmm0,%xmm5
  addss  %xmm1,%xmm5
  cmp    %eax,%edi
  je     L54
L588:
  movslq %edx,%rdx
  mulss  0x4(%rbp,%rdx,4),%xmm4
  movaps %xmm4,%xmm0
  mulss  %xmm4,%xmm0
  addss  %xmm0,%xmm5
L54:
  movaps %xmm5,%xmm0
  movss  %xmm2,0xc(%rsp)
  call   <sqrt@plt>
  mov    0x0(%r13),%ecx
  pxor   %xmm3,%xmm3
  movss  0xc(%rsp),%xmm2
  movaps %xmm0,%xmm5
  mulss  %xmm2,%xmm5
  mov    %ecx,%eax
  imul   %r15d,%eax
  cltq
  lea    0x4(%rbp,%rax,4),%rax
  movss  (%rax),%xmm0
  comiss %xmm0,%xmm3
  jae    L502
  xorps  D47(%rip),%xmm5
L502:
  subss  %xmm5,%xmm0
  mov    0xb0(%rsp),%rdx
  movss  %xmm0,(%rdx)
  movss  %xmm5,(%rax)
L66:
  mov    0xd0(%rsp),%rax
  mov    (%rax),%edx
  test   %edx,%edx
  jle    L339
  mov    0xb0(%rsp),%rax
  movss  (%rax),%xmm6
  mulss  %xmm6,%xmm5
  comiss %xmm3,%xmm5
  jae    L339
  mov    0xb8(%rsp),%rax
  movss  D5(%rip),%xmm4
  divss  %xmm5,%xmm4
  sub    $0x4,%rax
  mov    %rax,%r8
  mov    0xc8(%rsp),%rax
  mov    (%rax),%edi
  mov    0xc0(%rsp),%rax
  movslq (%rax),%rsi
  lea    -0x1(%rcx),%eax
  mov    %edi,0x1c(%rsp)
  imul   %esi,%eax
  sub    %edi,%eax
  mov    (%r14),%edi
  add    $0x1,%eax
  mov    %edi,0xc(%rsp)
  sub    %ecx,%edi
  mov    %edi,%ecx
  imul   %esi,%ecx
  cmp    $0x1,%r15d
  jne    L215
  cmp    $0x1,%esi
  jne    L215
  movslq 0x1c(%rsp),%r14
  movslq %eax,%rdi
  mov    (%rsp),%r10
  add    $0x1,%edx
  mov    0xb8(%rsp),%r11
  mov    %ebx,%r9d
  mov    %edx,0x34(%rsp)
  mov    %r12,%rdx
  lea    (%r14,%rdi,1),%rsi
  add    %r14d,%eax
  mov    %r14,0x38(%rsp)
  sub    %r10,%rdx
  lea    -0x4(%r11,%rsi,4),%r11
  lea    (%rax,%rcx,1),%esi
  movslq %ecx,%rax
  mov    %r12,0x50(%rsp)
  add    %r14,%rax
  lea    0x0(,%r14,4),%r13
  lea    (%rax,%rdi,1),%rcx
  movslq 0xc(%rsp),%rax
  mov    %rcx,0x10(%rsp)
  lea    0x0(,%rax,4),%rdi
  mov    %rax,%r14
  mov    %rax,0x48(%rsp)
  mov    %rcx,%rax
  neg    %rax
  sub    %r14d,%r9d
  lea    (%rdi,%rax,4),%rax
  lea    0x1(%r9),%r15d
  mov    %r9d,0x18(%rsp)
  add    %rbp,%rax
  mov    %r15d,0x30(%rsp)
  mov    %rax,0x28(%rsp)
  mov    0xb8(%rsp),%rax
  lea    -0x4(%rax,%rcx,4),%rax
  lea    0x4(%rdx,%rdi,1),%rcx
  mov    %r15d,%edx
  sub    %r10,%rdi
  and    $0xfffffffc,%r15d
  shr    $0x2,%edx
  add    %r15d,%r14d
  mov    %r15d,0x40(%rsp)
  lea    0x8(%r12,%rdi,1),%r15
  sub    $0x1,%edx
  lea    0x4(%r12,%rdi,1),%rdi
  add    $0x1,%rdx
  mov    %r14d,0x44(%rsp)
  mov    %ebx,%r14d
  mov    %rdi,0x60(%rsp)
  mov    %r9d,%edi
  shl    $0x4,%rdx
  mov    %r8,%rbx
  add    $0x2,%rdi
  mov    %r15,0x58(%rsp)
  mov    $0x1,%r15d
  mov    %rdi,0x68(%rsp)
  nopw   0x0(%rax,%rax,1)
L324:
  movss  (%r11),%xmm5
  mov    %esi,%edi
  movaps %xmm5,%xmm1
  mulss  %xmm6,%xmm1
  cmp    %r14d,0xc(%rsp)
  jg     L261
  cmpl   $0x2,0x18(%rsp)
  jbe    L159
  xor    %r8d,%r8d
  nopw   0x0(%rax,%rax,1)
L323:
  movups (%rax,%r8,1),%xmm0
  movups (%rcx,%r8,1),%xmm7
  add    $0x10,%r8
  mulps  %xmm7,%xmm0
  addss  %xmm0,%xmm1
  movaps %xmm0,%xmm2
  shufps $0x55,%xmm0,%xmm2
  addss  %xmm2,%xmm1
  movaps %xmm0,%xmm2
  unpckhps %xmm0,%xmm2
  shufps $0xff,%xmm0,%xmm0
  addss  %xmm2,%xmm1
  addss  %xmm0,%xmm1
  cmp    %r8,%rdx
  jne    L323
  mov    0x40(%rsp),%r10d
  lea    (%rsi,%r10,1),%r8d
  cmp    %r10d,0x30(%rsp)
  je     L33
  mov    0x44(%rsp),%r9d
L449:
  movslq %r8d,%r8
  lea    0x0(,%r8,4),%r10
  movss  (%rbx,%r8,4),%xmm0
  mov    %r10,0x20(%rsp)
  movslq %r9d,%r10
  add    $0x1,%r10
  mulss  0x0(%rbp,%r10,4),%xmm0
  lea    0x0(,%r10,4),%r12
  lea    0x1(%r9),%r10d
  addss  %xmm0,%xmm1
  cmp    %r10d,%r14d
  jl     L33
  mov    0xb8(%rsp),%r10
  movss  0x4(%rbp,%r12,1),%xmm0
  add    $0x2,%r9d
  mulss  (%r10,%r8,4),%xmm0
  addss  %xmm0,%xmm1
  cmp    %r9d,%r14d
  jl     L33
  mov    0x20(%rsp),%r10
  movss  0x8(%rbx,%r10,1),%xmm0
  mulss  0x8(%rbp,%r12,1),%xmm0
  addss  %xmm0,%xmm1
L33:
  ucomiss %xmm3,%xmm1
  jp     L232
  jne    L232
L419:
  mov    0x38(%rsp),%r10
  sub    %r13,0x28(%rsp)
  add    %r13,%r11
  add    %r13,%rax
  add    %r10,0x10(%rsp)
  add    $0x1,%r15d
  add    0x1c(%rsp),%esi
  cmp    0x34(%rsp),%r15d
  je     L339
  mov    0xb0(%rsp),%rdi
  movss  (%rdi),%xmm6
  jmp    L324
  nopw   0x0(%rax,%rax,1)
L423:
  comiss %xmm2,%xmm3
  jb     L66
L339:
  add    $0x78,%rsp
  xor    %eax,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopw   0x0(%rax,%rax,1)
L424:
  xorps  D47(%rip),%xmm2
  jmp    L39
  nopl   0x0(%rax)
L585:
  mov    (%rsp),%rax
  movaps %xmm4,%xmm1
  lea    -0x4(%rax),%rsi
  mov    %edx,%eax
  imul   %r15d,%eax
  cltq
  lea    0x4(%rbp,%rax,4),%rcx
  mov    %edx,%eax
  nopw   0x0(%rax,%rax,1)
L197:
  movss  (%rcx),%xmm4
  comiss %xmm3,%xmm4
  jae    L177
  xorps  %xmm1,%xmm4
L177:
  movaps %xmm2,%xmm0
  add    $0x1,%eax
  add    %rsi,%rcx
  cmpnless %xmm4,%xmm0
  andps  %xmm0,%xmm2
  andnps %xmm4,%xmm0
  orps   %xmm0,%xmm2
  cmp    %eax,%ebx
  jge    L197
  comiss %xmm2,%xmm3
  jae    L339
  movss  D5(%rip),%xmm4
  mov    %edx,%eax
  imul   %r15d,%eax
  divss  %xmm2,%xmm4
  cltq
  lea    0x4(%rbp,%rax,4),%rax
  mulss  %xmm4,%xmm5
  mulss  %xmm5,%xmm5
  nopl   (%rax)
L231:
  movss  (%rax),%xmm0
  add    $0x1,%edx
  add    %rsi,%rax
  mulss  %xmm4,%xmm0
  mulss  %xmm0,%xmm0
  addss  %xmm0,%xmm5
  cmp    %edx,%ebx
  jge    L231
  jmp    L54
L215:
  movslq 0x1c(%rsp),%rdi
  mov    0xc(%rsp),%r14d
  movslq %ecx,%rcx
  cltq
  mov    (%rsp),%r12
  add    $0x1,%edx
  lea    0x1(%rbx),%r11d
  imul   %r14d,%r15d
  lea    0x0(,%rdi,4),%r8
  add    %rcx,%rdi
  neg    %rcx
  add    %rdi,%rax
  mov    0xb8(%rsp),%rdi
  lea    0x0(,%rcx,4),%r10
  sub    $0x4,%r12
  lea    (%rdi,%rax,4),%r9
  movslq %r15d,%rax
  lea    0x0(,%rsi,4),%rdi
  lea    0x4(%rbp,%rax,4),%r13
  mov    $0x1,%ebp
  nopl   0x0(%rax,%rax,1)
L522:
  movss  -0x4(%r9,%r10,1),%xmm2
  movaps %xmm2,%xmm1
  mulss  %xmm6,%xmm1
  cmp    %ebx,%r14d
  jg     L479
  mov    %r13,%rsi
  mov    %r9,%rcx
  mov    %r14d,%eax
  nopl   0x0(%rax,%rax,1)
L606:
  movss  -0x4(%rcx),%xmm0
  mulss  (%rsi),%xmm0
  add    $0x1,%eax
  add    %rdi,%rcx
  add    %r12,%rsi
  addss  %xmm0,%xmm1
  cmp    %r11d,%eax
  jne    L606
  ucomiss %xmm3,%xmm1
  jp     L302
  jne    L302
L547:
  add    $0x1,%ebp
  add    %r8,%r9
  cmp    %edx,%ebp
  je     L339
  mov    0xb0(%rsp),%rax
  movss  (%rax),%xmm6
  jmp    L522
  cs nopw 0x0(%rax,%rax,1)
L232:
  mulss  %xmm4,%xmm1
  mov    %rax,%r8
  sub    0x58(%rsp),%r8
  mulss  %xmm1,%xmm6
  addss  %xmm6,%xmm5
  movss  %xmm5,(%r11)
  cmp    $0x8,%r8
  jbe    L476
  cmp    %r14d,0xc(%rsp)
  je     L476
  cmpl   $0x2,0x18(%rsp)
  jbe    L428
  mov    0x60(%rsp),%r8
  movaps %xmm1,%xmm2
  xor    %edi,%edi
  shufps $0x0,%xmm2,%xmm2
  nopw   0x0(%rax,%rax,1)
L590:
  movups (%r8,%rdi,1),%xmm0
  movups (%rax,%rdi,1),%xmm6
  mulps  %xmm2,%xmm0
  addps  %xmm6,%xmm0
  movups %xmm0,(%rax,%rdi,1)
  add    $0x10,%rdi
  cmp    %rdx,%rdi
  jne    L590
  mov    0x40(%rsp),%r10d
  lea    (%rsi,%r10,1),%edi
  cmp    %r10d,0x30(%rsp)
  je     L419
  mov    0x44(%rsp),%r8d
  mov    %r10d,%r9d
L233:
  mov    0x30(%rsp),%r12d
  sub    %r9d,%r12d
  mov    %r12d,0x20(%rsp)
  cmp    0x18(%rsp),%r9d
  je     L558
  mov    0x10(%rsp),%r10
  mov    0xb8(%rsp),%r12
  movaps %xmm1,%xmm2
  shufps $0xe0,%xmm2,%xmm2
  add    %r9,%r10
  lea    -0x4(%r12,%r10,4),%r10
  mov    0x48(%rsp),%r12
  lea    0x1(%r12,%r9,1),%r9
  mov    0x50(%rsp),%r12
  shl    $0x2,%r9
  sub    (%rsp),%r9
  movq   (%r12,%r9,1),%xmm0
  mulps  %xmm2,%xmm0
  movq   (%r10),%xmm2
  addps  %xmm2,%xmm0
  movlps %xmm0,(%r10)
  mov    0x20(%rsp),%r10d
  mov    %r10d,%r9d
  and    $0xfffffffe,%r9d
  add    %r9d,%r8d
  add    %r9d,%edi
  cmp    %r9d,%r10d
  je     L419
L558:
  movslq %edi,%rdi
  movslq %r8d,%r8
  mulss  0x4(%rbp,%r8,4),%xmm1
  lea    (%rbx,%rdi,4),%rdi
  addss  (%rdi),%xmm1
  movss  %xmm1,(%rdi)
  jmp    L419
L261:
  ucomiss %xmm3,%xmm1
  jp     L404
  je     L419
L404:
  mulss  %xmm4,%xmm1
  mulss  %xmm6,%xmm1
  addss  %xmm5,%xmm1
  movss  %xmm1,(%r11)
  jmp    L419
L159:
  mov    0xc(%rsp),%r9d
  mov    %esi,%r8d
  jmp    L449
L302:
  mulss  %xmm4,%xmm1
  mov    %r13,%rsi
  mov    %r9,%rax
  mov    %r14d,%ecx
  mulss  %xmm1,%xmm6
  addss  %xmm6,%xmm2
  movss  %xmm2,-0x4(%r9,%r10,1)
  nopw   0x0(%rax,%rax,1)
L587:
  movss  (%rsi),%xmm0
  add    $0x1,%ecx
  add    %r12,%rsi
  mulss  %xmm1,%xmm0
  addss  -0x4(%rax),%xmm0
  movss  %xmm0,-0x4(%rax)
  add    %rdi,%rax
  cmp    %r11d,%ecx
  jne    L587
  jmp    L547
L476:
  lea    0x1(%rsi),%edi
  mov    0x28(%rsp),%r9
  mov    0x68(%rsp),%r8
  movslq %edi,%rdi
  add    0x10(%rsp),%r8
  nopw   0x0(%rax,%rax,1)
L173:
  movss  (%r9,%rdi,4),%xmm0
  mov    0xb8(%rsp),%r10
  mulss  %xmm1,%xmm0
  addss  -0x8(%r10,%rdi,4),%xmm0
  movss  %xmm0,-0x8(%r10,%rdi,4)
  add    $0x1,%rdi
  cmp    %rdi,%r8
  jne    L173
  jmp    L419
L376:
  xor    %eax,%eax
  jmp    L525
L479:
  ucomiss %xmm3,%xmm1
  jp     L442
  je     L547
L442:
  mulss  %xmm4,%xmm1
  mulss  %xmm6,%xmm1
  movaps %xmm1,%xmm0
  addss  %xmm2,%xmm0
  movss  %xmm0,-0x4(%r9,%r10,1)
  jmp    L547
L428:
  mov    0xc(%rsp),%r8d
  xor    %r9d,%r9d
  jmp    L233
```

tool_calls: name: retrieve_data
arguments: data_tag: D47
type_infered: byte[16]
name: retrieve_data
arguments: data_tag: D5
type_infered: f32

tool: {"D47": [0x00,0x00,0x00,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00]}

tool: D5: 1

assistant: ```c
int h12(int mode, int *lpivot, int *l1, int m, float *u, int *iue, float *up, float *c__, int *ice, int *icv, int *ncv) {
  int u_dim1, u_offset, idx1, idx2;
  float d, d2;
  int incr;
  float b;
  int i__, j;
  float clinv;
  int i2, i3, i4;
  float cl, sm;
  u_dim1 = *iue;
  u_offset = u_dim1 + 1;
  u -= u_offset;
  --c__;
  if (0 >= *lpivot || *lpivot >= *l1 || *l1 > m) {
    return 0;
  }
  cl = (d = u[*lpivot * u_dim1 + 1], ((d) >= 0 ? (d) : -(d)));
  if (mode == 2) {
    goto L60;
  }
  idx1 = m;
  for (j = *l1; j <= idx1; ++j) {
    d2 = (d = u[j * u_dim1 + 1], ((d) >= 0 ? (d) : -(d)));
    cl = ((d2) >= (cl) ? (d2) : (cl));
  }
  if (cl <= 0.) {
    goto L130;
  } else {
    goto L20;
  }
L20:
  clinv = 1. / cl;
  d = u[*lpivot * u_dim1 + 1] * clinv;
  sm = d * d;
  idx1 = m;
  for (j = *l1; j <= idx1; ++j) {
    d = u[j * u_dim1 + 1] * clinv;
    sm += d * d;
  }
  cl *= sqrt(sm);
  if (u[*lpivot * u_dim1 + 1] <= 0.) {
    goto L50;
  } else {
    goto L40;
  }
L40:
  cl = -cl;
L50:
  *up = u[*lpivot * u_dim1 + 1] - cl;
  u[*lpivot * u_dim1 + 1] = cl;
  goto L70;
L60:
  if (cl <= 0.) {
    goto L130;
  } else {
    goto L70;
  }
L70:
  if (*ncv <= 0) {
    return 0;
  }
  b = *up * u[*lpivot * u_dim1 + 1];
  if (b >= 0.) {
    goto L130;
  } else {
    goto L80;
  }
L80:
  b = 1. / b;
  i2 = 1 - *icv + *ice * (*lpivot - 1);
  incr = *ice * (*l1 - *lpivot);
  idx1 = *ncv;
  for (j = 1; j <= idx1; ++j) {
    i2 += *icv;
    i3 = i2 + incr;
    i4 = i3;
    sm = c__[i2] * *up;
    idx2 = m;
    for (i__ = *l1; i__ <= idx2; ++i__) {
      sm += c__[i3] * u[i__ * u_dim1 + 1];
      i3 += *ice;
    }
    if (sm != 0.) {
      goto L100;
    } else {
      goto L120;
    }
  L100:
    sm *= b;
    c__[i2] += sm * *up;
    idx2 = m;
    for (i__ = *l1; i__ <= idx2; ++i__) {
      c__[i4] += sm * u[i__ * u_dim1 + 1];
      i4 += *ice;
    }
  L120:;
  }
L130:
  return 0;
}
```