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

```asm
<testa_cholesky>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x18,%rsp
  mov    %edi,%ebx
  mov    %rsi,%rbp
  mov    %rdx,%r12
  mov    %ecx,%r13d
  mov    %r8d,%r14d
  mov    %r9d,%r15d
  mov    $0x0,%eax
  call   <tempo_em_microsegundos@plt>
  mov    %rax,(%rsp)
  test   %r13d,%r13d
  jne    L107
  mov    %rbp,%rsi
  mov    %ebx,%edi
  call   <cholrow@plt>
  cmp    $0xffffffff,%eax
  je     L65
  mov    $0x0,%eax
  call   <tempo_em_microsegundos@plt>
  mov    %rax,%r13
  mov    %r12,%rdx
  mov    %rbp,%rsi
  mov    %ebx,%edi
  call   <forwrow@plt>
  cmp    $0xffffffff,%eax
  je     L65
  mov    $0x0,%eax
  call   <tempo_em_microsegundos@plt>
  mov    %rax,0x8(%rsp)
  mov    $0x1,%ecx
  mov    %r12,%rdx
  mov    %rbp,%rsi
  mov    %ebx,%edi
  call   <backrow@plt>
  cmp    $0xffffffff,%eax
  je     L65
L1:
  mov    $0x0,%eax
  call   <tempo_em_microsegundos@plt>
  test   %r15d,%r15d
  jne    L61
L3:
  mov    $0x0,%eax
  cmp    $0x1,%r14d
  je     L100
L65:
  add    $0x18,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L107:
  mov    %rbp,%rsi
  mov    %ebx,%edi
  call   <cholcol@plt>
  cmp    $0xffffffff,%eax
  je     L65
  mov    $0x0,%eax
  call   <tempo_em_microsegundos@plt>
  mov    %rax,%r13
  mov    %r12,%rdx
  mov    %rbp,%rsi
  mov    %ebx,%edi
  call   <forwcol@plt>
  cmp    $0xffffffff,%eax
  je     L65
  mov    $0x0,%eax
  call   <tempo_em_microsegundos@plt>
  mov    %rax,0x8(%rsp)
  mov    $0x1,%ecx
  mov    %r12,%rdx
  mov    %rbp,%rsi
  mov    %ebx,%edi
  call   <backcol@plt>
  cmp    $0xffffffff,%eax
  jne    L1
  jmp    L65
L61:
  mov    0x8(%rsp),%r15
  sub    %r15,%rax
  mov    %rax,%rdi
  call   <converte_milisegundo@plt>
  mov    %eax,%ebp
  mov    %r15,%rdi
  sub    %r13,%rdi
  call   <converte_milisegundo@plt>
  mov    %eax,%r15d
  mov    %r13,%rdi
  sub    (%rsp),%rdi
  call   <converte_milisegundo@plt>
  mov    %eax,%esi
  mov    %ebp,%ecx
  mov    %r15d,%edx
  lea    D3(%rip),%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  jmp    L3
L100:
  lea    D1(%rip),%rdi
  call   <puts@plt>
  mov    %r12,%rsi
  mov    %ebx,%edi
  call   <imprime_vetor@plt>
  mov    $0x0,%eax
  jmp    L65
```

tool_calls: name: extract_symbolic_data
arguments: label: D3
data_type: string
name: extract_symbolic_data
arguments: label: D1
data_type: string

tool: D3: | %6.2lf | %.2lf | %.2lf


tool: D1: x eh:

assistant: ```c
int testa_cholesky(int n, double A[][800], double b[], int modo, int imprime_solucao, int imprime_tempo) {
  unsigned long long mark0, mark1, mark2, mark3;
  mark0 = tempo_em_microsegundos();
  if (modo == 0) {
    if (cholrow(n, A) == -1)
      return -1;
  } else {
    if (cholcol(n, A) == -1)
      return -1;
  }
  mark1 = tempo_em_microsegundos();
  if (modo == 0) {
    if (forwrow(n, A, b) == -1)
      return -1;
  } else {
    if (forwcol(n, A, b) == -1)
      return -1;
  }
  mark2 = tempo_em_microsegundos();
  if (modo == 0) {
    if (backrow(n, A, b, 1) == -1)
      return -1;
  } else {
    if (backcol(n, A, b, 1) == -1)
      return -1;
  }
  mark3 = tempo_em_microsegundos();
  if (imprime_tempo) {
    printf("| %6.2lf | %.2lf | %.2lf\n", converte_milisegundo(mark1 - mark0), converte_milisegundo(mark2 - mark1), converte_milisegundo(mark3 - mark2));
  }
  if (imprime_solucao == 1) {
    printf("x eh:\n");
    imprime_vetor(n, b);
  }
  return 0;
}
```