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

```asm
<get_Delaunay_shortest_vectors>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %rbx
  sub    $0x148,%rsp
  mov    %rdi,-0x148(%rbp)
  movsd  %xmm0,-0x150(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x18(%rbp)
  xor    %eax,%eax
  movl   $0x0,-0x138(%rbp)
  jmp    L90
L46:
  movl   $0x0,-0x134(%rbp)
  jmp    L116
L238:
  mov    -0x138(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,%rdx
  mov    -0x148(%rbp),%rax
  add    %rax,%rdx
  mov    -0x134(%rbp),%eax
  cltq
  movsd  (%rdx,%rax,8),%xmm0
  mov    -0x134(%rbp),%eax
  movslq %eax,%rcx
  mov    -0x138(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  add    %rcx,%rax
  movsd  %xmm0,-0xc0(%rbp,%rax,8)
  addl   $0x1,-0x134(%rbp)
L116:
  cmpl   $0x2,-0x134(%rbp)
  jle    L238
  addl   $0x1,-0x138(%rbp)
L90:
  cmpl   $0x3,-0x138(%rbp)
  jle    L46
  movl   $0x0,-0x138(%rbp)
  jmp    L154
L121:
  mov    -0x148(%rbp),%rax
  mov    -0x138(%rbp),%edx
  movslq %edx,%rdx
  movsd  (%rax,%rdx,8),%xmm1
  mov    -0x148(%rbp),%rax
  lea    0x18(%rax),%rdx
  mov    -0x138(%rbp),%eax
  cltq
  movsd  (%rdx,%rax,8),%xmm0
  addsd  %xmm1,%xmm0
  mov    -0x138(%rbp),%eax
  cltq
  add    $0xc,%rax
  movsd  %xmm0,-0xc0(%rbp,%rax,8)
  addl   $0x1,-0x138(%rbp)
L154:
  cmpl   $0x2,-0x138(%rbp)
  jle    L121
  movl   $0x0,-0x138(%rbp)
  jmp    L211
L57:
  mov    -0x148(%rbp),%rax
  lea    0x18(%rax),%rdx
  mov    -0x138(%rbp),%eax
  cltq
  movsd  (%rdx,%rax,8),%xmm1
  mov    -0x148(%rbp),%rax
  lea    0x30(%rax),%rdx
  mov    -0x138(%rbp),%eax
  cltq
  movsd  (%rdx,%rax,8),%xmm0
  addsd  %xmm1,%xmm0
  mov    -0x138(%rbp),%eax
  cltq
  add    $0xf,%rax
  movsd  %xmm0,-0xc0(%rbp,%rax,8)
  addl   $0x1,-0x138(%rbp)
L211:
  cmpl   $0x2,-0x138(%rbp)
  jle    L57
  movl   $0x0,-0x138(%rbp)
  jmp    L28
L61:
  mov    -0x148(%rbp),%rax
  lea    0x30(%rax),%rdx
  mov    -0x138(%rbp),%eax
  cltq
  movsd  (%rdx,%rax,8),%xmm1
  mov    -0x148(%rbp),%rax
  mov    -0x138(%rbp),%edx
  movslq %edx,%rdx
  movsd  (%rax,%rdx,8),%xmm0
  addsd  %xmm1,%xmm0
  mov    -0x138(%rbp),%eax
  cltq
  add    $0x12,%rax
  movsd  %xmm0,-0xc0(%rbp,%rax,8)
  addl   $0x1,-0x138(%rbp)
L28:
  cmpl   $0x2,-0x138(%rbp)
  jle    L61
  movl   $0x0,-0x138(%rbp)
  jmp    L226
L76:
  movl   $0x0,-0x134(%rbp)
  jmp    L205
L9:
  lea    -0xc0(%rbp),%rcx
  mov    -0x134(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  add    %rcx,%rax
  mov    %rax,%rdi
  call   <mat_norm_squared_d3@plt>
  mov    %rax,%rbx
  mov    -0x134(%rbp),%eax
  add    $0x1,%eax
  lea    -0xc0(%rbp),%rcx
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  add    %rcx,%rax
  mov    %rax,%rdi
  call   <mat_norm_squared_d3@plt>
  cmp    %rax,%rbx
  jle    L19
  lea    -0xc0(%rbp),%rcx
  mov    -0x134(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  lea    (%rcx,%rax,1),%rdx
  lea    -0x130(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <mat_copy_vector_d3@plt>
  mov    -0x134(%rbp),%eax
  add    $0x1,%eax
  lea    -0xc0(%rbp),%rcx
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  lea    (%rcx,%rax,1),%rdx
  lea    -0xc0(%rbp),%rsi
  mov    -0x134(%rbp),%eax
  movslq %eax,%rcx
  mov    %rcx,%rax
  add    %rax,%rax
  add    %rcx,%rax
  shl    $0x3,%rax
  add    %rsi,%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <mat_copy_vector_d3@plt>
  mov    -0x134(%rbp),%eax
  add    $0x1,%eax
  lea    -0xc0(%rbp),%rcx
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  lea    (%rcx,%rax,1),%rdx
  lea    -0x130(%rbp),%rax
  mov    %rax,%rsi
  mov    %rdx,%rdi
  call   <mat_copy_vector_d3@plt>
L19:
  addl   $0x1,-0x134(%rbp)
L205:
  cmpl   $0x5,-0x134(%rbp)
  jle    L9
  addl   $0x1,-0x138(%rbp)
L226:
  cmpl   $0x5,-0x138(%rbp)
  jle    L76
  movl   $0x2,-0x138(%rbp)
  jmp    L78
L131:
  movl   $0x0,-0x134(%rbp)
  jmp    L124
L233:
  mov    -0x134(%rbp),%eax
  cltq
  movsd  -0xc0(%rbp,%rax,8),%xmm0
  mov    -0x134(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  lea    -0x10(%rax),%rax
  add    %rbp,%rax
  sub    $0x100,%rax
  movsd  %xmm0,(%rax)
  mov    -0x134(%rbp),%eax
  cltq
  add    $0x3,%rax
  movsd  -0xc0(%rbp,%rax,8),%xmm0
  mov    -0x134(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  lea    -0x10(%rax),%rax
  add    %rbp,%rax
  sub    $0xf8,%rax
  movsd  %xmm0,(%rax)
  mov    -0x134(%rbp),%eax
  movslq %eax,%rcx
  mov    -0x138(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  add    %rcx,%rax
  movsd  -0xc0(%rbp,%rax,8),%xmm0
  mov    -0x134(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  lea    -0x10(%rax),%rax
  add    %rbp,%rax
  sub    $0xf0,%rax
  movsd  %xmm0,(%rax)
  addl   $0x1,-0x134(%rbp)
L124:
  cmpl   $0x2,-0x134(%rbp)
  jle    L233
  lea    -0x110(%rbp),%rax
  mov    %rax,%rdi
  call   <mat_get_determinant_d3@plt>
  mov    %eax,%edi
  call   <mat_Dabs@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm2
  comisd -0x150(%rbp),%xmm2
  jbe    L34
  movl   $0x0,-0x134(%rbp)
  jmp    L206
L220:
  mov    -0x134(%rbp),%eax
  cltq
  movsd  -0xc0(%rbp,%rax,8),%xmm0
  mov    -0x148(%rbp),%rax
  mov    -0x134(%rbp),%edx
  movslq %edx,%rdx
  movsd  %xmm0,(%rax,%rdx,8)
  mov    -0x148(%rbp),%rax
  lea    0x18(%rax),%rdx
  mov    -0x134(%rbp),%eax
  cltq
  add    $0x3,%rax
  movsd  -0xc0(%rbp,%rax,8),%xmm0
  mov    -0x134(%rbp),%eax
  cltq
  movsd  %xmm0,(%rdx,%rax,8)
  mov    -0x148(%rbp),%rax
  lea    0x30(%rax),%rcx
  mov    -0x134(%rbp),%eax
  movslq %eax,%rsi
  mov    -0x138(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  add    %rax,%rax
  add    %rdx,%rax
  add    %rsi,%rax
  movsd  -0xc0(%rbp,%rax,8),%xmm0
  mov    -0x134(%rbp),%eax
  cltq
  movsd  %xmm0,(%rcx,%rax,8)
  addl   $0x1,-0x134(%rbp)
L206:
  cmpl   $0x2,-0x134(%rbp)
  jle    L220
  jmp    L234
L34:
  addl   $0x1,-0x138(%rbp)
L78:
  cmpl   $0x6,-0x138(%rbp)
  jle    L131
L234:
  nop
  mov    -0x18(%rbp),%rax
  sub    %fs:0x28,%rax
  je     L180
  call   <__stack_chk_fail@plt>
L180:
  mov    -0x8(%rbp),%rbx
  leave
  ret
```

