user: What would the C source look like for the assembly code provided here?

```asm
<nussinov>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  mov    %esi,%ebx
  sub    $0xa8,%rsp
  mov    %rdi,0x50(%rsp)
  mov    %esi,%edi
  mov    %esi,0x28(%rsp)
  mov    %rdx,0x90(%rsp)
  mov    %rcx,0x98(%rsp)
  call   <initialize_square_table@plt>
  mov    %ebx,%edi
  mov    %rax,0x20(%rsp)
  call   <initialize_square_table@plt>
  lea    0x0(,%rbx,4),%edi
  mov    %rax,%r14
  movslq %ebx,%rax
  mov    %rax,0x80(%rsp)
  call   <malloc@plt>
  mov    $0x4,%edi
  mov    %rax,(%rsp)
  call   <malloc@plt>
  mov    $0x4,%edi
  mov    %rax,0x10(%rsp)
  call   <malloc@plt>
  test   %ebx,%ebx
  jle    L55
  mov    0x80(%rsp),%r9
  mov    %rax,%rbp
  mov    0x28(%rsp),%eax
  movq   $0x0,0x60(%rsp)
  movq   $0x0,0x70(%rsp)
  movq   $0x0,0x18(%rsp)
  neg    %r9
  lea    -0x1(%rax),%ebx
  neg    %eax
  lea    0x0(,%r9,4),%r13
  mov    %ebx,0x78(%rsp)
  mov    %eax,%ebx
  mov    %r13,%rax
  neg    %rax
  mov    %rax,0x68(%rsp)
  mov    $0x4,%eax
  sub    %r13,%rax
  mov    %rax,0x88(%rsp)
  movslq %ebx,%rax
  lea    -0x4(,%rax,4),%rdi
  shl    $0x2,%rax
  mov    %rax,0x48(%rsp)
  mov    (%rsp),%rax
  mov    %rdi,0x40(%rsp)
  add    $0x4,%rax
  mov    %rax,0x58(%rsp)
  mov    %r13,%rax
  mov    %rbp,%r13
  mov    %rax,%rbp
  nopl   0x0(%rax)
L22:
  mov    0x60(%rsp),%rax
  mov    0x18(%rsp),%r15
  mov    0x78(%rsp),%esi
  movl   $0x0,(%r14,%rax,1)
  lea    0x1(%r15),%r12d
  mov    %r12d,%edi
  mov    %r15d,0x8(%rsp)
  mov    %r15d,0x2c(%rsp)
  call   <min@plt>
  imul   0x28(%rsp),%eax
  mov    0x78(%rsp),%esi
  mov    %r12d,%edi
  add    %r15d,%eax
  cltq
  movl   $0x0,(%r14,%rax,4)
  call   <min@plt>
  imul   0x28(%rsp),%eax
  mov    0x20(%rsp),%rdi
  add    %r15d,%eax
  cltq
  movl   $0xfffffffd,(%rdi,%rax,4)
  mov    0x60(%rsp),%rax
  movl   $0xfffffffe,(%rdi,%rax,1)
  test   %r15,%r15
  je     L4
  mov    0x18(%rsp),%rdi
  movslq %ebx,%rax
  mov    (%rsp),%rcx
  add    0x28(%rsp),%ebx
  lea    -0x1(%rax,%rdi,1),%rdx
  add    %rdi,%rax
  mov    0x70(%rsp),%rdi
  mov    %ebx,0x7c(%rsp)
  lea    0x0(,%rax,4),%r15
  lea    (%r14,%rdx,4),%r12
  mov    %ebx,0xc(%rsp)
  mov    0x68(%rsp),%rax
  sub    %rcx,%r12
  mov    $0x1,%ebx
  add    %rdi,%rax
  lea    0x8(%rcx),%rdi
  add    %r14,%rax
  mov    %rdi,0x38(%rsp)
  mov    %rax,0x30(%rsp)
  mov    %rbp,%rax
  mov    %r15,%rbp
  mov    %rax,%r15
L9:
  mov    0x8(%rsp),%esi
  mov    0x2c(%rsp),%edx
  mov    0x50(%rsp),%rdi
  sub    %ebx,%esi
  call   <get_binding_score@plt>
  mov    0x30(%rsp),%rdi
  lea    -0x1(%rbx),%edx
  add    -0x4(%rbp,%rdi,1),%eax
  mov    0x38(%rsp),%rdi
  mov    %eax,(%r14,%rbp,1)
  movslq 0xc(%rsp),%rax
  add    0x18(%rsp),%rax
  lea    (%rdi,%rdx,4),%rsi
  lea    (%r14,%rax,4),%rcx
  mov    0x58(%rsp),%rax
L16:
  mov    (%rcx),%edx
  add    -0x4(%r12,%rax,1),%edx
  add    $0x4,%rax
  sub    %r15,%rcx
  mov    %edx,-0x4(%rax)
  cmp    %rax,%rsi
  jne    L16
  mov    (%r14,%rbp,1),%eax
  mov    (%rsp),%rdi
  add    $0x1,%ebx
  mov    %r13,%rdx
  mov    0x10(%rsp),%rcx
  mov    %ebx,%esi
  mov    %eax,(%rdi)
  call   <compare@plt>
  mov    0x0(%r13),%eax
  mov    0x20(%rsp),%rsi
  mov    %eax,(%r14,%rbp,1)
  mov    0x10(%rsp),%rax
  mov    (%rax),%eax
  mov    %eax,(%rsi,%rbp,1)
  test   %eax,%eax
  jne    L6
  mov    (%rsp),%rdi
  mov    (%rdi),%eax
  test   %eax,%eax
  je     L6
  movl   $0xffffffff,(%rsi,%rbp,1)
L6:
  mov    0x8(%rsp),%eax
  mov    0x28(%rsp),%edi
  add    0x40(%rsp),%r12
  sub    %edi,0xc(%rsp)
  sub    %ebx,%eax
  add    0x48(%rsp),%rbp
  cmp    $0xffffffff,%eax
  jne    L9
  mov    %r15,%rbp
L76:
  addq   $0x1,0x18(%rsp)
  mov    0x88(%rsp),%rcx
  add    %rbp,0x68(%rsp)
  mov    0x18(%rsp),%rax
  sub    %rbp,0x70(%rsp)
  mov    0x7c(%rsp),%ebx
  add    %rcx,0x60(%rsp)
  cmp    0x80(%rsp),%rax
  jne    L22
L55:
  mov    0x98(%rsp),%rax
  mov    0x20(%rsp),%rbx
  mov    %r14,(%rax)
  mov    0x90(%rsp),%rax
  mov    %rbx,(%rax)
  add    $0xa8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L4:
  mov    0x28(%rsp),%eax
  add    %ebx,%eax
  mov    %eax,0x7c(%rsp)
  jmp    L76
```

