user: Translate the below assembly code into C programming language:

```asm
<poly_sub2>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  mov    %rdi,-0x28(%rbp)
  mov    %rsi,-0x30(%rbp)
  mov    %rdx,-0x38(%rbp)
  mov    %rcx,-0x40(%rbp)
  mov    %r8,-0x48(%rbp)
  mov    %r9,-0x50(%rbp)
  mov    -0x38(%rbp),%rax
  mov    (%rax),%eax
  mov    %eax,-0x18(%rbp)
  mov    -0x38(%rbp),%rax
  mov    0x4(%rax),%eax
  mov    %eax,-0x14(%rbp)
  mov    -0x40(%rbp),%rax
  mov    (%rax),%eax
  mov    %eax,-0x10(%rbp)
  mov    -0x40(%rbp),%rax
  mov    0x4(%rax),%eax
  mov    %eax,-0xc(%rbp)
  mov    -0x10(%rbp),%edx
  mov    -0x18(%rbp),%eax
  cmp    %eax,%edx
  cmovl  %eax,%edx
  mov    -0x50(%rbp),%rax
  mov    %edx,(%rax)
  mov    -0x50(%rbp),%rax
  lea    0x4(%rax),%rcx
  mov    -0xc(%rbp),%edx
  mov    -0x14(%rbp),%eax
  cmp    %eax,%edx
  cmovge %edx,%eax
  mov    %eax,(%rcx)
  movl   $0x0,-0x20(%rbp)
  jmp    L34
L93:
  mov    -0x20(%rbp),%eax
  cmp    -0x14(%rbp),%eax
  setg   %al
  movzbl %al,%eax
  mov    %eax,-0x8(%rbp)
  mov    -0x20(%rbp),%eax
  cmp    -0xc(%rbp),%eax
  setg   %al
  movzbl %al,%eax
  mov    %eax,-0x4(%rbp)
  movl   $0x0,-0x1c(%rbp)
  jmp    L52
L68:
  cmpl   $0x0,-0x4(%rbp)
  jne    L91
  mov    -0x1c(%rbp),%eax
  cmp    -0x10(%rbp),%eax
  jle    L21
L91:
  mov    -0x20(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,%rdx
  mov    -0x28(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  mov    -0x20(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,%rdx
  mov    -0x48(%rbp),%rax
  add    %rax,%rdx
  mov    -0x1c(%rbp),%eax
  cltq
  movsd  (%rcx,%rax,8),%xmm0
  mov    -0x1c(%rbp),%eax
  cltq
  movsd  %xmm0,(%rdx,%rax,8)
  jmp    L70
L21:
  cmpl   $0x0,-0x8(%rbp)
  jne    L37
  mov    -0x1c(%rbp),%eax
  cmp    -0x18(%rbp),%eax
  jle    L54
L37:
  mov    -0x20(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,%rdx
  mov    -0x30(%rbp),%rax
  add    %rax,%rdx
  mov    -0x1c(%rbp),%eax
  cltq
  movsd  (%rdx,%rax,8),%xmm0
  mov    -0x20(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,%rdx
  mov    -0x48(%rbp),%rax
  add    %rax,%rdx
  movq   D6(%rip),%xmm1
  xorpd  %xmm1,%xmm0
  mov    -0x1c(%rbp),%eax
  cltq
  movsd  %xmm0,(%rdx,%rax,8)
  jmp    L70
L54:
  mov    -0x20(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,%rdx
  mov    -0x28(%rbp),%rax
  add    %rax,%rdx
  mov    -0x1c(%rbp),%eax
  cltq
  movsd  (%rdx,%rax,8),%xmm0
  mov    -0x20(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,%rdx
  mov    -0x30(%rbp),%rax
  add    %rax,%rdx
  mov    -0x1c(%rbp),%eax
  cltq
  movsd  (%rdx,%rax,8),%xmm1
  mov    -0x20(%rbp),%eax
  movslq %eax,%rdx
  mov    %rdx,%rax
  shl    $0x2,%rax
  add    %rdx,%rax
  shl    $0x3,%rax
  mov    %rax,%rdx
  mov    -0x48(%rbp),%rax
  add    %rax,%rdx
  subsd  %xmm1,%xmm0
  mov    -0x1c(%rbp),%eax
  cltq
  movsd  %xmm0,(%rdx,%rax,8)
L70:
  addl   $0x1,-0x1c(%rbp)
L52:
  mov    -0x50(%rbp),%rax
  mov    (%rax),%eax
  cmp    %eax,-0x1c(%rbp)
  jle    L68
  addl   $0x1,-0x20(%rbp)
L34:
  mov    -0x50(%rbp),%rax
  add    $0x4,%rax
  mov    (%rax),%eax
  cmp    %eax,-0x20(%rbp)
  jle    L93
  nop
  pop    %rbp
  ret
```

tool_calls: name: retrieve_data
arguments: data_tag: D6
type_infered: byte[8]

tool: {"D6": [0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x80]}

assistant: ```c
void poly_sub2(double u1[5][5], double u2[5][5], int p1[2], int p2[2], double u3[5][5], int p3[2]) {
  int i, j, p11, p12, p21, p22;
  int i1_ok, i2_ok;
  p11 = p1[0];
  p12 = p1[1];
  p21 = p2[0];
  p22 = p2[1];
  p3[0] = ((p11) > (p21)) ? (p11) : (p21);
  p3[1] = ((p12) > (p22)) ? (p12) : (p22);
  for (i = 0; i <= p3[1]; i++) {
    i1_ok = (i > p12);
    i2_ok = (i > p22);
    for (j = 0; j <= p3[0]; j++) {
      if (i2_ok || (j > p21))
        u3[i][j] = u1[i][j];
      else if (i1_ok || (j > p11))
        u3[i][j] = -u2[i][j];
      else
        u3[i][j] = u1[i][j] - u2[i][j];
    }
  }
  return;
}
```