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

```asm
<main>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x40,%rsp
  mov    %edi,-0x34(%rbp)
  mov    %rsi,-0x40(%rbp)
  movl   $0x1,-0x28(%rbp)
  cmpl   $0x2,-0x34(%rbp)
  jg     L119
  lea    D28(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  mov    $0x0,%eax
  jmp    L112
L119:
  mov    -0x40(%rbp),%rax
  add    $0x8,%rax
  mov    (%rax),%rax
  mov    %rax,%rdi
  call   <atoi@plt>
  mov    %eax,-0x24(%rbp)
  mov    -0x40(%rbp),%rax
  add    $0x10,%rax
  mov    (%rax),%rax
  mov    %rax,%rdi
  call   <atoi@plt>
  mov    %eax,-0x20(%rbp)
  mov    -0x20(%rbp),%eax
  mov    %eax,%edi
  call   <omp_set_num_threads@plt>
  mov    -0x24(%rbp),%eax
  cltq
  mov    %eax,%edx
  mov    -0x24(%rbp),%eax
  cltq
  imul   %edx,%eax
  shl    $0x3,%eax
  mov    %eax,%edi
  call   <malloc@plt>
  mov    %rax,-0x18(%rbp)
  movl   $0x0,-0x30(%rbp)
  jmp    L207
L267:
  movl   $0x0,-0x2c(%rbp)
  jmp    L266
L89:
  mov    -0x30(%rbp),%eax
  cmp    -0x2c(%rbp),%eax
  jl     L264
  mov    -0x30(%rbp),%eax
  imul   -0x24(%rbp),%eax
  mov    %eax,%edx
  mov    -0x2c(%rbp),%eax
  add    %edx,%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  movsd  D37(%rip),%xmm0
  movsd  %xmm0,(%rax)
  jmp    L201
L264:
  mov    -0x30(%rbp),%eax
  imul   -0x24(%rbp),%eax
  mov    %eax,%edx
  mov    -0x2c(%rbp),%eax
  add    %edx,%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  pxor   %xmm0,%xmm0
  movsd  %xmm0,(%rax)
L201:
  addl   $0x1,-0x2c(%rbp)
L266:
  mov    -0x2c(%rbp),%eax
  cmp    -0x24(%rbp),%eax
  jl     L89
  addl   $0x1,-0x30(%rbp)
L207:
  mov    -0x30(%rbp),%eax
  cmp    -0x24(%rbp),%eax
  jl     L267
  mov    $0x0,%eax
  call   <omp_get_thread_num@plt>
  mov    %eax,-0x1c(%rbp)
  mov    $0x0,%eax
  call   <dwalltime@plt>
  movq   %xmm0,%rax
  mov    %rax,-0x10(%rbp)
  movl   $0x0,-0x30(%rbp)
  jmp    L177
L45:
  mov    -0x30(%rbp),%eax
  add    $0x1,%eax
  mov    %eax,-0x2c(%rbp)
  jmp    L75
L20:
  mov    -0x30(%rbp),%eax
  imul   -0x24(%rbp),%eax
  mov    %eax,%edx
  mov    -0x2c(%rbp),%eax
  add    %edx,%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  movsd  %xmm0,-0x8(%rbp)
  mov    -0x2c(%rbp),%eax
  imul   -0x24(%rbp),%eax
  mov    %eax,%edx
  mov    -0x30(%rbp),%eax
  add    %edx,%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x18(%rbp),%rax
  add    %rax,%rdx
  mov    -0x30(%rbp),%eax
  imul   -0x24(%rbp),%eax
  mov    %eax,%ecx
  mov    -0x2c(%rbp),%eax
  add    %ecx,%eax
  cltq
  lea    0x0(,%rax,8),%rcx
  mov    -0x18(%rbp),%rax
  add    %rcx,%rax
  movsd  (%rdx),%xmm0
  movsd  %xmm0,(%rax)
  mov    -0x2c(%rbp),%eax
  imul   -0x24(%rbp),%eax
  mov    %eax,%edx
  mov    -0x30(%rbp),%eax
  add    %edx,%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  movsd  -0x8(%rbp),%xmm0
  movsd  %xmm0,(%rax)
  addl   $0x1,-0x2c(%rbp)
L75:
  mov    -0x2c(%rbp),%eax
  cmp    -0x24(%rbp),%eax
  jl     L20
  addl   $0x1,-0x30(%rbp)
L177:
  mov    -0x30(%rbp),%eax
  cmp    -0x24(%rbp),%eax
  jl     L45
  mov    $0x0,%eax
  call   <dwalltime@plt>
  movq   %xmm0,%rax
  movq   %rax,%xmm2
  subsd  -0x10(%rbp),%xmm2
  movq   %xmm2,%rdx
  mov    -0x1c(%rbp),%eax
  movq   %rdx,%xmm0
  mov    %eax,%esi
  lea    D39(%rip),%rax
  mov    %rax,%rdi
  mov    $0x1,%eax
  call   <printf@plt>
  movl   $0x0,-0x30(%rbp)
  jmp    L230
L153:
  movl   $0x0,-0x2c(%rbp)
  jmp    L234
L61:
  mov    -0x30(%rbp),%eax
  cmp    -0x2c(%rbp),%eax
  jle    L224
  cmpl   $0x0,-0x28(%rbp)
  je     L100
  mov    -0x30(%rbp),%eax
  imul   -0x24(%rbp),%eax
  mov    %eax,%edx
  mov    -0x2c(%rbp),%eax
  add    %edx,%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  pxor   %xmm1,%xmm1
  ucomisd %xmm1,%xmm0
  jp     L100
  pxor   %xmm1,%xmm1
  ucomisd %xmm1,%xmm0
  jne    L100
  mov    $0x1,%eax
  jmp    L182
L100:
  mov    $0x0,%eax
L182:
  mov    %eax,-0x28(%rbp)
  jmp    L208
L224:
  cmpl   $0x0,-0x28(%rbp)
  je     L23
  mov    -0x30(%rbp),%eax
  imul   -0x24(%rbp),%eax
  mov    %eax,%edx
  mov    -0x2c(%rbp),%eax
  add    %edx,%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x18(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  movsd  D37(%rip),%xmm1
  ucomisd %xmm1,%xmm0
  jp     L23
  movsd  D37(%rip),%xmm1
  ucomisd %xmm1,%xmm0
  jne    L23
  mov    $0x1,%eax
  jmp    L44
L23:
  mov    $0x0,%eax
L44:
  mov    %eax,-0x28(%rbp)
L208:
  addl   $0x1,-0x2c(%rbp)
L234:
  mov    -0x2c(%rbp),%eax
  cmp    -0x24(%rbp),%eax
  jl     L61
  addl   $0x1,-0x30(%rbp)
L230:
  mov    -0x30(%rbp),%eax
  cmp    -0x24(%rbp),%eax
  jl     L153
  cmpl   $0x0,-0x28(%rbp)
  je     L58
  lea    D20(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  jmp    L60
L58:
  lea    D60(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
L60:
  mov    -0x18(%rbp),%rax
  mov    %rax,%rdi
  call   <free@plt>
  mov    $0x0,%eax
L112:
  leave
  ret
```

