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

```asm
<mat4_perspective>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x30,%rsp
  mov    %rdi,-0x18(%rbp)
  movss  %xmm0,-0x1c(%rbp)
  movss  %xmm1,-0x20(%rbp)
  movss  %xmm2,-0x24(%rbp)
  movss  %xmm3,-0x28(%rbp)
  movss  -0x1c(%rbp),%xmm1
  movss  D45(%rip),%xmm0
  mulss  %xmm0,%xmm1
  movd   %xmm1,%eax
  movd   %eax,%xmm0
  call   <tanf@plt>
  movaps %xmm0,%xmm1
  movss  D52(%rip),%xmm0
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x4(%rbp)
  movss  D52(%rip),%xmm0
  divss  -0x20(%rbp),%xmm0
  mulss  -0x4(%rbp),%xmm0
  mov    -0x18(%rbp),%rax
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x4,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x8,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0xc,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x10,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x14,%rax
  movss  D52(%rip),%xmm0
  divss  -0x4(%rbp),%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x18,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x1c,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x20,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x24,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  movss  -0x24(%rbp),%xmm0
  movaps %xmm0,%xmm1
  subss  -0x28(%rbp),%xmm1
  mov    -0x18(%rbp),%rax
  add    $0x28,%rax
  movss  -0x28(%rbp),%xmm0
  divss  %xmm1,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x2c,%rax
  movss  D16(%rip),%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x30,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x34,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  movss  -0x28(%rbp),%xmm0
  mulss  -0x24(%rbp),%xmm0
  movss  D28(%rip),%xmm1
  xorps  %xmm1,%xmm0
  movss  -0x28(%rbp),%xmm1
  subss  -0x24(%rbp),%xmm1
  mov    -0x18(%rbp),%rax
  add    $0x38,%rax
  divss  %xmm1,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  add    $0x3c,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x18(%rbp),%rax
  leave
  ret
```

tool_calls: name: parse_data
arguments: label: D45
data_type: byte[4]
name: parse_data
arguments: label: D52
data_type: byte[4]
name: parse_data
arguments: label: D16
data_type: byte[4]
name: parse_data
arguments: label: D28
data_type: byte[4]

tool: {"D45": [0x00,0x00,0x00,0x3f]}

tool: {"D52": [0x00,0x00,0x80,0x3f]}

tool: {"D16": [0x00,0x00,0x80,0xbf]}

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

assistant: ```c
float *mat4_perspective(float *result, float fov_y, float aspect, float n, float f) {
  float tan_half_fov_y = 1.0f / tanf(fov_y * 0.5f);
  result[0] = 1.0f / aspect * tan_half_fov_y;
  result[1] = 0.0f;
  result[2] = 0.0f;
  result[3] = 0.0f;
  result[4] = 0.0f;
  result[5] = 1.0f / tan_half_fov_y;
  result[6] = 0.0f;
  result[7] = 0.0f;
  result[8] = 0.0f;
  result[9] = 0.0f;
  result[10] = f / (n - f);
  result[11] = -1.0f;
  result[12] = 0.0f;
  result[13] = 0.0f;
  result[14] = -(f * n) / (f - n);
  result[15] = 0.0f;
  return result;
}
```