user: 请将这段汇编代码片段转换成等效的C代码：

```asm
<simp2>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  mov    %rdi,-0x28(%rbp)
  mov    %esi,-0x2c(%rbp)
  mov    %edx,-0x30(%rbp)
  mov    %rcx,-0x38(%rbp)
  mov    %r8d,-0x3c(%rbp)
  mov    -0x38(%rbp),%rax
  movl   $0x0,(%rax)
  movl   $0x1,-0x14(%rbp)
  jmp    L157
L98:
  mov    -0x14(%rbp),%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x28(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x3c(%rbp),%eax
  cltq
  add    $0x1,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  pxor   %xmm1,%xmm1
  cvtss2sd %xmm0,%xmm1
  movsd  D40(%rip),%xmm0
  comisd %xmm1,%xmm0
  ja     L187
  addl   $0x1,-0x14(%rbp)
L157:
  mov    -0x14(%rbp),%eax
  cmp    -0x2c(%rbp),%eax
  jle    L98
  jmp    L54
L187:
  nop
L54:
  mov    -0x14(%rbp),%eax
  cmp    -0x2c(%rbp),%eax
  jg     L176
  mov    -0x14(%rbp),%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x28(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rax
  add    $0x4,%rax
  movss  (%rax),%xmm0
  movss  D55(%rip),%xmm1
  xorps  %xmm1,%xmm0
  mov    -0x14(%rbp),%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x28(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x3c(%rbp),%eax
  cltq
  add    $0x1,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  movss  (%rax),%xmm1
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x8(%rbp)
  mov    -0x38(%rbp),%rax
  mov    -0x14(%rbp),%edx
  mov    %edx,(%rax)
  mov    -0x38(%rbp),%rax
  mov    (%rax),%eax
  add    $0x1,%eax
  mov    %eax,-0x14(%rbp)
  jmp    L141
L23:
  mov    -0x14(%rbp),%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x28(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x3c(%rbp),%eax
  cltq
  add    $0x1,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  pxor   %xmm1,%xmm1
  cvtss2sd %xmm0,%xmm1
  movsd  D40(%rip),%xmm0
  comisd %xmm1,%xmm0
  jbe    L164
  mov    -0x14(%rbp),%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x28(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rax
  add    $0x4,%rax
  movss  (%rax),%xmm0
  movss  D55(%rip),%xmm1
  xorps  %xmm1,%xmm0
  mov    -0x14(%rbp),%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x28(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x3c(%rbp),%eax
  cltq
  add    $0x1,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  movss  (%rax),%xmm1
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x4(%rbp)
  movss  -0x8(%rbp),%xmm0
  comiss -0x4(%rbp),%xmm0
  jbe    L93
  mov    -0x38(%rbp),%rax
  mov    -0x14(%rbp),%edx
  mov    %edx,(%rax)
  movss  -0x4(%rbp),%xmm0
  movss  %xmm0,-0x8(%rbp)
  jmp    L164
L93:
  movss  -0x4(%rbp),%xmm0
  ucomiss -0x8(%rbp),%xmm0
  jp     L164
  movss  -0x4(%rbp),%xmm0
  ucomiss -0x8(%rbp),%xmm0
  jne    L164
  movl   $0x1,-0x18(%rbp)
  jmp    L83
L27:
  mov    -0x38(%rbp),%rax
  mov    (%rax),%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x28(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x18(%rbp),%eax
  cltq
  add    $0x1,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  movss  D55(%rip),%xmm1
  xorps  %xmm1,%xmm0
  mov    -0x38(%rbp),%rax
  mov    (%rax),%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x28(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x3c(%rbp),%eax
  cltq
  add    $0x1,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  movss  (%rax),%xmm1
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x10(%rbp)
  mov    -0x14(%rbp),%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x28(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x18(%rbp),%eax
  cltq
  add    $0x1,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  movss  D55(%rip),%xmm1
  xorps  %xmm1,%xmm0
  mov    -0x14(%rbp),%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x28(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x3c(%rbp),%eax
  cltq
  add    $0x1,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  movss  (%rax),%xmm1
  divss  %xmm1,%xmm0
  movss  %xmm0,-0xc(%rbp)
  movss  -0xc(%rbp),%xmm0
  ucomiss -0x10(%rbp),%xmm0
  jp     L159
  movss  -0xc(%rbp),%xmm0
  ucomiss -0x10(%rbp),%xmm0
  je     L37
  jmp    L159
L37:
  addl   $0x1,-0x18(%rbp)
L83:
  mov    -0x18(%rbp),%eax
  cmp    -0x30(%rbp),%eax
  jle    L27
  jmp    L148
L159:
  nop
L148:
  movss  -0x10(%rbp),%xmm0
  comiss -0xc(%rbp),%xmm0
  jbe    L164
  mov    -0x38(%rbp),%rax
  mov    -0x14(%rbp),%edx
  mov    %edx,(%rax)
L164:
  addl   $0x1,-0x14(%rbp)
L141:
  mov    -0x14(%rbp),%eax
  cmp    -0x2c(%rbp),%eax
  jle    L23
  jmp    L121
L176:
  nop
L121:
  pop    %rbp
  ret
```

tool_calls: name: read_data
arguments: data_tag: D40
datatype: byte[8]
name: read_data
arguments: data_tag: D55
datatype: byte[4]

tool: {"D40": [0x8d,0xed,0xb5,0xa0,0xf7,0xc6,0xb0,0xbe]}

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

assistant: ```c
void simp2(float **a, int m, int n, int *ip, int kp) {
  int k, i;
  float qp, q0, q, q1;
  *ip = 0;
  for (i = 1; i <= m; i++)
    if (a[i + 1][kp + 1] < -1.0e-6)
      break;
  if (i > m)
    return;
  q1 = -a[i + 1][1] / a[i + 1][kp + 1];
  *ip = i;
  for (i = *ip + 1; i <= m; i++) {
    if (a[i + 1][kp + 1] < -1.0e-6) {
      q = -a[i + 1][1] / a[i + 1][kp + 1];
      if (q < q1) {
        *ip = i;
        q1 = q;
      } else if (q == q1) {
        for (k = 1; k <= n; k++) {
          qp = -a[*ip + 1][k + 1] / a[*ip + 1][kp + 1];
          q0 = -a[i + 1][k + 1] / a[i + 1][kp + 1];
          if (q0 != qp)
            break;
        }
        if (q0 < qp)
          *ip = i;
      }
    }
  }
}
```