user: 提供的汇编代码用C语言表示会是什么样子:

```asm
<dgemm>:
  endbr64
  push   %r15
  mov    %rdx,%r10
  mov    %rcx,%rax
  mov    %r8,%rdx
  push   %r14
  mov    %r9,%rcx
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x18,%rsp
  mov    (%r10),%r10d
  mov    %fs:0x28,%r11
  mov    %r11,0x8(%rsp)
  xor    %r11d,%r11d
  mov    0x50(%rsp),%r8
  mov    0x58(%rsp),%rbx
  movl   $0x0,0x4(%rsp)
  mov    0x60(%rsp),%r14
  mov    0x68(%rsp),%r12
  mov    0x70(%rsp),%r15
  mov    0x78(%rsp),%r9
  mov    0x80(%rsp),%r13
  test   %r10d,%r10d
  js     L321
  mov    (%rax),%ebp
  test   %ebp,%ebp
  js     L30
  mov    (%rdx),%r11d
  test   %r11d,%r11d
  js     L214
  movzbl (%rdi),%eax
  movzbl (%rsi),%edx
  and    $0xffffffdf,%eax
  and    $0xffffffdf,%edx
  cmp    $0x4e,%al
  jne    L0
  cmp    $0x4e,%dl
  je     L377
  cmp    $0x54,%dl
  je     L450
  cmp    $0x43,%dl
  jne    L243
L450:
  test   %r10d,%r10d
  mov    $0x1,%eax
  mov    (%rbx),%esi
  cmovg  %r10d,%eax
  cmp    %eax,%esi
  jl     L102
  test   %ebp,%ebp
  mov    $0x1,%edx
  mov    (%r12),%edi
  cmovg  %ebp,%edx
  cmp    %edx,%edi
  jl     L303
  mov    0x0(%r13),%edx
  cmp    %edx,%eax
  jg     L320
  movsd  (%rcx),%xmm0
  ucomisd D110(%rip),%xmm0
  movsd  (%r15),%xmm1
  jp     L423
  jne    L423
  sub    $0x8,%rsp
  movapd %xmm1,%xmm0
  mov    %r14,%rcx
  mov    $0x1,%eax
  push   %rdx
  mov    %r10d,%edx
  push   %rsi
  mov    %r11d,%esi
  push   %rdi
  mov    %ebp,%edi
  call   <mm_double_TN_1@plt>
  add    $0x20,%rsp
  jmp    L369
  nopl   0x0(%rax,%rax,1)
L0:
  cmp    $0x54,%al
  setne  %sil
  cmp    $0x43,%al
  setne  %al
  and    %eax,%esi
  cmp    $0x4e,%dl
  je     L383
  test   %sil,%sil
  jne    L372
  cmp    $0x54,%dl
  je     L255
  cmp    $0x43,%dl
  jne    L243
L255:
  test   %r11d,%r11d
  mov    $0x1,%eax
  mov    (%rbx),%edx
  cmovg  %r11d,%eax
  cmp    %eax,%edx
  jl     L102
  test   %ebp,%ebp
  mov    $0x1,%eax
  mov    (%r12),%esi
  cmovg  %ebp,%eax
  cmp    %eax,%esi
  jl     L303
  test   %r10d,%r10d
  mov    $0x1,%eax
  mov    0x0(%r13),%edi
  cmovg  %r10d,%eax
  cmp    %eax,%edi
  jl     L320
  movsd  (%rcx),%xmm0
  ucomisd D110(%rip),%xmm0
  movsd  (%r15),%xmm1
  jp     L336
  jne    L336
  sub    $0x8,%rsp
  movapd %xmm1,%xmm0
  mov    %r14,%rcx
  mov    $0x1,%eax
  push   %rdi
  mov    %ebp,%edi
  push   %rdx
  mov    %r10d,%edx
  push   %rsi
  mov    %r11d,%esi
  call   <mm_double_TT_1@plt>
  add    $0x20,%rsp
  jmp    L369
  nopw   0x0(%rax,%rax,1)
L377:
  test   %r10d,%r10d
  mov    $0x1,%eax
  mov    (%rbx),%esi
  cmovg  %r10d,%eax
  cmp    %eax,%esi
  jl     L102
  test   %r11d,%r11d
  mov    $0x1,%edx
  mov    (%r12),%edi
  cmovg  %r11d,%edx
  cmp    %edx,%edi
  jl     L303
  mov    0x0(%r13),%edx
  cmp    %edx,%eax
  jg     L320
  movsd  (%rcx),%xmm0
  ucomisd D110(%rip),%xmm0
  movsd  (%r15),%xmm1
  jp     L447
  jne    L447
  sub    $0x8,%rsp
  movapd %xmm1,%xmm0
  mov    %r14,%rcx
  mov    $0x1,%eax
  push   %rdx
  mov    %r10d,%edx
  push   %rsi
  mov    %r11d,%esi
  push   %rdi
  mov    %ebp,%edi
  call   <mm_double_NN_1@plt>
  add    $0x20,%rsp
  jmp    L369
L383:
  test   %sil,%sil
  jne    L372
  test   %r11d,%r11d
  mov    $0x1,%eax
  mov    (%rbx),%edx
  cmovg  %r11d,%eax
  cmp    %eax,%edx
  jl     L102
  mov    (%r12),%esi
  cmp    %esi,%eax
  jg     L303
  test   %r10d,%r10d
  mov    $0x1,%eax
  mov    0x0(%r13),%edi
  cmovg  %r10d,%eax
  cmp    %eax,%edi
  jl     L320
  movsd  (%rcx),%xmm0
  ucomisd D110(%rip),%xmm0
  movsd  (%r15),%xmm1
  jp     L215
  jne    L215
  sub    $0x8,%rsp
  movapd %xmm1,%xmm0
  mov    %r14,%rcx
  mov    $0x1,%eax
  push   %rdi
  mov    %ebp,%edi
  push   %rdx
  mov    %r10d,%edx
  push   %rsi
  mov    %r11d,%esi
  call   <mm_double_NT_1@plt>
  add    $0x20,%rsp
  jmp    L369
  nopw   0x0(%rax,%rax,1)
L303:
  lea    0x4(%rsp),%rsi
  lea    D28(%rip),%rdi
  xor    %eax,%eax
  movl   $0xa,0x4(%rsp)
  call   <xerbla@plt>
  nopl   0x0(%rax,%rax,1)
L369:
  mov    0x8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L368
  add    $0x18,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   0x0(%rax,%rax,1)
L320:
  lea    0x4(%rsp),%rsi
  lea    D28(%rip),%rdi
  xor    %eax,%eax
  movl   $0xd,0x4(%rsp)
  call   <xerbla@plt>
  jmp    L369
  nopl   (%rax)
L102:
  lea    0x4(%rsp),%rsi
  lea    D28(%rip),%rdi
  xor    %eax,%eax
  movl   $0x8,0x4(%rsp)
  call   <xerbla@plt>
  jmp    L369
  nopl   (%rax)
L321:
  lea    0x4(%rsp),%rsi
  lea    D28(%rip),%rdi
  xor    %eax,%eax
  movl   $0x3,0x4(%rsp)
  call   <xerbla@plt>
  jmp    L369
L30:
  lea    0x4(%rsp),%rsi
  lea    D28(%rip),%rdi
  xor    %eax,%eax
  movl   $0x4,0x4(%rsp)
  call   <xerbla@plt>
  jmp    L369
L214:
  lea    0x4(%rsp),%rsi
  lea    D28(%rip),%rdi
  xor    %eax,%eax
  movl   $0x5,0x4(%rsp)
  call   <xerbla@plt>
  jmp    L369
L372:
  lea    0x4(%rsp),%rsi
  lea    D28(%rip),%rdi
  xor    %eax,%eax
  movl   $0x1,0x4(%rsp)
  call   <xerbla@plt>
  jmp    L369
L243:
  lea    0x4(%rsp),%rsi
  lea    D28(%rip),%rdi
  xor    %eax,%eax
  movl   $0x2,0x4(%rsp)
  call   <xerbla@plt>
  jmp    L369
L447:
  sub    $0x8,%rsp
  mov    %r14,%rcx
  mov    $0x2,%eax
  push   %rdx
  mov    %r10d,%edx
  push   %rsi
  mov    %r11d,%esi
  push   %rdi
  mov    %ebp,%edi
  call   <mm_double_NN_c@plt>
  add    $0x20,%rsp
  jmp    L369
  nopl   (%rax)
L215:
  sub    $0x8,%rsp
  mov    %r14,%rcx
  mov    $0x2,%eax
  push   %rdi
  mov    %ebp,%edi
  push   %rdx
  mov    %r10d,%edx
  push   %rsi
  mov    %r11d,%esi
  call   <mm_double_NT_c@plt>
  add    $0x20,%rsp
  jmp    L369
  nopl   (%rax)
L423:
  sub    $0x8,%rsp
  mov    %r14,%rcx
  mov    $0x2,%eax
  push   %rdx
  mov    %r10d,%edx
  push   %rsi
  mov    %r11d,%esi
  push   %rdi
  mov    %ebp,%edi
  call   <mm_double_TN_c@plt>
  add    $0x20,%rsp
  jmp    L369
  nopl   (%rax)
L336:
  sub    $0x8,%rsp
  mov    %r14,%rcx
  mov    $0x2,%eax
  push   %rdi
  mov    %ebp,%edi
  push   %rdx
  mov    %r10d,%edx
  push   %rsi
  mov    %r11d,%esi
  call   <mm_double_TT_c@plt>
  add    $0x20,%rsp
  jmp    L369
L368:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: unpack_data
arguments: label: D110
type_infered: byte[8]
name: unpack_data
arguments: label: D28
type_infered: string

tool: {"D110": [0x00,0x00,0x00,0x00,0x00,0x00,0xf0,0x3f]}

tool: D28: DGEMM 

assistant: ```c
void dgemm(char *transA, char *transB, int *M, int *N, int *K, double *alpha, double *A, int *Astride, double *B, int *Bstride, double *beta, double *C, int *Cstride) {
  int info = 0;
  if (*M < 0) {
    info = 3;
    xerbla("DGEMM ", &info);
    return;
  } else if (*N < 0) {
    info = 4;
    xerbla("DGEMM ", &info);
    return;
  } else if (*K < 0) {
    info = 5;
    xerbla("DGEMM ", &info);
    return;
  }
  if (*transA == 'n' || *transA == 'N') {
    if (*transB == 'n' || *transB == 'N') {
      if (*Astride < (((1) > (*M)) ? (1) : (*M))) {
        info = 8;
        xerbla("DGEMM ", &info);
      } else if (*Bstride < (((1) > (*K)) ? (1) : (*K))) {
        info = 10;
        xerbla("DGEMM ", &info);
      } else if (*Cstride < (((1) > (*M)) ? (1) : (*M))) {
        info = 13;
        xerbla("DGEMM ", &info);
      } else if (*alpha == 1) {
        mm_double_NN_1(*N, *K, *M, B, A, C, *Bstride, *Astride, *Cstride, *beta);
      } else {
        mm_double_NN_c(*N, *K, *M, B, A, C, *Bstride, *Astride, *Cstride, *alpha, *beta);
      }
    } else {
      if (*transB != 'c' && *transB != 'C' && *transB != 't' && *transB != 'T') {
        info = 2;
        xerbla("DGEMM ", &info);
      } else if (*Astride < (((1) > (*M)) ? (1) : (*M))) {
        info = 8;
        xerbla("DGEMM ", &info);
      } else if (*Bstride < (((1) > (*N)) ? (1) : (*N))) {
        info = 10;
        xerbla("DGEMM ", &info);
      } else if (*Cstride < (((1) > (*M)) ? (1) : (*M))) {
        info = 13;
        xerbla("DGEMM ", &info);
      } else if (*alpha == 1) {
        mm_double_TN_1(*N, *K, *M, B, A, C, *Bstride, *Astride, *Cstride, *beta);
      } else {
        mm_double_TN_c(*N, *K, *M, B, A, C, *Bstride, *Astride, *Cstride, *alpha, *beta);
      }
    }
  } else {
    if (*transB == 'n' || *transB == 'N') {
      if (*transA != 'c' && *transA != 'C' && *transA != 't' && *transA != 'T') {
        info = 1;
        xerbla("DGEMM ", &info);
      } else if (*Astride < (((1) > (*K)) ? (1) : (*K))) {
        info = 8;
        xerbla("DGEMM ", &info);
      } else if (*Bstride < (((1) > (*K)) ? (1) : (*K))) {
        info = 10;
        xerbla("DGEMM ", &info);
      } else if (*Cstride < (((1) > (*M)) ? (1) : (*M))) {
        info = 13;
        xerbla("DGEMM ", &info);
      } else if (*alpha == 1) {
        mm_double_NT_1(*N, *K, *M, B, A, C, *Bstride, *Astride, *Cstride, *beta);
      } else {
        mm_double_NT_c(*N, *K, *M, B, A, C, *Bstride, *Astride, *Cstride, *alpha, *beta);
      }
    } else {
      if (*transA != 'c' && *transA != 'C' && *transA != 't' && *transA != 'T') {
        info = 1;
        xerbla("DGEMM ", &info);
      } else if (*transB != 'c' && *transB != 'C' && *transB != 't' && *transB != 'T') {
        info = 2;
        xerbla("DGEMM ", &info);
      } else if (*Astride < (((1) > (*K)) ? (1) : (*K))) {
        info = 8;
        xerbla("DGEMM ", &info);
      } else if (*Bstride < (((1) > (*N)) ? (1) : (*N))) {
        info = 10;
        xerbla("DGEMM ", &info);
      } else if (*Cstride < (((1) > (*M)) ? (1) : (*M))) {
        info = 13;
        xerbla("DGEMM ", &info);
      } else if (*alpha == 1) {
        mm_double_TT_1(*N, *K, *M, B, A, C, *Bstride, *Astride, *Cstride, *beta);
      } else {
        mm_double_TT_c(*N, *K, *M, B, A, C, *Bstride, *Astride, *Cstride, *alpha, *beta);
      }
    }
  }
}
```