user: 请将以下的汇编代码转换成C语言代码:

```asm
<matrix2>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x30,%rsp
  mov    %edi,-0x14(%rbp)
  mov    %esi,-0x18(%rbp)
  mov    %edx,-0x1c(%rbp)
  mov    %ecx,-0x20(%rbp)
  mov    %r8d,-0x24(%rbp)
  mov    %r9d,-0x28(%rbp)
  mov    -0x18(%rbp),%eax
  sub    -0x14(%rbp),%eax
  add    $0x1,%eax
  shl    $0x3,%eax
  mov    %eax,%edi
  call   <malloc@plt>
  mov    %rax,-0x8(%rbp)
  cmpq   $0x0,-0x8(%rbp)
  jne    L22
  lea    D18(%rip),%rax
  mov    %rax,%rdx
  lea    D41(%rip),%rax
  mov    %rax,%rsi
  mov    $0x256,%edi
  call   <errhandler@plt>
L22:
  mov    -0x14(%rbp),%eax
  cltq
  shl    $0x3,%rax
  neg    %rax
  add    %rax,-0x8(%rbp)
  mov    -0x14(%rbp),%eax
  mov    %eax,-0x10(%rbp)
  jmp    L24
L7:
  mov    -0x20(%rbp),%eax
  sub    -0x1c(%rbp),%eax
  add    $0x1,%eax
  shl    $0x3,%eax
  mov    %eax,%edi
  call   <malloc@plt>
  mov    -0x10(%rbp),%edx
  movslq %edx,%rdx
  lea    0x0(,%rdx,8),%rcx
  mov    -0x8(%rbp),%rdx
  add    %rcx,%rdx
  mov    %rax,(%rdx)
  mov    -0x10(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rax
  test   %rax,%rax
  jne    L35
  lea    D18(%rip),%rax
  mov    %rax,%rdx
  lea    D41(%rip),%rax
  mov    %rax,%rsi
  mov    $0x25b,%edi
  call   <errhandler@plt>
L35:
  mov    -0x10(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x1c(%rbp),%eax
  cltq
  shl    $0x3,%rax
  neg    %rax
  mov    %rax,%rcx
  mov    -0x10(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rsi
  mov    -0x8(%rbp),%rax
  add    %rsi,%rax
  add    %rcx,%rdx
  mov    %rdx,(%rax)
  mov    -0x1c(%rbp),%eax
  mov    %eax,-0xc(%rbp)
  jmp    L29
L39:
  mov    -0x28(%rbp),%eax
  sub    -0x24(%rbp),%eax
  add    $0x1,%eax
  shl    $0x3,%eax
  mov    %eax,%edi
  call   <malloc@plt>
  mov    -0x10(%rbp),%edx
  movslq %edx,%rdx
  lea    0x0(,%rdx,8),%rcx
  mov    -0x8(%rbp),%rdx
  add    %rcx,%rdx
  mov    (%rdx),%rcx
  mov    -0xc(%rbp),%edx
  movslq %edx,%rdx
  shl    $0x3,%rdx
  add    %rcx,%rdx
  mov    %rax,(%rdx)
  mov    -0x10(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0xc(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  mov    (%rax),%rax
  test   %rax,%rax
  jne    L69
  lea    D18(%rip),%rax
  mov    %rax,%rdx
  lea    D41(%rip),%rax
  mov    %rax,%rsi
  mov    $0x25f,%edi
  call   <errhandler@plt>
L69:
  mov    -0x10(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x8(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0xc(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x24(%rbp),%eax
  cltq
  shl    $0x3,%rax
  neg    %rax
  mov    %rax,%rsi
  mov    -0x10(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rcx
  mov    -0x8(%rbp),%rax
  add    %rcx,%rax
  mov    (%rax),%rcx
  mov    -0xc(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rcx,%rax
  add    %rsi,%rdx
  mov    %rdx,(%rax)
  addl   $0x1,-0xc(%rbp)
L29:
  mov    -0xc(%rbp),%eax
  cmp    -0x20(%rbp),%eax
  jle    L39
  addl   $0x1,-0x10(%rbp)
L24:
  mov    -0x10(%rbp),%eax
  cmp    -0x18(%rbp),%eax
  jle    L7
  mov    -0x8(%rbp),%rax
  leave
  ret
```

tool_calls: name: extract_symbolic_data
arguments: label: D18
type_infered: string
name: extract_symbolic_data
arguments: label: D41
type_infered: string

tool: D18: Storage cannot be allocated

tool: D41: /scratch/repos/new/home/jordi_armengol_estape/c-scraper/outputs/2022-01-22/02-19-57/repos/EvaBr/CFD-Lab/refs/heads/master/Backup/FinalProject/helper.c

assistant: ```c
double ***matrix2(int nrl, int nrh, int ncl, int nch, int nll, int nlh) {
  double ***pArray;
  int i, j;
  pArray = (double ***)malloc((unsigned)(nrh - nrl + 1) * sizeof(double **));
  if (pArray == 0)
    errhandler(598, "/scratch/repos/new/home/jordi_armengol_estape/c-scraper/outputs/2022-01-22/02-19-57/repos/EvaBr/CFD-Lab/refs/heads/master/Backup/FinalProject/helper.c", "Storage cannot be allocated");
  pArray -= nrl;
  for (i = nrl; i <= nrh; i++) {
    pArray[i] = (double **)malloc((unsigned)(nch - ncl + 1) * sizeof(double *));
    if (pArray[i] == 0)
      errhandler(603, "/scratch/repos/new/home/jordi_armengol_estape/c-scraper/outputs/2022-01-22/02-19-57/repos/EvaBr/CFD-Lab/refs/heads/master/Backup/FinalProject/helper.c", "Storage cannot be allocated");
    pArray[i] -= ncl;
    for (j = ncl; j <= nch; j++) {
      pArray[i][j] = (double *)malloc((unsigned)(nlh - nll + 1) * sizeof(double));
      if (pArray[i][j] == 0)
        errhandler(607, "/scratch/repos/new/home/jordi_armengol_estape/c-scraper/outputs/2022-01-22/02-19-57/repos/EvaBr/CFD-Lab/refs/heads/master/Backup/FinalProject/helper.c", "Storage cannot be allocated");
      pArray[i][j] -= nll;
    }
  }
  return pArray;
}
```