tool_calls: name: retrieve_data
arguments: data_label: D28
type: string
name: retrieve_data
arguments: data_label: D37
type: f64
name: retrieve_data
arguments: data_label: D39
type: string
name: retrieve_data
arguments: data_label: D20
type: string
name: retrieve_data
arguments: data_label: D60
type: string

tool: D28: 
 Faltan argumentos:: N dimension de la matriz, T cantidad de threads 

tool: D37: 1

tool: D39: Tiempo en segundos para el thread %d: %f 


tool: D20: Resultado correcto

tool: D60: Resultado erroneo

assistant: ```c
main(int argc, char *argv[]) {
  double *A;
  double temp;
  int i, j, N, tid;
  int check = 1;
  double timetick;
  if (argc < 3) {
    printf("\n Faltan argumentos:: N dimension de la matriz, T cantidad de threads \n");
    return 0;
  }
  N = atoi(argv[1]);
  int numThreads = atoi(argv[2]);
  omp_set_num_threads(numThreads);
  A = (double *)malloc(sizeof(double) * N * N);
  for (i = 0; i < N; i++) {
    for (j = 0; j < N; j++) {
      if (i >= j) {
        A[i * N + j] = 1.0;
      } else {
        A[i * N + j] = 0.0;
      }
    }
  }
#pragma omp parallel default(none) private(i, j, temp, timetick, tid) shared(A, N)
  {
    tid = omp_get_thread_num();
    timetick = dwalltime();
#pragma omp for private(i, j, temp) schedule(guided) nowait
    for (i = 0; i < N; i++) {
      for (j = i + 1; j < N; j++) {
        temp = A[i * N + j];
        A[i * N + j] = A[j * N + i];
        A[j * N + i] = temp;
      }
    }
    printf("Tiempo en segundos para el thread %d: %f \n", tid, dwalltime() - timetick);
  }
  for (i = 0; i < N; i++) {
    for (j = 0; j < N; j++) {
      if (i > j) {
        check = check && (A[i * N + j] == 0.0);
      } else {
        check = check && (A[i * N + j] == 1.0);
      }
    }
  }
  if (check) {
    printf("Resultado correcto\n");
  } else {
    printf("Resultado erroneo\n");
  }
  free(A);
  return (0);
}
```