assistant: ```c
void nussinov(char *sequence, int sequence_length, int **traceback_table, int **score_table) {
  int *traceback = initialize_square_table(sequence_length);
  int *score = initialize_square_table(sequence_length);
  int i, j, k;
  int cells_to_compare;
  int *comparison_list = (int *)malloc(sequence_length * sizeof(int));
  int *arg = (int *)malloc(sizeof(int));
  int *val = (int *)malloc(sizeof(int));
  for (j = 0; j < sequence_length; j++) {
    score[j * sequence_length + j] = 0;
    score[min(j + 1, sequence_length - 1) * sequence_length + j] = 0;
    for (i = 0; i < 0; i++) {
      score[max(0, j - 1 - i) * sequence_length + j] = 0;
      traceback[max(0, j - 1 - i) * sequence_length + j] = 0;
    }
    traceback[min(j + 1, sequence_length - 1) * sequence_length + j] = -3;
    traceback[j * sequence_length + j] = -2;
    for (i = j - 1 - 0; i >= 0; i--) {
      score[i * sequence_length + j] = get_binding_score(sequence, i, j) + score[(i + 1) * sequence_length + (j - 1)];
      cells_to_compare = (j - i);
      for (k = 1; k <= cells_to_compare; k++) {
        comparison_list[k] = score[i * sequence_length + (i + k - 1)] + score[(i + k) * sequence_length + j];
      }
      comparison_list[0] = score[i * sequence_length + j];
      compare(comparison_list, cells_to_compare + 1, val, arg);
      score[i * sequence_length + j] = *val;
      traceback[i * sequence_length + j] = *arg;
      if (*arg == 0) {
        if (comparison_list[0] == 0)
          traceback[i * sequence_length + j] = 0;
        else
          traceback[i * sequence_length + j] = -1;
      }
    }
  }
  *score_table = score;
  *traceback_table = traceback;
}
```