void t_matrix_ortho(float M[], float l, float r, float b, float t, float n,
                    float f) {
  M[0] = 2. / (r - l);
  M[4] = 0.;
  M[8] = 0.;
  M[12] = -(r + l) / (r - l);
  M[1] = 0.;
  M[5] = 2. / (t - b);
  M[9] = 0.;
  M[13] = -(t + b) / (t - b);
  M[2] = 0.;
  M[6] = 0.;
  M[10] = -2 / (f - n);
  M[14] = -(f + n) / (f - n);
  M[3] = 0.;
  M[7] = 0.;
  M[11] = 0.;
  M[15] = 1.;
}


x86 assembly (clang, -O0):
<t_matrix_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  -0x10(%rbp),%xmm0
subss  -0xc(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xecc(%rip),%xmm0
divsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x10(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x20(%rax)
movss  -0x10(%rbp),%xmm0
addss  -0xc(%rbp),%xmm0
movd   %xmm0,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm0
movss  -0x10(%rbp),%xmm1
subss  -0xc(%rbp),%xmm1
divss  %xmm1,%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,0x30(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x4(%rax)
movss  -0x18(%rbp),%xmm0
subss  -0x14(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xe54(%rip),%xmm0
divsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,0x14(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x24(%rax)
movss  -0x18(%rbp),%xmm0
addss  -0x14(%rbp),%xmm0
movd   %xmm0,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm0
movss  -0x18(%rbp),%xmm1
subss  -0x14(%rbp),%xmm1
divss  %xmm1,%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,0x34(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x8(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x18(%rax)
movss  -0x20(%rbp),%xmm1
subss  -0x1c(%rbp),%xmm1
movss  0xddb(%rip),%xmm0
divss  %xmm1,%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,0x28(%rax)
movss  -0x20(%rbp),%xmm0
addss  -0x1c(%rbp),%xmm0
movd   %xmm0,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm0
movss  -0x20(%rbp),%xmm1
subss  -0x1c(%rbp),%xmm1
divss  %xmm1,%xmm0
mov    -0x8(%rbp),%rax
movss  %xmm0,0x38(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0xc(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x1c(%rax)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movss  %xmm0,0x2c(%rax)
mov    -0x8(%rbp),%rax
movss  0xd6c(%rip),%xmm0
movss  %xmm0,0x3c(%rax)
pop    %rbp
ret

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

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

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