void mat4_ortho(float *dst, float left, float right, float bottom, float top,
                float near, float far) {
  float lr = 1 / (left - right);
  float bt = 1 / (bottom - top);
  float nf = 1 / (near - far);
  dst[0] = -2 * lr;
  dst[1] = 0;
  dst[2] = 0;
  dst[3] = 0;
  dst[4] = 0;
  dst[5] = -2 * bt;
  dst[6] = 0;
  dst[7] = 0;
  dst[8] = 0;
  dst[9] = 0;
  dst[10] = 2 * nf;
  dst[11] = 0;
  dst[12] = (left + right) * lr;
  dst[13] = (top + bottom) * bt;
  dst[14] = (far + near) * nf;
  dst[15] = 1;
}


x86 assembly (clang, -O0):
<mat4_ortho>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movss  %xmm0,-0xc(%rbp)
movss  %xmm1,-0x10(%rbp)
movss  %xmm2,-0x14(%rbp)
movss  %xmm3,-0x18(%rbp)
movss  %xmm4,-0x1c(%rbp)
movss  %xmm5,-0x20(%rbp)
movss  -0xc(%rbp),%xmm1
subss  -0x10(%rbp),%xmm1
movss  0xec8(%rip),%xmm0
divss  %xmm1,%xmm0
movss  %xmm0,-0x24(%rbp)
movss  -0x14(%rbp),%xmm1
subss  -0x18(%rbp),%xmm1
movss  0xead(%rip),%xmm0
divss  %xmm1,%xmm0
movss  %xmm0,-0x28(%rbp)
movss  -0x1c(%rbp),%xmm1
subss  -0x20(%rbp),%xmm1
movss  0xe92(%rip),%xmm0
divss  %xmm1,%xmm0
movss  %xmm0,-0x2c(%rbp)
movss  0xe89(%rip),%xmm0
mulss  -0x24(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x4(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x8(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0xc(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x10(%rax)
movss  0xe44(%rip),%xmm0
mulss  -0x28(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,0x14(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x18(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x1c(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x20(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x24(%rax)
movss  0xdfa(%rip),%xmm0
mulss  -0x2c(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,0x28(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x2c(%rax)
movss  -0xc(%rbp),%xmm0
addss  -0x10(%rbp),%xmm0
mulss  -0x24(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,0x30(%rax)
movss  -0x18(%rbp),%xmm0
addss  -0x14(%rbp),%xmm0
mulss  -0x28(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,0x34(%rax)
movss  -0x20(%rbp),%xmm0
addss  -0x1c(%rbp),%xmm0
mulss  -0x2c(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,0x38(%rax)
mov    -0x8(%rbp),%rax
movss  0xd88(%rip),%xmm0
movss  %xmm0,0x3c(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<mat4_ortho>:
movaps %xmm0,%xmm7
subss  %xmm1,%xmm7
movss  0xef1(%rip),%xmm6
movaps %xmm6,%xmm8
divss  %xmm7,%xmm8
movaps %xmm2,%xmm7
subss  %xmm3,%xmm7
movaps %xmm6,%xmm9
divss  %xmm7,%xmm9
movaps %xmm4,%xmm7
subss  %xmm5,%xmm7
divss  %xmm7,%xmm6
movss  0xec9(%rip),%xmm7
addss  %xmm1,%xmm0
mulss  %xmm8,%xmm0
mulss  %xmm7,%xmm8
movss  %xmm8,(%rdi)
mulss  %xmm9,%xmm7
xorps  %xmm1,%xmm1
movups %xmm1,0x4(%rdi)
movss  %xmm7,0x14(%rdi)
addss  %xmm5,%xmm4
mulss  %xmm6,%xmm4
addss  %xmm6,%xmm6
movups %xmm1,0x18(%rdi)
movss  %xmm6,0x28(%rdi)
movl   $0x0,0x2c(%rdi)
movss  %xmm0,0x30(%rdi)
addss  %xmm3,%xmm2
mulss  %xmm9,%xmm2
movss  %xmm2,0x34(%rdi)
movss  %xmm4,0x38(%rdi)
movl   $0x3f800000,0x3c(%rdi)
ret

LLVM IR (-O0):
define void @mat4_ortho(float* %0, float %1, float %2, float %3, float %4, float %5, float %6) {
%8 = alloca float*
%9 = alloca float
%10 = alloca float
%11 = alloca float
%12 = alloca float
%13 = alloca float
%14 = alloca float
%15 = alloca float
%16 = alloca float
%17 = alloca float
store float* %0, float** %8
store float %1, float* %9
store float %2, float* %10
store float %3, float* %11
store float %4, float* %12
store float %5, float* %13
store float %6, float* %14
%18 = load float, float* %9
%19 = load float, float* %10
%20 = fsub float %18, %19
%21 = fdiv float 1.000000e+00, %20
store float %21, float* %15
%22 = load float, float* %11
%23 = load float, float* %12
%24 = fsub float %22, %23
%25 = fdiv float 1.000000e+00, %24
store float %25, float* %16
%26 = load float, float* %13
%27 = load float, float* %14
%28 = fsub float %26, %27
%29 = fdiv float 1.000000e+00, %28
store float %29, float* %17
%30 = load float, float* %15
%31 = fmul float -2.000000e+00, %30
%32 = load float*, float** %8
%33 = getelementptr inbounds float, float* %32, i64 0
store float %31, float* %33
%34 = load float*, float** %8
%35 = getelementptr inbounds float, float* %34, i64 1
store float 0.000000e+00, float* %35
%36 = load float*, float** %8
%37 = getelementptr inbounds float, float* %36, i64 2
store float 0.000000e+00, float* %37
%38 = load float*, float** %8
%39 = getelementptr inbounds float, float* %38, i64 3
store float 0.000000e+00, float* %39
%40 = load float*, float** %8
%41 = getelementptr inbounds float, float* %40, i64 4
store float 0.000000e+00, float* %41
%42 = load float, float* %16
%43 = fmul float -2.000000e+00, %42
%44 = load float*, float** %8
%45 = getelementptr inbounds float, float* %44, i64 5
store float %43, float* %45
%46 = load float*, float** %8
%47 = getelementptr inbounds float, float* %46, i64 6
store float 0.000000e+00, float* %47
%48 = load float*, float** %8
%49 = getelementptr inbounds float, float* %48, i64 7
store float 0.000000e+00, float* %49
%50 = load float*, float** %8
%51 = getelementptr inbounds float, float* %50, i64 8
store float 0.000000e+00, float* %51
%52 = load float*, float** %8
%53 = getelementptr inbounds float, float* %52, i64 9
store float 0.000000e+00, float* %53
%54 = load float, float* %17
%55 = fmul float 2.000000e+00, %54
%56 = load float*, float** %8
%57 = getelementptr inbounds float, float* %56, i64 10
store float %55, float* %57
%58 = load float*, float** %8
%59 = getelementptr inbounds float, float* %58, i64 11
store float 0.000000e+00, float* %59
%60 = load float, float* %9
%61 = load float, float* %10
%62 = fadd float %60, %61
%63 = load float, float* %15
%64 = fmul float %62, %63
%65 = load float*, float** %8
%66 = getelementptr inbounds float, float* %65, i64 12
store float %64, float* %66
%67 = load float, float* %12
%68 = load float, float* %11
%69 = fadd float %67, %68
%70 = load float, float* %16
%71 = fmul float %69, %70
%72 = load float*, float** %8
%73 = getelementptr inbounds float, float* %72, i64 13
store float %71, float* %73
%74 = load float, float* %14
%75 = load float, float* %13
%76 = fadd float %74, %75
%77 = load float, float* %17
%78 = fmul float %76, %77
%79 = load float*, float** %8
%80 = getelementptr inbounds float, float* %79, i64 14
store float %78, float* %80
%81 = load float*, float** %8
%82 = getelementptr inbounds float, float* %81, i64 15
store float 1.000000e+00, float* %82
ret void
}

LLVM IR (-O2):
define void @mat4_ortho(float* nocapture writeonly %0, float %1, float %2, float %3, float %4, float %5, float %6) {
%8 = fsub float %1, %2
%9 = fdiv float 1.000000e+00, %8
%10 = fsub float %3, %4
%11 = fdiv float 1.000000e+00, %10
%12 = fsub float %5, %6
%13 = fdiv float 1.000000e+00, %12
%14 = fmul float %9, -2.000000e+00
store float %14, float* %0
%15 = getelementptr inbounds float, float* %0, i64 1
%16 = fmul float %11, -2.000000e+00
%17 = getelementptr inbounds float, float* %0, i64 5
%18 = bitcast float* %15 to i8*
store float %16, float* %17
%19 = getelementptr inbounds float, float* %0, i64 6
%20 = fmul float %13, 2.000000e+00
%21 = getelementptr inbounds float, float* %0, i64 10
%22 = bitcast float* %19 to i8*
store float %20, float* %21
%23 = getelementptr inbounds float, float* %0, i64 11
store float 0.000000e+00, float* %23
%24 = fadd float %1, %2
%25 = fmul float %24, %9
%26 = getelementptr inbounds float, float* %0, i64 12
store float %25, float* %26
%27 = fadd float %3, %4
%28 = fmul float %27, %11
%29 = getelementptr inbounds float, float* %0, i64 13
store float %28, float* %29
%30 = fadd float %5, %6
%31 = fmul float %30, %13
%32 = getelementptr inbounds float, float* %0, i64 14
store float %31, float* %32
%33 = getelementptr inbounds float, float* %0, i64 15
store float 1.000000e+00, float* %33
ret void
}