user: Converte this assembly snippet into its equivalent C code:

```asm
<f>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbx
  sub    $0x88,%rsp
  mov    %edi,-0x64(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x38(%rbp)
  xor    %eax,%eax
  mov    %rsp,%rax
  mov    %rax,-0x70(%rbp)
  mov    $0x0,%eax
  call   <h@plt>
  mov    %eax,%ebx
  mov    $0x0,%eax
  call   <g@plt>
  imul   -0x64(%rbp),%eax
  mov    %eax,%r12d
  movslq %ebx,%rax
  sub    $0x1,%rax
  mov    %rax,-0x50(%rbp)
  movslq %ebx,%rax
  mov    %rax,-0xb0(%rbp)
  movq   $0x0,-0xa8(%rbp)
  movslq %ebx,%rax
  shl    $0x2,%rax
  mov    %rax,-0xb0(%rbp)
  movslq %r12d,%rax
  sub    $0x1,%rax
  mov    %rax,-0x48(%rbp)
  movslq %ebx,%rax
  mov    %rax,-0x80(%rbp)
  movq   $0x0,-0x78(%rbp)
  movslq %r12d,%rax
  mov    %rax,-0x90(%rbp)
  movq   $0x0,-0x88(%rbp)
  mov    -0x80(%rbp),%rsi
  mov    -0x78(%rbp),%rdi
  mov    %rdi,%rdx
  mov    -0x90(%rbp),%r8
  mov    -0x88(%rbp),%r9
  imul   %r8,%rdx
  mov    %r9,%rax
  imul   %rsi,%rax
  lea    (%rdx,%rax,1),%rcx
  mov    %rsi,%rax
  mul    %r8
  add    %rdx,%rcx
  mov    %rcx,%rdx
  movslq %ebx,%rax
  mov    %rax,-0xa0(%rbp)
  movq   $0x0,-0x98(%rbp)
  movslq %r12d,%rax
  mov    %rax,%r14
  mov    $0x0,%r15d
  mov    -0xa0(%rbp),%rsi
  mov    -0x98(%rbp),%rdi
  mov    %rdi,%rdx
  imul   %r14,%rdx
  mov    %rsi,%rax
  imul   %r15,%rax
  lea    (%rdx,%rax,1),%rcx
  mov    %rsi,%rax
  mul    %r14
  add    %rdx,%rcx
  mov    %rcx,%rdx
  movslq %ebx,%rdx
  movslq %r12d,%rax
  imul   %rdx,%rax
  lea    0x0(,%rax,4),%rdx
  mov    $0x10,%eax
  sub    $0x1,%rax
  add    %rdx,%rax
  mov    $0x10,%edi
  mov    $0x0,%edx
  div    %rdi
  imul   $0x10,%rax,%rax
  mov    %rax,%rcx
  and    $0xfffffffffffff000,%rcx
  mov    %rsp,%rdx
  sub    %rcx,%rdx
L51:
  cmp    %rdx,%rsp
  je     L88
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L51
L88:
  mov    %rax,%rdx
  and    $0xfff,%edx
  sub    %rdx,%rsp
  mov    %rax,%rdx
  and    $0xfff,%edx
  test   %rdx,%rdx
  je     L19
  and    $0xfff,%eax
  sub    $0x8,%rax
  add    %rsp,%rax
  orq    $0x0,(%rax)
L19:
  mov    %rsp,%rax
  add    $0x3,%rax
  shr    $0x2,%rax
  shl    $0x2,%rax
  mov    %rax,-0x40(%rbp)
  movslq %ebx,%rdx
  movslq %r12d,%rax
  imul   %rdx,%rax
  lea    0x0(,%rax,4),%r14
  mov    $0x0,%eax
  call   <h@plt>
  imul   -0x64(%rbp),%eax
  mov    %eax,%r13d
  mov    $0x0,%eax
  call   <g@plt>
  imul   %r13d,%eax
  cltq
  shl    $0x2,%rax
  cmp    %rax,%r14
  je     L55
  mov    $0x0,%eax
  call   <abort@plt>
L55:
  movslq %ebx,%rax
  lea    0x0(,%rax,4),%r13
  mov    $0x0,%eax
  call   <h@plt>
  cltq
  shl    $0x2,%rax
  cmp    %rax,%r13
  je     L36
  mov    $0x0,%eax
  call   <abort@plt>
L36:
  movslq %ebx,%rdx
  movslq %r12d,%rax
  imul   %rdx,%rax
  shl    $0x2,%rax
  movslq %ebx,%rdx
  lea    0x0(,%rdx,4),%rdi
  mov    $0x0,%edx
  div    %rdi
  mov    %eax,%r13d
  mov    $0x0,%eax
  call   <g@plt>
  imul   -0x64(%rbp),%eax
  cmp    %eax,%r13d
  je     L31
  mov    $0x0,%eax
  call   <abort@plt>
L31:
  movslq %ebx,%rax
  shl    $0x2,%rax
  shr    $0x2,%rax
  mov    %eax,%esi
  movslq %ebx,%rdx
  movslq %r12d,%rax
  imul   %rdx,%rax
  shl    $0x2,%rax
  movslq %ebx,%rdx
  lea    0x0(,%rdx,4),%rdi
  mov    $0x0,%edx
  div    %rdi
  mov    %eax,%ecx
  mov    -0x40(%rbp),%rax
  mov    %rax,%rdx
  mov    %ecx,%edi
  call   <init@plt>
  movl   $0x0,-0x58(%rbp)
  jmp    L102
L29:
  movl   $0x0,-0x54(%rbp)
  jmp    L42
L74:
  mov    -0xb0(%rbp),%rcx
  shr    $0x2,%rcx
  mov    -0x40(%rbp),%rax
  mov    -0x54(%rbp),%edx
  movslq %edx,%rsi
  mov    -0x58(%rbp),%edx
  movslq %edx,%rdx
  imul   %rcx,%rdx
  add    %rsi,%rdx
  mov    (%rax,%rdx,4),%eax
  mov    -0x58(%rbp),%ecx
  mov    -0x54(%rbp),%edx
  add    %ecx,%edx
  cmp    %edx,%eax
  je     L66
  mov    $0x0,%eax
  call   <abort@plt>
L66:
  addl   $0x1,-0x54(%rbp)
L42:
  movslq %ebx,%rax
  shl    $0x2,%rax
  shr    $0x2,%rax
  cmp    %eax,-0x54(%rbp)
  jl     L74
  addl   $0x1,-0x58(%rbp)
L102:
  movslq %ebx,%rdx
  movslq %r12d,%rax
  imul   %rdx,%rax
  shl    $0x2,%rax
  movslq %ebx,%rdx
  lea    0x0(,%rdx,4),%rsi
  mov    $0x0,%edx
  div    %rsi
  cmp    %eax,-0x58(%rbp)
  jl     L29
  movslq %ebx,%rax
  mov    %eax,%edx
  movslq %r12d,%rax
  imul   %edx,%eax
  shl    $0x2,%eax
  mov    -0x70(%rbp),%rsp
  mov    -0x38(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L89
  call   <__stack_chk_fail@plt>
L89:
  lea    -0x28(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
```

assistant: ```c
f(int n) {
  int ar[n * g()][h()];
  if (sizeof ar != h() * n * g() * sizeof(int))
    abort();
  if (sizeof *ar != h() * sizeof(int))
    abort();
  if ((int)(sizeof ar / sizeof *ar) != n * g())
    abort();
  init(sizeof ar / sizeof *ar, sizeof *ar / sizeof **ar, ar);
  for (int i = 0; i < (int)(sizeof ar / sizeof *ar); i++)
    for (int j = 0; j < (int)(sizeof *ar / sizeof **ar); j++)
      if (ar[i][j] != i + j)
        abort();
  return sizeof ar;
}
```