void sub_matrix(float **m1, long nrl, long nrh, long ncl, long nch, float **m2,
                float **m3) {
  long i, j;
  float x, y, z, *Xi, *Yi, *Zi;
  for (i = nrl; i <= nrh; i++) {
    Xi = m1[i];
    Yi = m2[i];
    Zi = m3[i];
    for (j = ncl; j <= nch; j++) {
      x = Xi[j];
      y = Yi[j];
      z = x - y;
      Zi[j] = z;
    }
  }
}


x86 assembly (clang, -O0):
<sub_matrix>:
push   %rbp
mov    %rsp,%rbp
mov    0x10(%rbp),%rax
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x18(%rbp),%rax
jg     11e8 <sub_matrix+0xe8>
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x58(%rbp)
mov    -0x30(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x60(%rbp)
mov    0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x68(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,-0x40(%rbp)
mov    -0x40(%rbp),%rax
cmp    -0x28(%rbp),%rax
jg     11d2 <sub_matrix+0xd2>
mov    -0x58(%rbp),%rax
mov    -0x40(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x44(%rbp)
mov    -0x60(%rbp),%rax
mov    -0x40(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x48(%rbp)
movss  -0x44(%rbp),%xmm0
subss  -0x48(%rbp),%xmm0
movss  %xmm0,-0x4c(%rbp)
movss  -0x4c(%rbp),%xmm0
mov    -0x68(%rbp),%rax
mov    -0x40(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x40(%rbp)
jmp    116e <sub_matrix+0x6e>
jmp    11d7 <sub_matrix+0xd7>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    1128 <sub_matrix+0x28>
pop    %rbp
ret

x86 assembly (clang, -O2):
<sub_matrix>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
mov    %rdi,-0x8(%rsp)
cmp    %rdx,%rsi
jle    111f <sub_matrix+0x1f>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
mov    %rcx,%r11
lea    0x1(%r8),%rax
mov    %rax,-0x50(%rsp)
sub    %rcx,%rax
lea    -0x8(%rax),%rcx
mov    %rcx,-0x20(%rsp)
shr    $0x3,%rcx
add    $0x1,%rcx
mov    %rax,-0x58(%rsp)
and    $0xfffffffffffffff8,%rax
mov    %rax,-0x30(%rsp)
add    %r11,%rax
mov    %rax,-0x38(%rsp)
mov    %rcx,%rax
mov    %rcx,-0x28(%rsp)
and    $0xfffffffffffffffe,%rcx
mov    %rcx,-0x40(%rsp)
lea    0xc(%r11),%rax
mov    %rax,-0x48(%rsp)
mov    %r9,-0x10(%rsp)
mov    %r8,-0x18(%rsp)
mov    %r11,-0x60(%rsp)
jmp    118c <sub_matrix+0x8c>
lea    0x1(%rsi),%rax
cmp    %rdx,%rsi
mov    %rax,%rsi
je     1114 <sub_matrix+0x14>
cmp    %r8,%r11
jg     1180 <sub_matrix+0x80>
mov    -0x8(%rsp),%rax
mov    (%rax,%rsi,8),%r12
mov    (%r9,%rsi,8),%r13
mov    0x38(%rsp),%rax
mov    (%rax,%rsi,8),%r14
mov    %r11,%rcx
cmpq   $0x8,-0x58(%rsp)
jae    1280 <sub_matrix+0x180>
mov    -0x50(%rsp),%rax
sub    %ecx,%eax
mov    %r8,%rbx
sub    %rcx,%rbx
and    $0x3,%rax
je     11ed <sub_matrix+0xed>
nopl   0x0(%rax)
movss  (%r12,%rcx,4),%xmm0
subss  0x0(%r13,%rcx,4),%xmm0
movss  %xmm0,(%r14,%rcx,4)
add    $0x1,%rcx
add    $0xffffffffffffffff,%rax
jne    11d0 <sub_matrix+0xd0>
cmp    $0x3,%rbx
jb     1180 <sub_matrix+0x80>
mov    %r8,%rbx
sub    %rcx,%rbx
lea    (%r14,%rcx,4),%rax
add    $0xc,%rax
lea    0xc(,%rcx,4),%rdi
add    %r13,%rdi
lea    (%r12,%rcx,4),%rcx
add    $0xc,%rcx
mov    $0xffffffffffffffff,%rbp
nopl   0x0(%rax,%rax,1)
movss  -0x8(%rcx,%rbp,4),%xmm0
subss  -0x8(%rdi,%rbp,4),%xmm0
movss  %xmm0,-0x8(%rax,%rbp,4)
movss  -0x4(%rcx,%rbp,4),%xmm0
subss  -0x4(%rdi,%rbp,4),%xmm0
movss  %xmm0,-0x4(%rax,%rbp,4)
movss  (%rcx,%rbp,4),%xmm0
subss  (%rdi,%rbp,4),%xmm0
movss  %xmm0,(%rax,%rbp,4)
movss  0x4(%rcx,%rbp,4),%xmm0
subss  0x4(%rdi,%rbp,4),%xmm0
movss  %xmm0,0x4(%rax,%rbp,4)
add    $0x4,%rbp
cmp    %rbp,%rbx
jne    1220 <sub_matrix+0x120>
jmp    1180 <sub_matrix+0x80>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
lea    (%r14,%r11,4),%rax
mov    -0x50(%rsp),%rbx
lea    (%r14,%rbx,4),%rcx
lea    (%r12,%r11,4),%r10
lea    (%r12,%rbx,4),%rbp
mov    -0x60(%rsp),%rdi
lea    0x0(,%rdi,4),%r11
add    %r13,%r11
lea    0x0(,%rbx,4),%r15
add    %r13,%r15
cmp    %rbp,%rax
mov    %rdx,%rbp
setb   %dl
cmp    %rcx,%r10
setb   %bl
cmp    %r15,%rax
setb   %al
cmp    %rcx,%r11
mov    -0x60(%rsp),%r11
setb   %dil
mov    %r11,%rcx
test   %bl,%dl
mov    %rbp,%rdx
jne    11b6 <sub_matrix+0xb6>
mov    %r11,%rcx
and    %dil,%al
jne    11b6 <sub_matrix+0xb6>
cmpq   $0x8,-0x20(%rsp)
jae    12fa <sub_matrix+0x1fa>
xor    %ecx,%ecx
jmp    1377 <sub_matrix+0x277>
mov    -0x48(%rsp),%rax
lea    (%r14,%rax,4),%r15
lea    0x0(,%rax,4),%r10
add    %r13,%r10
lea    (%r12,%rax,4),%rbx
mov    -0x40(%rsp),%r11
xor    %ecx,%ecx
nopl   0x0(%rax)
movups -0x30(%rbx,%rcx,4),%xmm0
movups -0x20(%rbx,%rcx,4),%xmm1
movups -0x30(%r10,%rcx,4),%xmm2
subps  %xmm2,%xmm0
movups -0x20(%r10,%rcx,4),%xmm2
subps  %xmm2,%xmm1
movups %xmm0,-0x30(%r15,%rcx,4)
movups %xmm1,-0x20(%r15,%rcx,4)
movups -0x10(%rbx,%rcx,4),%xmm0
movups (%rbx,%rcx,4),%xmm1
movups -0x10(%r10,%rcx,4),%xmm2
subps  %xmm2,%xmm0
movups (%r10,%rcx,4),%xmm2
subps  %xmm2,%xmm1
movups %xmm0,-0x10(%r15,%rcx,4)
movups %xmm1,(%r15,%rcx,4)
add    $0x10,%rcx
add    $0xfffffffffffffffe,%r11
jne    1320 <sub_matrix+0x220>
testb  $0x1,-0x28(%rsp)
mov    -0x10(%rsp),%r9
mov    -0x18(%rsp),%r8
mov    %rbp,%rdx
mov    -0x60(%rsp),%r11
je     13bb <sub_matrix+0x2bb>
add    %r11,%rcx
movups (%r12,%rcx,4),%xmm0
movups 0x10(%r12,%rcx,4),%xmm1
movups 0x0(%r13,%rcx,4),%xmm2
subps  %xmm2,%xmm0
movups 0x10(%r13,%rcx,4),%xmm2
subps  %xmm2,%xmm1
movups %xmm0,(%r14,%rcx,4)
movups %xmm1,0x10(%r14,%rcx,4)
mov    -0x38(%rsp),%rcx
mov    -0x30(%rsp),%rax
cmp    %rax,-0x58(%rsp)
je     1180 <sub_matrix+0x80>
jmp    11b6 <sub_matrix+0xb6>

LLVM IR (-O0):
define void @sub_matrix(float** %0, i64 %1, i64 %2, i64 %3, i64 %4, float** %5, float** %6) {
%8 = alloca float**
%9 = alloca i64
%10 = alloca i64
%11 = alloca i64
%12 = alloca i64
%13 = alloca float**
%14 = alloca float**
%15 = alloca i64
%16 = alloca i64
%17 = alloca float
%18 = alloca float
%19 = alloca float
%20 = alloca float*
%21 = alloca float*
%22 = alloca float*
store float** %0, float*** %8
store i64 %1, i64* %9
store i64 %2, i64* %10
store i64 %3, i64* %11
store i64 %4, i64* %12
store float** %5, float*** %13
store float** %6, float*** %14
%23 = load i64, i64* %9
store i64 %23, i64* %15
br label %24
24: ; preds = %66, %7
%25 = load i64, i64* %15
%26 = load i64, i64* %10
%27 = icmp sle i64 %25, %26
br i1 %27, label %28, label %69
28: ; preds = %24
%29 = load float**, float*** %8
%30 = load i64, i64* %15
%31 = getelementptr inbounds float*, float** %29, i64 %30
%32 = load float*, float** %31
store float* %32, float** %20
%33 = load float**, float*** %13
%34 = load i64, i64* %15
%35 = getelementptr inbounds float*, float** %33, i64 %34
%36 = load float*, float** %35
store float* %36, float** %21
%37 = load float**, float*** %14
%38 = load i64, i64* %15
%39 = getelementptr inbounds float*, float** %37, i64 %38
%40 = load float*, float** %39
store float* %40, float** %22
%41 = load i64, i64* %11
store i64 %41, i64* %16
br label %42
42: ; preds = %62, %28
%43 = load i64, i64* %16
%44 = load i64, i64* %12
%45 = icmp sle i64 %43, %44
br i1 %45, label %46, label %65
46: ; preds = %42
%47 = load float*, float** %20
%48 = load i64, i64* %16
%49 = getelementptr inbounds float, float* %47, i64 %48
%50 = load float, float* %49
store float %50, float* %17
%51 = load float*, float** %21
%52 = load i64, i64* %16
%53 = getelementptr inbounds float, float* %51, i64 %52
%54 = load float, float* %53
store float %54, float* %18
%55 = load float, float* %17
%56 = load float, float* %18
%57 = fsub float %55, %56
store float %57, float* %19
%58 = load float, float* %19
%59 = load float*, float** %22
%60 = load i64, i64* %16
%61 = getelementptr inbounds float, float* %59, i64 %60
store float %58, float* %61
br label %62
62: ; preds = %46
%63 = load i64, i64* %16
%64 = add nsw i64 %63, 1
store i64 %64, i64* %16
br label %42
65: ; preds = %42
br label %66
66: ; preds = %65
%67 = load i64, i64* %15
%68 = add nsw i64 %67, 1
store i64 %68, i64* %15
br label %24
69: ; preds = %24
ret void
}

LLVM IR (-O2):
define void @sub_matrix(float** nocapture %0, i64 %1, i64 %2, i64 %3, i64 %4, float** nocapture %5, float** nocapture %6) {
%8 = icmp sgt i64 %1, %2
br i1 %8, label %172, label %9
9: ; preds = %7
%10 = icmp sgt i64 %3, %4
%11 = add i64 %4, 1
%12 = sub i64 %11, %3
%13 = add i64 %12, -8
%14 = lshr i64 %13, 3
%15 = add nuw nsw i64 %14, 1
%16 = add i64 %4, 1
%17 = icmp ult i64 %12, 8
%18 = and i64 %12, -8
%19 = add i64 %18, %3
%20 = and i64 %15, 1
%21 = icmp ult i64 %13, 8
%22 = and i64 %15, 4611686018427387902
%23 = icmp eq i64 %20, 0
%24 = icmp eq i64 %12, %18
br label %25
25: ; preds = %9, %169
%26 = phi i64 [ %1, %9 ], [ %170, %169 ]
%27 = getelementptr inbounds float*, float** %0, i64 %26
%28 = load float*, float** %27
%29 = getelementptr inbounds float*, float** %5, i64 %26
%30 = load float*, float** %29
%31 = getelementptr inbounds float*, float** %6, i64 %26
%32 = load float*, float** %31
br i1 %10, label %169, label %33
33: ; preds = %25
br i1 %17, label %117, label %34
34: ; preds = %33
%35 = getelementptr float, float* %32, i64 %3
%36 = getelementptr float, float* %32, i64 %11
%37 = getelementptr float, float* %28, i64 %3
%38 = getelementptr float, float* %28, i64 %11
%39 = getelementptr float, float* %30, i64 %3
%40 = getelementptr float, float* %30, i64 %11
%41 = icmp ult float* %35, %38
%42 = icmp ult float* %37, %36
%43 = and i1 %41, %42
%44 = icmp ult float* %35, %40
%45 = icmp ult float* %39, %36
%46 = and i1 %44, %45
%47 = or i1 %43, %46
br i1 %47, label %117, label %48
48: ; preds = %34
br i1 %21, label %94, label %49
49: ; preds = %48, %49
%50 = phi i64 [ %91, %49 ], [ 0, %48 ]
%51 = phi i64 [ %92, %49 ], [ 0, %48 ]
%52 = add i64 %50, %3
%53 = getelementptr inbounds float, float* %28, i64 %52
%54 = bitcast float* %53 to <4 x float>*
%55 = load <4 x float>, <4 x float>* %54
%56 = getelementptr inbounds float, float* %53, i64 4
%57 = bitcast float* %56 to <4 x float>*
%58 = load <4 x float>, <4 x float>* %57
%59 = getelementptr inbounds float, float* %30, i64 %52
%60 = bitcast float* %59 to <4 x float>*
%61 = load <4 x float>, <4 x float>* %60
%62 = getelementptr inbounds float, float* %59, i64 4
%63 = bitcast float* %62 to <4 x float>*
%64 = load <4 x float>, <4 x float>* %63
%65 = fsub <4 x float> %55, %61
%66 = fsub <4 x float> %58, %64
%67 = getelementptr inbounds float, float* %32, i64 %52
%68 = bitcast float* %67 to <4 x float>*
store <4 x float> %65, <4 x float>* %68
%69 = getelementptr inbounds float, float* %67, i64 4
%70 = bitcast float* %69 to <4 x float>*
store <4 x float> %66, <4 x float>* %70
%71 = or i64 %50, 8
%72 = add i64 %71, %3
%73 = getelementptr inbounds float, float* %28, i64 %72
%74 = bitcast float* %73 to <4 x float>*
%75 = load <4 x float>, <4 x float>* %74
%76 = getelementptr inbounds float, float* %73, i64 4
%77 = bitcast float* %76 to <4 x float>*
%78 = load <4 x float>, <4 x float>* %77
%79 = getelementptr inbounds float, float* %30, i64 %72
%80 = bitcast float* %79 to <4 x float>*
%81 = load <4 x float>, <4 x float>* %80
%82 = getelementptr inbounds float, float* %79, i64 4
%83 = bitcast float* %82 to <4 x float>*
%84 = load <4 x float>, <4 x float>* %83
%85 = fsub <4 x float> %75, %81
%86 = fsub <4 x float> %78, %84
%87 = getelementptr inbounds float, float* %32, i64 %72
%88 = bitcast float* %87 to <4 x float>*
store <4 x float> %85, <4 x float>* %88
%89 = getelementptr inbounds float, float* %87, i64 4
%90 = bitcast float* %89 to <4 x float>*
store <4 x float> %86, <4 x float>* %90
%91 = add nuw i64 %50, 16
%92 = add i64 %51, 2
%93 = icmp eq i64 %92, %22
br i1 %93, label %94, label %49
94: ; preds = %49, %48
%95 = phi i64 [ 0, %48 ], [ %91, %49 ]
br i1 %23, label %116, label %96
96: ; preds = %94
%97 = add i64 %95, %3
%98 = getelementptr inbounds float, float* %28, i64 %97
%99 = bitcast float* %98 to <4 x float>*
%100 = load <4 x float>, <4 x float>* %99
%101 = getelementptr inbounds float, float* %98, i64 4
%102 = bitcast float* %101 to <4 x float>*
%103 = load <4 x float>, <4 x float>* %102
%104 = getelementptr inbounds float, float* %30, i64 %97
%105 = bitcast float* %104 to <4 x float>*
%106 = load <4 x float>, <4 x float>* %105
%107 = getelementptr inbounds float, float* %104, i64 4
%108 = bitcast float* %107 to <4 x float>*
%109 = load <4 x float>, <4 x float>* %108
%110 = fsub <4 x float> %100, %106
%111 = fsub <4 x float> %103, %109
%112 = getelementptr inbounds float, float* %32, i64 %97
%113 = bitcast float* %112 to <4 x float>*
store <4 x float> %110, <4 x float>* %113
%114 = getelementptr inbounds float, float* %112, i64 4
%115 = bitcast float* %114 to <4 x float>*
store <4 x float> %111, <4 x float>* %115
br label %116
116: ; preds = %94, %96
br i1 %24, label %169, label %117
117: ; preds = %34, %33, %116
%118 = phi i64 [ %3, %34 ], [ %3, %33 ], [ %19, %116 ]
%119 = sub i64 %16, %118
%120 = sub i64 %4, %118
%121 = and i64 %119, 3
%122 = icmp eq i64 %121, 0
br i1 %122, label %135, label %123
123: ; preds = %117, %123
%124 = phi i64 [ %132, %123 ], [ %118, %117 ]
%125 = phi i64 [ %133, %123 ], [ 0, %117 ]
%126 = getelementptr inbounds float, float* %28, i64 %124
%127 = load float, float* %126
%128 = getelementptr inbounds float, float* %30, i64 %124
%129 = load float, float* %128
%130 = fsub float %127, %129
%131 = getelementptr inbounds float, float* %32, i64 %124
store float %130, float* %131
%132 = add i64 %124, 1
%133 = add i64 %125, 1
%134 = icmp eq i64 %133, %121
br i1 %134, label %135, label %123
135: ; preds = %123, %117
%136 = phi i64 [ %118, %117 ], [ %132, %123 ]
%137 = icmp ult i64 %120, 3
br i1 %137, label %169, label %138
138: ; preds = %135, %138
%139 = phi i64 [ %167, %138 ], [ %136, %135 ]
%140 = getelementptr inbounds float, float* %28, i64 %139
%141 = load float, float* %140
%142 = getelementptr inbounds float, float* %30, i64 %139
%143 = load float, float* %142
%144 = fsub float %141, %143
%145 = getelementptr inbounds float, float* %32, i64 %139
store float %144, float* %145
%146 = add i64 %139, 1
%147 = getelementptr inbounds float, float* %28, i64 %146
%148 = load float, float* %147
%149 = getelementptr inbounds float, float* %30, i64 %146
%150 = load float, float* %149
%151 = fsub float %148, %150
%152 = getelementptr inbounds float, float* %32, i64 %146
store float %151, float* %152
%153 = add i64 %139, 2
%154 = getelementptr inbounds float, float* %28, i64 %153
%155 = load float, float* %154
%156 = getelementptr inbounds float, float* %30, i64 %153
%157 = load float, float* %156
%158 = fsub float %155, %157
%159 = getelementptr inbounds float, float* %32, i64 %153
store float %158, float* %159
%160 = add i64 %139, 3
%161 = getelementptr inbounds float, float* %28, i64 %160
%162 = load float, float* %161
%163 = getelementptr inbounds float, float* %30, i64 %160
%164 = load float, float* %163
%165 = fsub float %162, %164
%166 = getelementptr inbounds float, float* %32, i64 %160
store float %165, float* %166
%167 = add i64 %139, 4
%168 = icmp eq i64 %160, %4
br i1 %168, label %169, label %138
169: ; preds = %135, %138, %116, %25
%170 = add i64 %26, 1
%171 = icmp eq i64 %26, %2
br i1 %171, label %172, label %25
172: ; preds = %169, %7
ret void
}