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


x86 assembly (clang, -O0):
<sub_const_r_1>:
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)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x20(%rbp),%ecx
sub    -0x1c(%rbp),%ecx
cmp    %ecx,%eax
jg     115c <sub_const_r_1+0x5c>
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    111e <sub_const_r_1+0x1e>
movsd  -0x10(%rbp),%xmm0
mov    -0x20(%rbp),%eax
sub    -0x1c(%rbp),%eax
add    $0x1,%eax
cvtsi2sd %eax,%xmm2
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
sub    -0x1c(%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    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<sub_const_r_1>:
mov    %rdi,%rax
sub    %edx,%ecx
js     1289 <sub_const_r_1+0x189>
lea    0x1(%rcx),%r8d
cmp    $0x4,%r8d
jb     112f <sub_const_r_1+0x2f>
lea    (%rsi,%r8,8),%rdx
cmp    %rax,%rdx
jbe    11cc <sub_const_r_1+0xcc>
lea    (%rax,%r8,8),%rdx
cmp    %rsi,%rdx
jbe    11cc <sub_const_r_1+0xcc>
xor    %edi,%edi
mov    %rdi,%r9
not    %r9
add    %r8,%r9
mov    %r8,%rdx
and    $0x3,%rdx
je     1168 <sub_const_r_1+0x68>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movapd %xmm0,%xmm1
subsd  (%rsi,%rdi,8),%xmm1
movsd  %xmm1,(%rax,%rdi,8)
add    $0x1,%rdi
add    $0xffffffffffffffff,%rdx
jne    1150 <sub_const_r_1+0x50>
cmp    $0x3,%r9
jb     1289 <sub_const_r_1+0x189>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movapd %xmm0,%xmm1
subsd  (%rsi,%rdi,8),%xmm1
movsd  %xmm1,(%rax,%rdi,8)
movapd %xmm0,%xmm1
subsd  0x8(%rsi,%rdi,8),%xmm1
movsd  %xmm1,0x8(%rax,%rdi,8)
movapd %xmm0,%xmm1
subsd  0x10(%rsi,%rdi,8),%xmm1
movsd  %xmm1,0x10(%rax,%rdi,8)
movapd %xmm0,%xmm1
subsd  0x18(%rsi,%rdi,8),%xmm1
movsd  %xmm1,0x18(%rax,%rdi,8)
add    $0x4,%rdi
cmp    %rdi,%r8
jne    1180 <sub_const_r_1+0x80>
jmp    1289 <sub_const_r_1+0x189>
mov    %r8d,%edi
and    $0xfffffffc,%edi
movapd %xmm0,%xmm1
unpcklpd %xmm0,%xmm1
lea    -0x4(%rdi),%rdx
mov    %rdx,%r9
shr    $0x2,%r9
add    $0x1,%r9
test   %rdx,%rdx
je     12ab <sub_const_r_1+0x1ab>
mov    %r9,%r10
and    $0xfffffffffffffffe,%r10
xor    %edx,%edx
nopl   0x0(%rax,%rax,1)
movupd (%rsi,%rdx,8),%xmm2
movupd 0x10(%rsi,%rdx,8),%xmm3
movapd %xmm1,%xmm4
subpd  %xmm2,%xmm4
movapd %xmm1,%xmm2
subpd  %xmm3,%xmm2
movupd %xmm4,(%rax,%rdx,8)
movupd %xmm2,0x10(%rax,%rdx,8)
movupd 0x20(%rsi,%rdx,8),%xmm2
movupd 0x30(%rsi,%rdx,8),%xmm3
movapd %xmm1,%xmm4
subpd  %xmm2,%xmm4
movapd %xmm1,%xmm2
subpd  %xmm3,%xmm2
movupd %xmm4,0x20(%rax,%rdx,8)
movupd %xmm2,0x30(%rax,%rdx,8)
add    $0x8,%rdx
add    $0xfffffffffffffffe,%r10
jne    1200 <sub_const_r_1+0x100>
test   $0x1,%r9b
je     1280 <sub_const_r_1+0x180>
movupd (%rsi,%rdx,8),%xmm2
movupd 0x10(%rsi,%rdx,8),%xmm3
movapd %xmm1,%xmm4
subpd  %xmm2,%xmm4
subpd  %xmm3,%xmm1
movupd %xmm4,(%rax,%rdx,8)
movupd %xmm1,0x10(%rax,%rdx,8)
cmp    %r8,%rdi
jne    1131 <sub_const_r_1+0x31>
lea    0x1(%rcx),%edx
xorps  %xmm1,%xmm1
cvtsi2sd %edx,%xmm1
movslq %ecx,%rcx
movsd  0x8(%rax,%rcx,8),%xmm2
mulsd  %xmm1,%xmm0
subsd  %xmm0,%xmm2
movsd  %xmm2,0x8(%rax,%rcx,8)
ret
xor    %edx,%edx
test   $0x1,%r9b
jne    125e <sub_const_r_1+0x15e>
jmp    1280 <sub_const_r_1+0x180>

LLVM IR (-O0):
define double* @sub_const_r_1(double* %0, double %1, double* %2, i32 %3, i32 %4) {
%6 = alloca double*
%7 = alloca double
%8 = alloca double*
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
store double* %0, double** %6
store double %1, double* %7
store double* %2, double** %8
store i32 %3, i32* %9
store i32 %4, i32* %10
store i32 0, i32* %11
br label %12
12: ; preds = %30, %5
%13 = load i32, i32* %11
%14 = load i32, i32* %10
%15 = load i32, i32* %9
%16 = sub nsw i32 %14, %15
%17 = icmp sle i32 %13, %16
br i1 %17, label %18, label %33
18: ; preds = %12
%19 = load double, double* %7
%20 = load double*, double** %8
%21 = load i32, i32* %11
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds double, double* %20, i64 %22
%24 = load double, double* %23
%25 = fsub double %19, %24
%26 = load double*, double** %6
%27 = load i32, i32* %11
%28 = sext i32 %27 to i64
%29 = getelementptr inbounds double, double* %26, i64 %28
store double %25, double* %29
br label %30
30: ; preds = %18
%31 = load i32, i32* %11
%32 = add nsw i32 %31, 1
store i32 %32, i32* %11
br label %12
33: ; preds = %12
%34 = load double, double* %7
%35 = load i32, i32* %10
%36 = load i32, i32* %9
%37 = sub nsw i32 %35, %36
%38 = add nsw i32 %37, 1
%39 = sitofp i32 %38 to double
%40 = load double*, double** %6
%41 = load i32, i32* %10
%42 = load i32, i32* %9
%43 = sub nsw i32 %41, %42
%44 = add nsw i32 %43, 1
%45 = sext i32 %44 to i64
%46 = getelementptr inbounds double, double* %40, i64 %45
%47 = load double, double* %46
%48 = fneg double %34
%49 = call double @llvm.fmuladd.f64(double %48, double %39, double %47)
store double %49, double* %46
%50 = load double*, double** %6
ret double* %50
}

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