void seife_first(double *x, int n) {
  double x0 = x[0];
  int i;
  for (i = 0; i < n; ++i) {
    x[i] -= x0;
  }
}


x86 assembly (clang, -O0):
<seife_first>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    -0x8(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    1154 <seife_first+0x54>
movsd  -0x18(%rbp),%xmm1
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
subsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    111f <seife_first+0x1f>
pop    %rbp
ret

x86 assembly (clang, -O2):
<seife_first>:
test   %esi,%esi
jle    1207 <seife_first+0x107>
movsd  (%rdi),%xmm0
movapd %xmm0,%xmm1
subsd  %xmm0,%xmm1
movsd  %xmm1,(%rdi)
cmp    $0x1,%esi
je     1207 <seife_first+0x107>
mov    %esi,%eax
lea    -0x1(%rax),%r8
mov    $0x1,%ecx
cmp    $0x4,%r8
jb     11f0 <seife_first+0xf0>
mov    %r8,%rcx
and    $0xfffffffffffffffc,%rcx
movapd %xmm0,%xmm1
unpcklpd %xmm0,%xmm1
lea    -0x4(%rcx),%rdx
mov    %rdx,%r9
shr    $0x2,%r9
add    $0x1,%r9
test   %rdx,%rdx
je     1208 <seife_first+0x108>
mov    %r9,%rdx
and    $0xfffffffffffffffe,%rdx
mov    $0x1,%esi
nopl   0x0(%rax)
movupd (%rdi,%rsi,8),%xmm2
movupd 0x10(%rdi,%rsi,8),%xmm3
movupd 0x20(%rdi,%rsi,8),%xmm4
movupd 0x30(%rdi,%rsi,8),%xmm5
subpd  %xmm1,%xmm2
subpd  %xmm1,%xmm3
movupd %xmm2,(%rdi,%rsi,8)
movupd %xmm3,0x10(%rdi,%rsi,8)
subpd  %xmm1,%xmm4
subpd  %xmm1,%xmm5
movupd %xmm4,0x20(%rdi,%rsi,8)
movupd %xmm5,0x30(%rdi,%rsi,8)
add    $0x8,%rsi
add    $0xfffffffffffffffe,%rdx
jne    1170 <seife_first+0x70>
test   $0x1,%r9b
je     11dc <seife_first+0xdc>
movupd (%rdi,%rsi,8),%xmm2
movupd 0x10(%rdi,%rsi,8),%xmm3
subpd  %xmm1,%xmm2
subpd  %xmm1,%xmm3
movupd %xmm2,(%rdi,%rsi,8)
movupd %xmm3,0x10(%rdi,%rsi,8)
cmp    %rcx,%r8
je     1207 <seife_first+0x107>
or     $0x1,%rcx
cs nopw 0x0(%rax,%rax,1)
nop
movsd  (%rdi,%rcx,8),%xmm1
subsd  %xmm0,%xmm1
movsd  %xmm1,(%rdi,%rcx,8)
add    $0x1,%rcx
cmp    %rcx,%rax
jne    11f0 <seife_first+0xf0>
ret
mov    $0x1,%esi
test   $0x1,%r9b
jne    11be <seife_first+0xbe>
jmp    11dc <seife_first+0xdc>

LLVM IR (-O0):
define void @seife_first(double* %0, i32 %1) {
%3 = alloca double*
%4 = alloca i32
%5 = alloca double
%6 = alloca i32
store double* %0, double** %3
store i32 %1, i32* %4
%7 = load double*, double** %3
%8 = getelementptr inbounds double, double* %7, i64 0
%9 = load double, double* %8
store double %9, double* %5
store i32 0, i32* %6
br label %10
10: ; preds = %22, %2
%11 = load i32, i32* %6
%12 = load i32, i32* %4
%13 = icmp slt i32 %11, %12
br i1 %13, label %14, label %25
14: ; preds = %10
%15 = load double, double* %5
%16 = load double*, double** %3
%17 = load i32, i32* %6
%18 = sext i32 %17 to i64
%19 = getelementptr inbounds double, double* %16, i64 %18
%20 = load double, double* %19
%21 = fsub double %20, %15
store double %21, double* %19
br label %22
22: ; preds = %14
%23 = load i32, i32* %6
%24 = add nsw i32 %23, 1
store i32 %24, i32* %6
br label %10
25: ; preds = %10
ret void
}

LLVM IR (-O2):
define void @seife_first(double* nocapture %0, i32 %1) {
%3 = load double, double* %0
%4 = icmp sgt i32 %1, 0
br i1 %4, label %5, label %82
5: ; preds = %2
%6 = zext i32 %1 to i64
%7 = fsub double %3, %3
store double %7, double* %0
%8 = icmp eq i32 %1, 1
br i1 %8, label %82, label %9
9: ; preds = %5
%10 = add nsw i64 %6, -1
%11 = icmp ult i64 %10, 4
br i1 %11, label %72, label %12
12: ; preds = %9
%13 = and i64 %10, -4
%14 = or i64 %13, 1
%15 = insertelement <2 x double> poison, double %3, i64 0
%16 = shufflevector <2 x double> %15, <2 x double> poison, <2 x i32> zeroinitializer
%17 = insertelement <2 x double> poison, double %3, i64 0
%18 = shufflevector <2 x double> %17, <2 x double> poison, <2 x i32> zeroinitializer
%19 = add nsw i64 %13, -4
%20 = lshr exact i64 %19, 2
%21 = add nuw nsw i64 %20, 1
%22 = and i64 %21, 1
%23 = icmp eq i64 %19, 0
br i1 %23, label %56, label %24
24: ; preds = %12
%25 = and i64 %21, 9223372036854775806
br label %26
26: ; preds = %26, %24
%27 = phi i64 [ 0, %24 ], [ %51, %26 ]
%28 = phi i64 [ 0, %24 ], [ %52, %26 ]
%29 = or i64 %27, 1
%30 = getelementptr inbounds double, double* %0, i64 %29
%31 = bitcast double* %30 to <2 x double>*
%32 = load <2 x double>, <2 x double>* %31
%33 = getelementptr inbounds double, double* %30, i64 2
%34 = bitcast double* %33 to <2 x double>*
%35 = load <2 x double>, <2 x double>* %34
%36 = fsub <2 x double> %32, %16
%37 = fsub <2 x double> %35, %18
%38 = bitcast double* %30 to <2 x double>*
store <2 x double> %36, <2 x double>* %38
%39 = bitcast double* %33 to <2 x double>*
store <2 x double> %37, <2 x double>* %39
%40 = or i64 %27, 5
%41 = getelementptr inbounds double, double* %0, i64 %40
%42 = bitcast double* %41 to <2 x double>*
%43 = load <2 x double>, <2 x double>* %42
%44 = getelementptr inbounds double, double* %41, i64 2
%45 = bitcast double* %44 to <2 x double>*
%46 = load <2 x double>, <2 x double>* %45
%47 = fsub <2 x double> %43, %16
%48 = fsub <2 x double> %46, %18
%49 = bitcast double* %41 to <2 x double>*
store <2 x double> %47, <2 x double>* %49
%50 = bitcast double* %44 to <2 x double>*
store <2 x double> %48, <2 x double>* %50
%51 = add nuw i64 %27, 8
%52 = add i64 %28, 2
%53 = icmp eq i64 %52, %25
br i1 %53, label %54, label %26
54: ; preds = %26
%55 = or i64 %51, 1
br label %56
56: ; preds = %54, %12
%57 = phi i64 [ 1, %12 ], [ %55, %54 ]
%58 = icmp eq i64 %22, 0
br i1 %58, label %70, label %59
59: ; preds = %56
%60 = getelementptr inbounds double, double* %0, i64 %57
%61 = bitcast double* %60 to <2 x double>*
%62 = load <2 x double>, <2 x double>* %61
%63 = getelementptr inbounds double, double* %60, i64 2
%64 = bitcast double* %63 to <2 x double>*
%65 = load <2 x double>, <2 x double>* %64
%66 = fsub <2 x double> %62, %16
%67 = fsub <2 x double> %65, %18
%68 = bitcast double* %60 to <2 x double>*
store <2 x double> %66, <2 x double>* %68
%69 = bitcast double* %63 to <2 x double>*
store <2 x double> %67, <2 x double>* %69
br label %70
70: ; preds = %56, %59
%71 = icmp eq i64 %10, %13
br i1 %71, label %82, label %72
72: ; preds = %9, %70
%73 = phi i64 [ 1, %9 ], [ %14, %70 ]
br label %74
74: ; preds = %72, %74
%75 = phi i64 [ %80, %74 ], [ %73, %72 ]
%76 = getelementptr inbounds double, double* %0, i64 %75
%77 = load double, double* %76
%78 = getelementptr inbounds double, double* %0, i64 %75
%79 = fsub double %77, %3
store double %79, double* %78
%80 = add nuw nsw i64 %75, 1
%81 = icmp eq i64 %80, %6
br i1 %81, label %82, label %74
82: ; preds = %74, %5, %70, %2
ret void
}