user: 请从给定的汇编指令推导出C源代码:

```asm
<transpose>:
  endbr64
  push   %r15
  mov    %rcx,%r15
  push   %r14
  mov    %rdi,%r14
  push   %r13
  mov    %r8,%r13
  lea    D20(%rip),%r8
  push   %r12
  push   %rbp
  mov    %rdx,%rbp
  lea    D14(%rip),%rdx
  push   %rbx
  mov    %rsi,%rbx
  sub    $0x28,%rsp
  mov    %r9,0x8(%rsp)
  mov    0x60(%rsp),%r12
  mov    %fs:0x28,%rax
  mov    %rax,0x18(%rsp)
  xor    %eax,%eax
  movslq (%rcx),%rax
  mov    $0x2e,%ecx
  mov    (%rsi,%rax,4),%edi
  mov    $0x4,%esi
  sub    $0x1,%edi
  mov    %edi,0x14(%rsp)
  call   <u_calloc@plt>
  mov    0x14(%rsp),%ecx
  mov    0x8(%rsp),%r11
  mov    %rax,%r10
  test   %ecx,%ecx
  jle    L9
  lea    0x8(%r14),%rax
  cmp    %rax,%r13
  je     L29
  lea    -0x1(%rcx),%eax
  cmp    $0x2,%eax
  jbe    L29
  mov    %ecx,%edx
  xor    %eax,%eax
  shr    %edx
  shl    $0x4,%rdx
  nopl   0x0(%rax,%rax,1)
L97:
  movupd (%r14,%rax,1),%xmm1
  movups %xmm1,0x0(%r13,%rax,1)
  add    $0x10,%rax
  cmp    %rdx,%rax
  jne    L97
  mov    %ecx,%eax
  and    $0xfffffffe,%eax
  and    $0x1,%ecx
  je     L9
  movsd  (%r14,%rax,8),%xmm0
  movsd  %xmm0,0x0(%r13,%rax,8)
L9:
  mov    (%r15),%ecx
  add    $0x4,%rbx
  xor    %esi,%esi
  test   %ecx,%ecx
  jle    L91
  nopl   0x0(%rax)
L45:
  mov    -0x4(%rbx),%edx
  add    $0x1,%esi
  lea    -0x1(%rdx),%eax
  cmp    (%rbx),%edx
  jge    L66
  cltq
  lea    (%r10,%rax,4),%rcx
  nopl   0x0(%rax,%rax,1)
L101:
  mov    0x0(%rbp,%rax,4),%edx
  add    $0x4,%rcx
  mov    %edx,-0x4(%rcx)
  mov    %esi,(%r12,%rax,4)
  mov    (%rbx),%edi
  add    $0x1,%rax
  lea    -0x1(%rdi),%edx
  cmp    %eax,%edx
  jg     L101
  mov    (%r15),%ecx
L66:
  add    $0x4,%rbx
  cmp    %esi,%ecx
  jg     L45
L91:
  mov    %r11,%rcx
  mov    %r12,%rdx
  mov    %r10,%rsi
  mov    %r13,%rdi
  mov    %r15,%r9
  lea    0x14(%rsp),%r8
  mov    %r10,0x8(%rsp)
  call   <matrixsort@plt>
  mov    0x8(%rsp),%rdi
  lea    D20(%rip),%rcx
  mov    $0x3d,%edx
  lea    D14(%rip),%rsi
  call   <u_free@plt>
  mov    0x18(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L105
  add    $0x28,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L29:
  xor    %eax,%eax
  nopl   0x0(%rax,%rax,1)
L34:
  movsd  (%r14,%rax,8),%xmm0
  movsd  %xmm0,0x0(%r13,%rax,8)
  add    $0x1,%rax
  cmp    %rcx,%rax
  jne    L34
  jmp    L9
L105:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: read_data
arguments: label: D20
data_type: string
name: read_data
arguments: label: D14
data_type: string

tool: D20: mast1

tool: D14: /scratch/repos/new/home/jordi_armengol_estape/c-scraper/outputs/2022-01-22/02-19-57/repos/prool/ccx_prool/refs/heads/master/CalculiX/ccx_2.17/src/transpose.c

assistant: ```c
void transpose(double *au, int *jq, int *irow, int *dim, double *au_t, int *jq_t, int *irow_t) {
  int i, j, nzs_t = jq[*dim] - 1, *mast1 = NULL;
  mast1 = (int *)u_calloc((nzs_t), sizeof(int), "/scratch/repos/new/home/jordi_armengol_estape/c-scraper/outputs/2022-01-22/02-19-57/repos/prool/ccx_prool/refs/heads/master/CalculiX/ccx_2.17/src/transpose.c", 46, "mast1");
  for (j = 0; j < nzs_t; j++) {
    au_t[j] = au[j];
  }
  for (j = 0; j < *dim; j++) {
    for (i = jq[j] - 1; i < jq[j + 1] - 1; i++) {
      mast1[i] = irow[i];
      irow_t[i] = j + 1;
    }
  }
  matrixsort(au_t, mast1, irow_t, jq_t, &nzs_t, dim);
  u_free(mast1, "/scratch/repos/new/home/jordi_armengol_estape/c-scraper/outputs/2022-01-22/02-19-57/repos/prool/ccx_prool/refs/heads/master/CalculiX/ccx_2.17/src/transpose.c", 61, "mast1");
  return;
}
```