user: What is the c source code of the assembly code below?

```asm
<calcul_exposants_Holder>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x58,%rsp
  mov    %edi,%r14d
  mov    %edi,0x28(%rsp)
  mov    %rsi,%r15
  mov    %rdx,0x38(%rsp)
  mov    %rcx,0x30(%rsp)
  lea    -0x1(%rdi),%ebx
  movslq %ebx,%rbp
  lea    0x0(,%rbp,8),%rdi
  call   <malloc@plt>
  mov    %rax,0x18(%rsp)
  test   %ebx,%ebx
  jle    L69
  mov    %rax,0x40(%rsp)
  lea    -0x2(%r14),%edx
  mov    %rdx,0x20(%rsp)
  lea    0x8(%rax,%rdx,8),%r12
  mov    %r12,0x48(%rsp)
  mov    %rax,%rbx
L146:
  mov    $0x10,%edi
  call   <malloc@plt>
  mov    %rax,(%rbx)
  add    $0x8,%rbx
  cmp    %r12,%rbx
  jne    L146
  movsd  (%r15),%xmm0
  subsd  (%r15,%rbp,8),%xmm0
  movsd  %xmm0,(%rsp)
  mov    $0x0,%r13d
  movl   $0x0,0x2c(%rsp)
  mov    %r13,%r12
  jmp    L128
L92:
  sub    $0x1,%r14d
L61:
  sub    $0x1,%ebx
  je     L78
L131:
  mov    (%r15,%r12,8),%r13
  pxor   %xmm4,%xmm4
  cvtsi2sd %ebx,%xmm4
  movq   %xmm4,%rbp
  movapd %xmm4,%xmm1
  mov    D65(%rip),%rax
  movq   %rax,%xmm0
  call   <pow@plt>
  cvttsd2si %xmm0,%eax
  add    0x8(%rsp),%eax
  cltq
  movq   %r13,%xmm0
  subsd  -0x8(%r15,%rax,8),%xmm0
  divsd  (%rsp),%xmm0
  movsd  D99(%rip),%xmm6
  comisd %xmm0,%xmm6
  ja     L92
  movq   %rbp,%xmm1
  movsd  D65(%rip),%xmm0
  call   <pow@plt>
  mov    %r14d,%eax
  sub    %ebx,%eax
  mov    %eax,0xc(%rsp)
  cltq
  mov    0x18(%rsp),%rcx
  lea    (%rcx,%rax,8),%rbp
  mov    0x0(%rbp),%rsi
  mov    %rsi,0x10(%rsp)
  cvttsd2si %xmm0,%eax
  add    0x8(%rsp),%eax
  cltq
  movq   %r13,%xmm0
  subsd  -0x8(%r15,%rax,8),%xmm0
  divsd  (%rsp),%xmm0
  call   <log@plt>
  mov    0x10(%rsp),%rsi
  movsd  %xmm0,0x8(%rsi)
  mov    0x0(%rbp),%rax
  pxor   %xmm0,%xmm0
  cvtsi2sdl 0xc(%rsp),%xmm0
  mulsd  D51(%rip),%xmm0
  movsd  %xmm0,(%rax)
  jmp    L61
L12:
  mov    %ebx,%r14d
L78:
  cmp    $0x1,%r14d
  jg     L106
L153:
  lea    0x1(%r12),%rax
  cmp    0x20(%rsp),%r12
  je     L26
  mov    %rax,%r12
L128:
  mov    %r12d,0x8(%rsp)
  mov    0x28(%rsp),%eax
  sub    %r12d,%eax
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  call   <log@plt>
  divsd  D33(%rip),%xmm0
  movapd %xmm0,%xmm2
  movsd  D17(%rip),%xmm1
  andpd  %xmm0,%xmm1
  movsd  D70(%rip),%xmm3
  ucomisd %xmm1,%xmm3
  jbe    L103
  cvttsd2si %xmm0,%rax
  pxor   %xmm1,%xmm1
  cvtsi2sd %rax,%xmm1
  movapd %xmm1,%xmm2
  cmpnlesd %xmm0,%xmm2
  movsd  D38(%rip),%xmm3
  andpd  %xmm3,%xmm2
  subsd  %xmm2,%xmm1
  movsd  D17(%rip),%xmm2
  andnpd %xmm0,%xmm2
  orpd   %xmm1,%xmm2
L103:
  cvttsd2si %xmm2,%ebx
  test   %ebx,%ebx
  jle    L12
  mov    %ebx,%r14d
  jmp    L131
L106:
  mov    0x18(%rsp),%rsi
  mov    %r14d,%edi
  mov    $0x0,%eax
  call   <regression_lineaire@plt>
  movslq 0x2c(%rsp),%rdx
  mov    0x30(%rsp),%rdi
  lea    (%rdi,%rdx,8),%rdx
  movsd  D38(%rip),%xmm0
  cmp    $0x1,%eax
  jle    L0
L145:
  movsd  %xmm0,(%rdx)
  addl   $0x1,0x2c(%rsp)
  jmp    L153
L0:
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  jmp    L145
L26:
  mov    0x38(%rsp),%rax
  mov    0x2c(%rsp),%edx
  mov    %edx,(%rax)
  mov    0x40(%rsp),%rbx
  mov    0x48(%rsp),%rbp
L8:
  mov    (%rbx),%rdi
  call   <free@plt>
  add    $0x8,%rbx
  cmp    %rbp,%rbx
  jne    L8
L82:
  mov    0x18(%rsp),%rdi
  call   <free@plt>
  add    $0x58,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L69:
  mov    0x38(%rsp),%rax
  movl   $0x0,(%rax)
  jmp    L82
```

