user: 请显示与下面列出的汇编代码相匹配的C语言实现：

```asm
<h12>:
  endbr64
  mov    (%rsi),%eax
  test   %eax,%eax
  jle    L15
  push   %r15
  mov    %rdx,%r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  mov    %ecx,%ebx
  sub    $0x18,%rsp
  mov    (%rdx),%ecx
  cmp    %ebx,%ecx
  jg     L157
  cmp    %ecx,%eax
  jge    L157
  mov    (%r9),%r13d
  pxor   %xmm4,%xmm4
  mov    %rsi,%r14
  imul   %r13d,%eax
  lea    0x1(%r13),%ebp
  movslq %ebp,%rbp
  shl    $0x2,%rbp
  sub    %rbp,%r8
  cltq
  movss  0x4(%r8,%rax,4),%xmm0
  mov    %r8,%r12
  comiss %xmm4,%xmm0
  movaps %xmm0,%xmm1
  jb     L138
L82:
  cmp    $0x2,%edi
  je     L222
  mov    %ecx,%eax
  lea    -0x4(%rbp),%rdi
  movss  D48(%rip),%xmm5
  imul   %r13d,%eax
  cltq
  lea    0x4(%r12,%rax,4),%rsi
  mov    %ecx,%eax
  mov    %rsi,%rdx
  xchg   %ax,%ax
L81:
  movss  (%rdx),%xmm3
  comiss %xmm4,%xmm3
  jae    L92
  xorps  %xmm5,%xmm3
L92:
  movaps %xmm1,%xmm2
  add    $0x1,%eax
  add    %rdi,%rdx
  cmpnless %xmm3,%xmm2
  andps  %xmm2,%xmm1
  andnps %xmm3,%xmm2
  orps   %xmm2,%xmm1
  cmp    %eax,%ebx
  jge    L81
  comiss %xmm1,%xmm4
  jae    L157
  movss  D11(%rip),%xmm3
  divss  %xmm1,%xmm3
  mulss  %xmm3,%xmm0
  mulss  %xmm0,%xmm0
  nopl   0x0(%rax)
L136:
  movss  (%rsi),%xmm2
  add    $0x1,%ecx
  add    %rdi,%rsi
  mulss  %xmm3,%xmm2
  mulss  %xmm2,%xmm2
  addss  %xmm2,%xmm0
  cmp    %ecx,%ebx
  jge    L136
  movss  %xmm1,0xc(%rsp)
  call   <sqrt@plt>
  mov    (%r14),%eax
  movss  0xc(%rsp),%xmm1
  pxor   %xmm4,%xmm4
  imul   %r13d,%eax
  mulss  %xmm0,%xmm1
  cltq
  lea    0x4(%r12,%rax,4),%rax
  movss  (%rax),%xmm0
  comiss %xmm0,%xmm4
  jae    L97
  xorps  D48(%rip),%xmm1
L97:
  subss  %xmm1,%xmm0
  mov    0x50(%rsp),%rsi
  movss  %xmm0,(%rsi)
  movss  %xmm1,(%rax)
L12:
  mov    0x70(%rsp),%rax
  mov    (%rax),%r11d
  test   %r11d,%r11d
  jle    L157
  mov    0x50(%rsp),%rax
  movss  (%rax),%xmm2
  mov    (%r14),%eax
  mov    %eax,%edx
  imul   %r13d,%edx
  movslq %edx,%rdx
  movss  0x4(%r12,%rdx,4),%xmm0
  mulss  %xmm2,%xmm0
  comiss %xmm4,%xmm0
  jae    L157
  mov    0x68(%rsp),%rdx
  mov    (%r15),%r9d
  add    $0x1,%r11d
  sub    $0x4,%rbp
  movss  D11(%rip),%xmm5
  mov    0x58(%rsp),%rcx
  lea    0x1(%rbx),%edi
  movslq (%rdx),%rsi
  mov    0x60(%rsp),%rdx
  mov    %r9d,%r10d
  imul   %r9d,%r13d
  divss  %xmm0,%xmm5
  sub    %eax,%r10d
  sub    $0x1,%eax
  movslq (%rdx),%rdx
  lea    0x0(,%rsi,4),%r14
  imul   %edx,%eax
  imul   %edx,%r10d
  sub    %esi,%eax
  movslq %r10d,%r10
  add    $0x1,%eax
  add    %r10,%rsi
  cltq
  neg    %r10
  add    %rsi,%rax
  shl    $0x2,%r10
  lea    0x0(,%rdx,4),%rsi
  lea    (%rcx,%rax,4),%r8
  movslq %r13d,%rax
  lea    0x4(%r12,%rax,4),%r13
  mov    $0x1,%r12d
L117:
  movss  -0x4(%r8,%r10,1),%xmm3
  movaps %xmm3,%xmm1
  mulss  %xmm2,%xmm1
  cmp    %ebx,%r9d
  jg     L7
  mov    %r13,%rcx
  mov    %r8,%rdx
  mov    %r9d,%eax
L214:
  movss  -0x4(%rdx),%xmm0
  mulss  (%rcx),%xmm0
  add    $0x1,%eax
  add    %rsi,%rdx
  add    %rbp,%rcx
  addss  %xmm0,%xmm1
  cmp    %edi,%eax
  jne    L214
  ucomiss %xmm4,%xmm1
  jp     L34
  jne    L34
L63:
  add    $0x1,%r12d
  add    %r14,%r8
  cmp    %r11d,%r12d
  je     L157
  mov    0x50(%rsp),%rax
  movss  (%rax),%xmm2
  jmp    L117
  nopl   0x0(%rax,%rax,1)
L222:
  comiss %xmm1,%xmm4
  jb     L12
L157:
  add    $0x18,%rsp
  xor    %eax,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopw   0x0(%rax,%rax,1)
L15:
  xor    %eax,%eax
  ret
  nopl   0x0(%rax,%rax,1)
L138:
  xorps  D48(%rip),%xmm1
  jmp    L82
  nopl   0x0(%rax)
L34:
  mulss  %xmm5,%xmm1
  mov    %r13,%rcx
  mov    %r8,%rax
  mov    %r9d,%edx
  mulss  %xmm1,%xmm2
  addss  %xmm3,%xmm2
  movss  %xmm2,-0x4(%r8,%r10,1)
  nopl   0x0(%rax)
L55:
  movss  (%rcx),%xmm0
  add    $0x1,%edx
  add    %rbp,%rcx
  mulss  %xmm1,%xmm0
  addss  -0x4(%rax),%xmm0
  movss  %xmm0,-0x4(%rax)
  add    %rsi,%rax
  cmp    %edi,%edx
  jne    L55
  jmp    L63
  nopl   0x0(%rax)
L7:
  ucomiss %xmm4,%xmm1
  jp     L20
  je     L63
L20:
  mulss  %xmm5,%xmm1
  mulss  %xmm2,%xmm1
  addss  %xmm3,%xmm1
  movss  %xmm1,-0x4(%r8,%r10,1)
  jmp    L63
```

tool_calls: name: parse_data
arguments: data_label: D48
data_type: byte[16]
name: parse_data
arguments: data_label: D11
data_type: f32

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

tool: D11: 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;
}
```