assistant: ```c
void get_Delaunay_shortest_vectors(double basis[4][3], const double symprec) {
  int i, j;
  double tmpmat[3][3], b[7][3], tmpvec[3];
  for (i = 0; i < 4; i++) {
    for (j = 0; j < 3; j++) {
      b[i][j] = basis[i][j];
    }
  }
  for (i = 0; i < 3; i++) {
    b[4][i] = basis[0][i] + basis[1][i];
  }
  for (i = 0; i < 3; i++) {
    b[5][i] = basis[1][i] + basis[2][i];
  }
  for (i = 0; i < 3; i++) {
    b[6][i] = basis[2][i] + basis[0][i];
  }
  for (i = 0; i < 6; i++) {
    for (j = 0; j < 6; j++) {
      if (mat_norm_squared_d3(b[j]) > mat_norm_squared_d3(b[j + 1])) {
        mat_copy_vector_d3(tmpvec, b[j]);
        mat_copy_vector_d3(b[j], b[j + 1]);
        mat_copy_vector_d3(b[j + 1], tmpvec);
      }
    }
  }
  for (i = 2; i < 7; i++) {
    for (j = 0; j < 3; j++) {
      tmpmat[j][0] = b[0][j];
      tmpmat[j][1] = b[1][j];
      tmpmat[j][2] = b[i][j];
    }
    if (mat_Dabs(mat_get_determinant_d3(tmpmat)) > symprec) {
      for (j = 0; j < 3; j++) {
        basis[0][j] = b[0][j];
        basis[1][j] = b[1][j];
        basis[2][j] = b[i][j];
      }
      break;
    }
  }
}
```