#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
double sqrt(double);
void epp2(double *x, double *v, int n, double rho) {
  int i;
  double v2 = 0, ratio;
  for (i = 0; i < n; i++) {
    v2 += v[i] * v[i];
  }
  v2 = sqrt(v2);
  if (rho >= v2)
    for (i = 0; i < n; i++)
      x[i] = 0;
  else {
    ratio = (v2 - rho) / v2;
    for (i = 0; i < n; i++)
      x[i] = v[i] * ratio;
  }
}


x86 assembly (clang, -O0):
<epp2>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
movsd  %xmm0,-0x20(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x30(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    117d <epp2+0x6d>
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x30(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1137 <epp2+0x27>
movsd  -0x30(%rbp),%xmm0
call   1030 <sqrt@plt>
movsd  %xmm0,-0x30(%rbp)
movsd  -0x20(%rbp),%xmm0
ucomisd -0x30(%rbp),%xmm0
jb     11d2 <epp2+0xc2>
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    11cd <epp2+0xbd>
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    11a3 <epp2+0x93>
jmp    122b <epp2+0x11b>
movsd  -0x30(%rbp),%xmm0
subsd  -0x20(%rbp),%xmm0
divsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    1226 <epp2+0x116>
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mulsd  -0x38(%rbp),%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    11ed <epp2+0xdd>
jmp    122b <epp2+0x11b>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<epp2>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
test   %edx,%edx
jle    139a <epp2+0x27a>
movapd %xmm0,%xmm3
mov    %edx,%ebp
mov    %rsi,%rbx
mov    %rdi,%r15
mov    %edx,%r14d
lea    -0x1(%r14),%rcx
mov    %r14d,%eax
and    $0x3,%eax
cmp    $0x3,%rcx
jae    1156 <epp2+0x36>
xorpd  %xmm0,%xmm0
xor    %ecx,%ecx
jmp    11b0 <epp2+0x90>
mov    %r14d,%edx
and    $0xfffffffc,%edx
xorpd  %xmm0,%xmm0
xor    %ecx,%ecx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movsd  (%rbx,%rcx,8),%xmm1
movsd  0x8(%rbx,%rcx,8),%xmm2
mulsd  %xmm1,%xmm1
addsd  %xmm0,%xmm1
mulsd  %xmm2,%xmm2
addsd  %xmm1,%xmm2
movsd  0x10(%rbx,%rcx,8),%xmm1
mulsd  %xmm1,%xmm1
addsd  %xmm2,%xmm1
movsd  0x18(%rbx,%rcx,8),%xmm0
mulsd  %xmm0,%xmm0
addsd  %xmm1,%xmm0
add    $0x4,%rcx
cmp    %rcx,%rdx
jne    1170 <epp2+0x50>
test   %rax,%rax
je     11d6 <epp2+0xb6>
lea    (%rbx,%rcx,8),%rcx
xor    %edx,%edx
nopl   0x0(%rax,%rax,1)
movsd  (%rcx,%rdx,8),%xmm1
mulsd  %xmm1,%xmm1
addsd  %xmm1,%xmm0
add    $0x1,%rdx
cmp    %rdx,%rax
jne    11c0 <epp2+0xa0>
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jb     1208 <epp2+0xe8>
sqrtsd %xmm0,%xmm0
ucomisd %xmm0,%xmm3
jb     121d <epp2+0xfd>
test   %ebp,%ebp
jle    139a <epp2+0x27a>
shl    $0x3,%r14
mov    %r15,%rdi
xor    %esi,%esi
mov    %r14,%rdx
call   1030 <memset@plt>
jmp    139a <epp2+0x27a>
movsd  %xmm3,(%rsp)
call   1040 <sqrt@plt>
movsd  (%rsp),%xmm3
ucomisd %xmm0,%xmm3
jae    11ea <epp2+0xca>
test   %ebp,%ebp
jle    139a <epp2+0x27a>
movapd %xmm0,%xmm1
subsd  %xmm3,%xmm1
divsd  %xmm0,%xmm1
cmp    $0x4,%ebp
jb     1250 <epp2+0x130>
lea    (%rbx,%r14,8),%rax
cmp    %r15,%rax
jbe    12f0 <epp2+0x1d0>
lea    (%r15,%r14,8),%rax
cmp    %rbx,%rax
jbe    12f0 <epp2+0x1d0>
xor    %eax,%eax
mov    %rax,%rcx
not    %rcx
add    %r14,%rcx
mov    %r14,%rdx
and    $0x3,%rdx
je     1289 <epp2+0x169>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movsd  (%rbx,%rax,8),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,(%r15,%rax,8)
add    $0x1,%rax
add    $0xffffffffffffffff,%rdx
jne    1270 <epp2+0x150>
cmp    $0x3,%rcx
jb     139a <epp2+0x27a>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movsd  (%rbx,%rax,8),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,(%r15,%rax,8)
movsd  0x8(%rbx,%rax,8),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,0x8(%r15,%rax,8)
movsd  0x10(%rbx,%rax,8),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,0x10(%r15,%rax,8)
movsd  0x18(%rbx,%rax,8),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,0x18(%r15,%rax,8)
add    $0x4,%rax
cmp    %rax,%r14
jne    12a0 <epp2+0x180>
jmp    139a <epp2+0x27a>
mov    %r14d,%eax
and    $0xfffffffc,%eax
movapd %xmm1,%xmm0
unpcklpd %xmm1,%xmm0
lea    -0x4(%rax),%rcx
mov    %rcx,%rdx
shr    $0x2,%rdx
add    $0x1,%rdx
test   %rcx,%rcx
je     13a5 <epp2+0x285>
mov    %rdx,%rsi
and    $0xfffffffffffffffe,%rsi
xor    %ecx,%ecx
nop
movupd (%rbx,%rcx,8),%xmm2
movupd 0x10(%rbx,%rcx,8),%xmm3
mulpd  %xmm0,%xmm2
mulpd  %xmm0,%xmm3
movupd %xmm2,(%r15,%rcx,8)
movupd %xmm3,0x10(%r15,%rcx,8)
movupd 0x20(%rbx,%rcx,8),%xmm2
movupd 0x30(%rbx,%rcx,8),%xmm3
mulpd  %xmm0,%xmm2
mulpd  %xmm0,%xmm3
movupd %xmm2,0x20(%r15,%rcx,8)
movupd %xmm3,0x30(%r15,%rcx,8)
add    $0x8,%rcx
add    $0xfffffffffffffffe,%rsi
jne    1320 <epp2+0x200>
test   $0x1,%dl
je     1391 <epp2+0x271>
movupd (%rbx,%rcx,8),%xmm2
movupd 0x10(%rbx,%rcx,8),%xmm3
mulpd  %xmm0,%xmm2
mulpd  %xmm0,%xmm3
movupd %xmm2,(%r15,%rcx,8)
movupd %xmm3,0x10(%r15,%rcx,8)
cmp    %r14,%rax
jne    1252 <epp2+0x132>
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret
xor    %ecx,%ecx
test   $0x1,%dl
jne    1371 <epp2+0x251>
jmp    1391 <epp2+0x271>

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

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