double **sub_const_r_2(double **res, double cn, double **vec, int lo1, int hi1,
                       int lo2, int hi2) {
  int i, j;
  for (i = 0; i <= hi1 - lo1; i++) {
    for (j = 0; j <= hi2 - lo2; j++)
      res[i][j] = cn - vec[i][j];
    res[i][hi2 - lo2 + 1] -= cn * (hi2 - lo2 + 1);
  }
  return res;
}


x86 assembly (clang, -O0):
<sub_const_r_2>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movsd  %xmm0,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    %ecx,-0x20(%rbp)
mov    %r8d,-0x24(%rbp)
mov    %r9d,-0x28(%rbp)
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
mov    -0x20(%rbp),%ecx
sub    -0x1c(%rbp),%ecx
cmp    %ecx,%eax
jg     11ed <sub_const_r_2+0xed>
movl   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%eax
mov    -0x28(%rbp),%ecx
sub    -0x24(%rbp),%ecx
cmp    %ecx,%eax
jg     118c <sub_const_r_2+0x8c>
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    113e <sub_const_r_2+0x3e>
movsd  -0x10(%rbp),%xmm0
mov    -0x28(%rbp),%eax
sub    -0x24(%rbp),%eax
add    $0x1,%eax
cvtsi2sd %eax,%xmm2
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x28(%rbp),%ecx
sub    -0x24(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm1
movq   %xmm0,%rdx
movabs $0x8000000000000000,%rsi
xor    %rsi,%rdx
movq   %rdx,%xmm0
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1126 <sub_const_r_2+0x26>
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<sub_const_r_2>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
mov    %rdi,%rax
sub    %edx,%ecx
jge    111c <sub_const_r_2+0x1c>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
sub    %r8d,%r9d
lea    0x1(%r9),%r8d
cvtsi2sd %r8d,%xmm3
movslq %r8d,%r12
movapd 0xecd(%rip),%xmm1
xorpd  %xmm0,%xmm1
add    $0x1,%ecx
mov    %r8d,%r10d
and    $0xfffffffc,%r10d
lea    -0x4(%r10),%r11
mov    %r11,-0x8(%rsp)
shr    $0x2,%r11
add    $0x1,%r11
movapd %xmm0,%xmm2
unpcklpd %xmm0,%xmm2
mov    %r11,%rdx
and    $0xfffffffffffffffe,%rdx
mov    %rdx,-0x10(%rsp)
mov    %r8d,%r15d
and    $0x3,%r15d
xor    %r13d,%r13d
mulsd  %xmm3,%xmm1
jmp    11a1 <sub_const_r_2+0xa1>
cs nopw 0x0(%rax,%rax,1)
mov    (%rax,%r13,8),%rdi
movsd  (%rdi,%r12,8),%xmm3
addsd  %xmm1,%xmm3
movsd  %xmm3,(%rdi,%r12,8)
add    $0x1,%r13
cmp    %rcx,%r13
je     1111 <sub_const_r_2+0x11>
test   %r9d,%r9d
js     1180 <sub_const_r_2+0x80>
mov    (%rsi,%r13,8),%rbx
mov    (%rax,%r13,8),%rdi
cmp    $0x4,%r8d
jb     11ce <sub_const_r_2+0xce>
lea    (%rbx,%r8,8),%rdx
cmp    %rdx,%rdi
jae    126c <sub_const_r_2+0x16c>
lea    (%rdi,%r8,8),%rdx
cmp    %rdx,%rbx
jae    126c <sub_const_r_2+0x16c>
xor    %ebp,%ebp
mov    %rbp,%r14
not    %r14
add    %r8,%r14
test   %r15,%r15
je     1208 <sub_const_r_2+0x108>
mov    %r15,%rdx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movapd %xmm0,%xmm3
subsd  (%rbx,%rbp,8),%xmm3
movsd  %xmm3,(%rdi,%rbp,8)
add    $0x1,%rbp
add    $0xffffffffffffffff,%rdx
jne    11f0 <sub_const_r_2+0xf0>
cmp    $0x3,%r14
jb     1184 <sub_const_r_2+0x84>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movapd %xmm0,%xmm3
subsd  (%rbx,%rbp,8),%xmm3
movsd  %xmm3,(%rdi,%rbp,8)
movapd %xmm0,%xmm3
subsd  0x8(%rbx,%rbp,8),%xmm3
movsd  %xmm3,0x8(%rdi,%rbp,8)
movapd %xmm0,%xmm3
subsd  0x10(%rbx,%rbp,8),%xmm3
movsd  %xmm3,0x10(%rdi,%rbp,8)
movapd %xmm0,%xmm3
subsd  0x18(%rbx,%rbp,8),%xmm3
movsd  %xmm3,0x18(%rdi,%rbp,8)
add    $0x4,%rbp
cmp    %rbp,%r8
jne    1220 <sub_const_r_2+0x120>
jmp    1184 <sub_const_r_2+0x84>
cmpq   $0x0,-0x8(%rsp)
je     1315 <sub_const_r_2+0x215>
mov    -0x10(%rsp),%r14
xor    %ebp,%ebp
nop
movupd (%rbx,%rbp,8),%xmm3
movupd 0x10(%rbx,%rbp,8),%xmm4
movapd %xmm2,%xmm5
subpd  %xmm3,%xmm5
movapd %xmm2,%xmm3
subpd  %xmm4,%xmm3
movupd %xmm5,(%rdi,%rbp,8)
movupd %xmm3,0x10(%rdi,%rbp,8)
movupd 0x20(%rbx,%rbp,8),%xmm3
movupd 0x30(%rbx,%rbp,8),%xmm4
movapd %xmm2,%xmm5
subpd  %xmm3,%xmm5
movapd %xmm2,%xmm3
subpd  %xmm4,%xmm3
movupd %xmm5,0x20(%rdi,%rbp,8)
movupd %xmm3,0x30(%rdi,%rbp,8)
add    $0x8,%rbp
add    $0xfffffffffffffffe,%r14
jne    1280 <sub_const_r_2+0x180>
test   $0x1,%r11b
je     1304 <sub_const_r_2+0x204>
movupd (%rbx,%rbp,8),%xmm3
movupd 0x10(%rbx,%rbp,8),%xmm4
movapd %xmm2,%xmm5
subpd  %xmm3,%xmm5
movapd %xmm2,%xmm3
subpd  %xmm4,%xmm3
movupd %xmm5,(%rdi,%rbp,8)
movupd %xmm3,0x10(%rdi,%rbp,8)
mov    %r10,%rbp
cmp    %r8,%r10
je     1184 <sub_const_r_2+0x84>
jmp    11d0 <sub_const_r_2+0xd0>
xor    %ebp,%ebp
test   $0x1,%r11b
jne    12de <sub_const_r_2+0x1de>
jmp    1304 <sub_const_r_2+0x204>

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

LLVM IR (-O2):
define double** @sub_const_r_2(double** returned %0, double %1, double** nocapture %2, i32 %3, i32 %4, i32 %5, i32 %6) {
%8 = icmp slt i32 %4, %3
br i1 %8, label %150, label %9
9: ; preds = %7
%10 = sub nsw i32 %6, %5
%11 = icmp slt i32 %10, 0
%12 = add nsw i32 %10, 1
%13 = sitofp i32 %12 to double
%14 = sext i32 %12 to i64
%15 = fneg double %1
%16 = add i32 %6, 1
%17 = sub i32 %16, %5
%18 = add i32 %4, 1
%19 = sub i32 %18, %3
%20 = zext i32 %19 to i64
%21 = zext i32 %17 to i64
%22 = and i64 %21, 4294967292
%23 = add nsw i64 %22, -4
%24 = lshr exact i64 %23, 2
%25 = add nuw nsw i64 %24, 1
%26 = icmp ult i32 %17, 4
%27 = and i64 %21, 4294967292
%28 = insertelement <2 x double> poison, double %1, i64 0
%29 = shufflevector <2 x double> %28, <2 x double> poison, <2 x i32> zeroinitializer
%30 = insertelement <2 x double> poison, double %1, i64 0
%31 = shufflevector <2 x double> %30, <2 x double> poison, <2 x i32> zeroinitializer
%32 = and i64 %25, 1
%33 = icmp eq i64 %23, 0
%34 = and i64 %25, 9223372036854775806
%35 = icmp eq i64 %32, 0
%36 = icmp eq i64 %27, %21
%37 = and i64 %21, 3
%38 = icmp eq i64 %37, 0
br label %39
39: ; preds = %9, %143
%40 = phi i64 [ 0, %9 ], [ %148, %143 ]
br i1 %11, label %41, label %44
41: ; preds = %39
%42 = getelementptr inbounds double*, double** %0, i64 %40
%43 = load double*, double** %42
br label %143
44: ; preds = %39
%45 = getelementptr inbounds double*, double** %2, i64 %40
%46 = load double*, double** %45
%47 = getelementptr inbounds double*, double** %0, i64 %40
%48 = load double*, double** %47
br i1 %26, label %103, label %49
49: ; preds = %44
%50 = getelementptr double, double* %48, i64 %21
%51 = getelementptr double, double* %46, i64 %21
%52 = icmp ult double* %48, %51
%53 = icmp ult double* %46, %50
%54 = and i1 %52, %53
br i1 %54, label %103, label %55
55: ; preds = %49
br i1 %33, label %87, label %56
56: ; preds = %55, %56
%57 = phi i64 [ %84, %56 ], [ 0, %55 ]
%58 = phi i64 [ %85, %56 ], [ 0, %55 ]
%59 = getelementptr inbounds double, double* %46, i64 %57
%60 = bitcast double* %59 to <2 x double>*
%61 = load <2 x double>, <2 x double>* %60
%62 = getelementptr inbounds double, double* %59, i64 2
%63 = bitcast double* %62 to <2 x double>*
%64 = load <2 x double>, <2 x double>* %63
%65 = fsub <2 x double> %29, %61
%66 = fsub <2 x double> %31, %64
%67 = getelementptr inbounds double, double* %48, i64 %57
%68 = bitcast double* %67 to <2 x double>*
store <2 x double> %65, <2 x double>* %68
%69 = getelementptr inbounds double, double* %67, i64 2
%70 = bitcast double* %69 to <2 x double>*
store <2 x double> %66, <2 x double>* %70
%71 = or i64 %57, 4
%72 = getelementptr inbounds double, double* %46, i64 %71
%73 = bitcast double* %72 to <2 x double>*
%74 = load <2 x double>, <2 x double>* %73
%75 = getelementptr inbounds double, double* %72, i64 2
%76 = bitcast double* %75 to <2 x double>*
%77 = load <2 x double>, <2 x double>* %76
%78 = fsub <2 x double> %29, %74
%79 = fsub <2 x double> %31, %77
%80 = getelementptr inbounds double, double* %48, i64 %71
%81 = bitcast double* %80 to <2 x double>*
store <2 x double> %78, <2 x double>* %81
%82 = getelementptr inbounds double, double* %80, i64 2
%83 = bitcast double* %82 to <2 x double>*
store <2 x double> %79, <2 x double>* %83
%84 = add nuw i64 %57, 8
%85 = add i64 %58, 2
%86 = icmp eq i64 %85, %34
br i1 %86, label %87, label %56
87: ; preds = %56, %55
%88 = phi i64 [ 0, %55 ], [ %84, %56 ]
br i1 %35, label %102, label %89
89: ; preds = %87
%90 = getelementptr inbounds double, double* %46, i64 %88
%91 = bitcast double* %90 to <2 x double>*
%92 = load <2 x double>, <2 x double>* %91
%93 = getelementptr inbounds double, double* %90, i64 2
%94 = bitcast double* %93 to <2 x double>*
%95 = load <2 x double>, <2 x double>* %94
%96 = fsub <2 x double> %29, %92
%97 = fsub <2 x double> %31, %95
%98 = getelementptr inbounds double, double* %48, i64 %88
%99 = bitcast double* %98 to <2 x double>*
store <2 x double> %96, <2 x double>* %99
%100 = getelementptr inbounds double, double* %98, i64 2
%101 = bitcast double* %100 to <2 x double>*
store <2 x double> %97, <2 x double>* %101
br label %102
102: ; preds = %87, %89
br i1 %36, label %143, label %103
103: ; preds = %49, %44, %102
%104 = phi i64 [ 0, %49 ], [ 0, %44 ], [ %27, %102 ]
%105 = xor i64 %104, -1
%106 = add nsw i64 %105, %21
br i1 %38, label %117, label %107
107: ; preds = %103, %107
%108 = phi i64 [ %114, %107 ], [ %104, %103 ]
%109 = phi i64 [ %115, %107 ], [ 0, %103 ]
%110 = getelementptr inbounds double, double* %46, i64 %108
%111 = load double, double* %110
%112 = fsub double %1, %111
%113 = getelementptr inbounds double, double* %48, i64 %108
store double %112, double* %113
%114 = add nuw nsw i64 %108, 1
%115 = add i64 %109, 1
%116 = icmp eq i64 %115, %37
br i1 %116, label %117, label %107
117: ; preds = %107, %103
%118 = phi i64 [ %104, %103 ], [ %114, %107 ]
%119 = icmp ult i64 %106, 3
br i1 %119, label %143, label %120
120: ; preds = %117, %120
%121 = phi i64 [ %141, %120 ], [ %118, %117 ]
%122 = getelementptr inbounds double, double* %46, i64 %121
%123 = load double, double* %122
%124 = fsub double %1, %123
%125 = getelementptr inbounds double, double* %48, i64 %121
store double %124, double* %125
%126 = add nuw nsw i64 %121, 1
%127 = getelementptr inbounds double, double* %46, i64 %126
%128 = load double, double* %127
%129 = fsub double %1, %128
%130 = getelementptr inbounds double, double* %48, i64 %126
store double %129, double* %130
%131 = add nuw nsw i64 %121, 2
%132 = getelementptr inbounds double, double* %46, i64 %131
%133 = load double, double* %132
%134 = fsub double %1, %133
%135 = getelementptr inbounds double, double* %48, i64 %131
store double %134, double* %135
%136 = add nuw nsw i64 %121, 3
%137 = getelementptr inbounds double, double* %46, i64 %136
%138 = load double, double* %137
%139 = fsub double %1, %138
%140 = getelementptr inbounds double, double* %48, i64 %136
store double %139, double* %140
%141 = add nuw nsw i64 %121, 4
%142 = icmp eq i64 %141, %21
br i1 %142, label %143, label %120
143: ; preds = %117, %120, %102, %41
%144 = phi double* [ %43, %41 ], [ %48, %102 ], [ %48, %120 ], [ %48, %117 ]
%145 = getelementptr inbounds double, double* %144, i64 %14
%146 = load double, double* %145
%147 = tail call double @llvm.fmuladd.f64(double %15, double %13, double %146)
store double %147, double* %145
%148 = add nuw nsw i64 %40, 1
%149 = icmp eq i64 %148, %20
br i1 %149, label %150, label %39
150: ; preds = %143, %7
ret double** %0
}