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

```asm
<warp_mat4_fill_orthographic>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  mov    %rdi,-0x28(%rbp)
  movss  %xmm0,-0x2c(%rbp)
  movss  %xmm1,-0x30(%rbp)
  movss  %xmm2,-0x34(%rbp)
  movss  %xmm3,-0x38(%rbp)
  movss  -0x2c(%rbp),%xmm0
  movss  D86(%rip),%xmm1
  xorps  %xmm1,%xmm0
  movss  D36(%rip),%xmm1
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x20(%rbp)
  movss  -0x2c(%rbp),%xmm0
  movss  D36(%rip),%xmm1
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x1c(%rbp)
  movss  -0x30(%rbp),%xmm0
  movss  D36(%rip),%xmm1
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x18(%rbp)
  movss  -0x30(%rbp),%xmm0
  movss  D86(%rip),%xmm1
  xorps  %xmm1,%xmm0
  movss  D36(%rip),%xmm1
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x14(%rbp)
  movss  -0x38(%rbp),%xmm0
  addss  -0x34(%rbp),%xmm0
  movss  D86(%rip),%xmm1
  xorps  %xmm1,%xmm0
  movss  -0x38(%rbp),%xmm1
  subss  -0x34(%rbp),%xmm1
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x10(%rbp)
  movss  -0x1c(%rbp),%xmm0
  movaps %xmm0,%xmm1
  subss  -0x20(%rbp),%xmm1
  movss  D36(%rip),%xmm0
  divss  %xmm1,%xmm0
  movss  %xmm0,-0xc(%rbp)
  movss  -0x18(%rbp),%xmm0
  movaps %xmm0,%xmm1
  subss  -0x14(%rbp),%xmm1
  movss  D36(%rip),%xmm0
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x8(%rbp)
  movss  -0x38(%rbp),%xmm0
  movaps %xmm0,%xmm1
  subss  -0x34(%rbp),%xmm1
  movss  D58(%rip),%xmm0
  divss  %xmm1,%xmm0
  movss  %xmm0,-0x4(%rbp)
  mov    -0x28(%rbp),%rax
  movss  -0xc(%rbp),%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x4,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x8,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0xc,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x10,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x14,%rax
  movss  -0x8(%rbp),%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x18,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x1c,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x20,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x24,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x28,%rax
  movss  -0x4(%rbp),%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x2c,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x30,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x34,%rax
  pxor   %xmm0,%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x38,%rax
  movss  -0x10(%rbp),%xmm0
  movss  %xmm0,(%rax)
  mov    -0x28(%rbp),%rax
  add    $0x3c,%rax
  movss  D31(%rip),%xmm0
  movss  %xmm0,(%rax)
  nop
  pop    %rbp
  ret
```

tool_calls: name: unpack_data
arguments: data_label: D86
type: byte[4]
name: unpack_data
arguments: data_label: D36
type: byte[4]
name: unpack_data
arguments: data_label: D58
type: byte[4]
name: unpack_data
arguments: data_label: D31
type: byte[4]

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

tool: {"D36": [0x00,0x00,0x00,0x40]}

tool: {"D58": [0x00,0x00,0x00,0xc0]}

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

assistant: ```c
extern void warp_mat4_fill_orthographic(float *matrix, float width, float height, float near, float far) {
  const float left = -width / 2, right = width / 2;
  const float top = height / 2, bottom = -height / 2;
  const float tz = -(far + near) / (far - near);
  const float m00 = 2.0f / (right - left);
  const float m11 = 2.0f / (top - bottom);
  const float m22 = -2.0f / (far - near);
  matrix[0] = m00;
  matrix[1] = 0;
  matrix[2] = 0;
  matrix[3] = 0;
  matrix[4] = 0;
  matrix[5] = m11;
  matrix[6] = 0;
  matrix[7] = 0;
  matrix[8] = 0;
  matrix[9] = 0;
  matrix[10] = m22;
  matrix[11] = 0;
  matrix[12] = 0;
  matrix[13] = 0;
  matrix[14] = tz;
  matrix[15] = 1;
}
```