user: Converte this assembly snippet into its equivalent C code:

```asm
<main>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x20,%rsp
  mov    $0x5,%esi
  mov    $0x1,%edi
  call   <vector@plt>
  mov    %rax,-0x18(%rbp)
  mov    $0x5,%esi
  mov    $0x1,%edi
  call   <vector@plt>
  mov    %rax,-0x10(%rbp)
  mov    $0x5,%ecx
  mov    $0x1,%edx
  mov    $0x5,%esi
  mov    $0x1,%edi
  call   <matrix@plt>
  mov    %rax,-0x8(%rbp)
  movl   $0x1,-0x20(%rbp)
  jmp    L32
L138:
  movl   $0x1,-0x1c(%rbp)
  jmp    L184
L47:
  mov    -0x20(%rbp),%eax
  and    $0x1,%eax
  test   %eax,%eax
  je     L114
  mov    -0x1c(%rbp),%eax
  and    $0x1,%eax
  test   %eax,%eax
  jne    L114
  movss  D98(%rip),%xmm0
  jmp    L66
L114:
  movss  D38(%rip),%xmm0
L66:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x1c(%rbp),%eax
  cltq
  shl    $0x2,%rax
  add    %rdx,%rax
  movss  %xmm0,(%rax)
  addl   $0x1,-0x1c(%rbp)
L184:
  cmpl   $0x5,-0x1c(%rbp)
  jle    L47
  addl   $0x1,-0x20(%rbp)
L32:
  cmpl   $0x5,-0x20(%rbp)
  jle    L138
  movl   $0x1,-0x20(%rbp)
  jmp    L208
L131:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x20(%rbp),%edx
  movslq %edx,%rdx
  lea    0x0(,%rdx,4),%rcx
  mov    -0x10(%rbp),%rdx
  add    %rcx,%rdx
  movss  (%rax),%xmm0
  movss  %xmm0,(%rdx)
  movl   $0x1,-0x1c(%rbp)
  jmp    L4
L14:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x1c(%rbp),%eax
  cltq
  shl    $0x2,%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  movd   %eax,%xmm0
  call   <fabs@plt>
  mov    %rax,%rdx
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rcx
  mov    -0x10(%rbp),%rax
  add    %rcx,%rax
  movss  (%rax),%xmm1
  pxor   %xmm0,%xmm0
  cvtsi2ss %rdx,%xmm0
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x10(%rbp),%rax
  add    %rdx,%rax
  addss  %xmm1,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x1c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x20(%rbp),%eax
  cltq
  shl    $0x2,%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  movd   %eax,%xmm0
  call   <fabs@plt>
  mov    %rax,%rdx
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rcx
  mov    -0x18(%rbp),%rax
  add    %rcx,%rax
  movss  (%rax),%xmm1
  pxor   %xmm0,%xmm0
  cvtsi2ss %rdx,%xmm0
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  addss  %xmm1,%xmm0
  movss  %xmm0,(%rax)
  addl   $0x1,-0x1c(%rbp)
L4:
  cmpl   $0x5,-0x1c(%rbp)
  jle    L14
  addl   $0x1,-0x20(%rbp)
L208:
  cmpl   $0x5,-0x20(%rbp)
  jle    L131
  lea    D43(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  movl   $0x1,-0x20(%rbp)
  jmp    L178
L215:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x10(%rbp),%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  pxor   %xmm2,%xmm2
  cvtss2sd %xmm0,%xmm2
  movq   %xmm2,%rax
  movq   %rax,%xmm0
  lea    D24(%rip),%rax
  mov    %rax,%rdi
  mov    $0x1,%eax
  call   <printf@plt>
  addl   $0x1,-0x20(%rbp)
L178:
  cmpl   $0x5,-0x20(%rbp)
  jle    L215
  lea    D83(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  movl   $0x1,-0x20(%rbp)
  jmp    L15
L52:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  pxor   %xmm3,%xmm3
  cvtss2sd %xmm0,%xmm3
  movq   %xmm3,%rax
  movq   %rax,%xmm0
  lea    D24(%rip),%rax
  mov    %rax,%rdi
  mov    $0x1,%eax
  call   <printf@plt>
  addl   $0x1,-0x20(%rbp)
L15:
  cmpl   $0x5,-0x20(%rbp)
  jle    L52
  lea    D85(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  mov    -0x8(%rbp),%rax
  mov    $0x5,%esi
  mov    %rax,%rdi
  call   <balanc@plt>
  movl   $0x1,-0x20(%rbp)
  jmp    L219
L116:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x20(%rbp),%edx
  movslq %edx,%rdx
  lea    0x0(,%rdx,4),%rcx
  mov    -0x10(%rbp),%rdx
  add    %rcx,%rdx
  movss  (%rax),%xmm0
  movss  %xmm0,(%rdx)
  movl   $0x1,-0x1c(%rbp)
  jmp    L51
L203:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x1c(%rbp),%eax
  cltq
  shl    $0x2,%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  movd   %eax,%xmm0
  call   <fabs@plt>
  mov    %rax,%rdx
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rcx
  mov    -0x10(%rbp),%rax
  add    %rcx,%rax
  movss  (%rax),%xmm1
  pxor   %xmm0,%xmm0
  cvtsi2ss %rdx,%xmm0
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x10(%rbp),%rax
  add    %rdx,%rax
  addss  %xmm1,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x1c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x20(%rbp),%eax
  cltq
  shl    $0x2,%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  movd   %eax,%xmm0
  call   <fabs@plt>
  mov    %rax,%rdx
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rcx
  mov    -0x18(%rbp),%rax
  add    %rcx,%rax
  movss  (%rax),%xmm1
  pxor   %xmm0,%xmm0
  cvtsi2ss %rdx,%xmm0
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  addss  %xmm1,%xmm0
  movss  %xmm0,(%rax)
  addl   $0x1,-0x1c(%rbp)
L51:
  cmpl   $0x5,-0x1c(%rbp)
  jle    L203
  addl   $0x1,-0x20(%rbp)
L219:
  cmpl   $0x5,-0x20(%rbp)
  jle    L116
  lea    D43(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  movl   $0x1,-0x20(%rbp)
  jmp    L100
L209:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x10(%rbp),%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  pxor   %xmm4,%xmm4
  cvtss2sd %xmm0,%xmm4
  movq   %xmm4,%rax
  movq   %rax,%xmm0
  lea    D24(%rip),%rax
  mov    %rax,%rdi
  mov    $0x1,%eax
  call   <printf@plt>
  addl   $0x1,-0x20(%rbp)
L100:
  cmpl   $0x5,-0x20(%rbp)
  jle    L209
  lea    D83(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  movl   $0x1,-0x20(%rbp)
  jmp    L121
L45:
  mov    -0x20(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  movss  (%rax),%xmm0
  pxor   %xmm5,%xmm5
  cvtss2sd %xmm0,%xmm5
  movq   %xmm5,%rax
  movq   %rax,%xmm0
  lea    D24(%rip),%rax
  mov    %rax,%rdi
  mov    $0x1,%eax
  call   <printf@plt>
  addl   $0x1,-0x20(%rbp)
L121:
  cmpl   $0x5,-0x20(%rbp)
  jle    L45
  mov    $0xa,%edi
  call   <putchar@plt>
  mov    -0x8(%rbp),%rax
  mov    $0x5,%r8d
  mov    $0x1,%ecx
  mov    $0x5,%edx
  mov    $0x1,%esi
  mov    %rax,%rdi
  call   <free_matrix@plt>
  mov    -0x10(%rbp),%rax
  mov    $0x5,%edx
  mov    $0x1,%esi
  mov    %rax,%rdi
  call   <free_vector@plt>
  mov    -0x18(%rbp),%rax
  mov    $0x5,%edx
  mov    $0x1,%esi
  mov    %rax,%rdi
  call   <free_vector@plt>
  mov    $0x0,%eax
  leave
  ret
```