tool_calls: name: extract_symbolic_data
arguments: data_label: D65
type_infered: f64
name: extract_symbolic_data
arguments: data_label: D99
type_infered: f64
name: extract_symbolic_data
arguments: data_label: D51
type_infered: byte[8]
name: extract_symbolic_data
arguments: data_label: D33
type_infered: byte[8]
name: extract_symbolic_data
arguments: data_label: D17
type_infered: byte[8]
name: extract_symbolic_data
arguments: data_label: D70
type_infered: byte[8]
name: extract_symbolic_data
arguments: data_label: D38
type_infered: f64

tool: D65: 2

tool: D99: 1e-06

tool: {"D51": [0xef,0x39,0xfa,0xfe,0x42,0x2e,0xe6,0xbf]}

tool: {"D33": [0xef,0x39,0xfa,0xfe,0x42,0x2e,0xe6,0x3f]}

tool: {"D17": [0xff,0xff,0xff,0xff,0xff,0xff,0xff,0x7f]}

tool: {"D70": [0x00,0x00,0x00,0x00,0x00,0x00,0x30,0x43]}

tool: D38: 1

assistant: ```c
void calcul_exposants_Holder(int nb_dissimilarites, double *historique_dissimilarites, int *nb_exposants_Holder, double *exposants_Holder) {
  int i, j, nb_mesures, compteur_exposants_Holder, nb_exposants_Holder_faibles;
  double **valeurs_pour_regression, mesure_max;
  valeurs_pour_regression = (double **)malloc(sizeof(double *) * (nb_dissimilarites - 1));
  for (i = 0; i < nb_dissimilarites - 1; i++) {
    valeurs_pour_regression[i] = (double *)malloc(sizeof(double) * 2);
  }
  mesure_max = historique_dissimilarites[0] - historique_dissimilarites[nb_dissimilarites - 1];
  compteur_exposants_Holder = 0;
  for (i = 0; i < nb_dissimilarites - 1; i++) {
    nb_mesures = (int)floor(log((double)(nb_dissimilarites - i)) / log(2.0));
    for (j = nb_mesures; j > 0; j--) {
      if (((historique_dissimilarites[i] - historique_dissimilarites[i + (int)pow(2.0, (double)j) - 1]) / mesure_max) < 0.000001) {
        nb_mesures--;
      } else {
        valeurs_pour_regression[nb_mesures - j][1] = log((double)(historique_dissimilarites[i] - historique_dissimilarites[i + (int)pow(2.0, (double)j) - 1]) / mesure_max);
        valeurs_pour_regression[nb_mesures - j][0] = -log(2.0) * (double)(nb_mesures - j);
      }
    }
    if (nb_mesures > 1) {
      exposants_Holder[compteur_exposants_Holder] = regression_lineaire(nb_mesures, valeurs_pour_regression);
      if (exposants_Holder[compteur_exposants_Holder] > 1.0) {
        exposants_Holder[compteur_exposants_Holder] = 1.0;
      }
      compteur_exposants_Holder++;
    }
  }
  *nb_exposants_Holder = compteur_exposants_Holder;
  for (i = 0; i < nb_dissimilarites - 1; i++) {
    free(valeurs_pour_regression[i]);
  }
  free(valeurs_pour_regression);
}
```