tool_calls: name: unpack_data
arguments: data_label: D98
type_guessed: f32
name: unpack_data
arguments: data_label: D38
type_guessed: f32
name: unpack_data
arguments: data_label: D43
type_guessed: string
name: unpack_data
arguments: data_label: D24
type_guessed: string
name: unpack_data
arguments: data_label: D83
type_guessed: string
name: unpack_data
arguments: data_label: D85
type_guessed: string

tool: D98: 100

tool: D38: 1

tool: D43: rows:

tool: D24: %12.2f

tool: D83: 
columns:

tool: D85: 

***** Balancing matrix *****


assistant: ```c
int main(void) {
  int i, j;
  float *c, *r, **a;
  c = vector(1, 5);
  r = vector(1, 5);
  a = matrix(1, 5, 1, 5);
  for (i = 1; i <= 5; i++)
    for (j = 1; j <= 5; j++)
      a[i][j] = (((i & 1) && !(j & 1)) ? 100.0 : 1.0);
  for (i = 1; i <= 5; i++) {
    r[i] = c[i] = 0.0;
    for (j = 1; j <= 5; j++) {
      r[i] += fabs(a[i][j]);
      c[i] += fabs(a[j][i]);
    }
  }
  printf("rows:\n");
  for (i = 1; i <= 5; i++)
    printf("%12.2f", r[i]);
  printf("\ncolumns:\n");
  for (i = 1; i <= 5; i++)
    printf("%12.2f", c[i]);
  printf("\n\n***** Balancing matrix *****\n\n");
  balanc(a, 5);
  for (i = 1; i <= 5; i++) {
    r[i] = c[i] = 0.0;
    for (j = 1; j <= 5; j++) {
      r[i] += fabs(a[i][j]);
      c[i] += fabs(a[j][i]);
    }
  }
  printf("rows:\n");
  for (i = 1; i <= 5; i++)
    printf("%12.2f", r[i]);
  printf("\ncolumns:\n");
  for (i = 1; i <= 5; i++)
    printf("%12.2f", c[i]);
  printf("\n");
  free_matrix(a, 1, 5, 1, 5);
  free_vector(r, 1, 5);
  free_vector(c, 1, 5);
  return 0;
}
```