#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 fabs(double);
double pow(double, double);
void compute_lambda_path(double *lambda, int K, double alpha, double epsilon,
                         double *g, int p) {
  int i, j;
  double alf;
  lambda[0] = 0;
  for (j = 0; j < p; ++j)
    if (fabs(g[j]) > lambda[0])
      lambda[0] = fabs(g[j]);
  lambda[0] /= (alpha < 1e-3) ? 1e-3 : alpha;
  alf = pow(epsilon, 1.0 / (double)(K - 1));
  for (i = 1; i < K; ++i)
    lambda[i] = lambda[i - 1] * alf;
}


x86 assembly (clang, -O0):
<compute_lambda_path>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
movsd  %xmm0,-0x18(%rbp)
movsd  %xmm1,-0x20(%rbp)
mov    %rdx,-0x28(%rbp)
mov    %ecx,-0x2c(%rbp)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x2c(%rbp),%eax
jge    11a7 <compute_lambda_path+0x97>
mov    -0x28(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movaps 0xeae(%rip),%xmm1
pand   %xmm1,%xmm0
mov    -0x8(%rbp),%rax
ucomisd (%rax),%xmm0
jbe    1194 <compute_lambda_path+0x84>
mov    -0x28(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movaps 0xe88(%rip),%xmm1
pand   %xmm1,%xmm0
mov    -0x8(%rbp),%rax
movsd  %xmm0,(%rax)
jmp    1199 <compute_lambda_path+0x89>
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    1142 <compute_lambda_path+0x32>
movsd  0xe51(%rip),%xmm0
ucomisd -0x18(%rbp),%xmm0
jbe    11cc <compute_lambda_path+0xbc>
movsd  0xe3e(%rip),%xmm0
movsd  %xmm0,-0x48(%rbp)
jmp    11d6 <compute_lambda_path+0xc6>
movsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
movsd  -0x48(%rbp),%xmm1
mov    -0x8(%rbp),%rax
movsd  (%rax),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,(%rax)
movsd  -0x20(%rbp),%xmm0
mov    -0xc(%rbp),%eax
sub    $0x1,%eax
cvtsi2sd %eax,%xmm2
movsd  0xe06(%rip),%xmm1
divsd  %xmm2,%xmm1
call   1030 <pow@plt>
movsd  %xmm0,-0x40(%rbp)
movl   $0x1,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    1255 <compute_lambda_path+0x145>
mov    -0x8(%rbp),%rax
mov    -0x30(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mulsd  -0x40(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x30(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    1217 <compute_lambda_path+0x107>
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<compute_lambda_path>:
push   %r14
push   %rbx
push   %rax
movapd %xmm1,%xmm2
mov    %esi,%r14d
mov    %rdi,%rbx
movq   $0x0,(%rdi)
test   %ecx,%ecx
jle    115b <compute_lambda_path+0x4b>
mov    %ecx,%eax
cmp    $0x1,%ecx
jne    121a <compute_lambda_path+0x10a>
xorpd  %xmm1,%xmm1
xor    %ecx,%ecx
test   $0x1,%al
je     115f <compute_lambda_path+0x4f>
movsd  (%rdx,%rcx,8),%xmm3
andpd  0xeb5(%rip),%xmm3
ucomisd %xmm1,%xmm3
jbe    115f <compute_lambda_path+0x4f>
movsd  %xmm3,(%rbx)
movapd %xmm3,%xmm1
jmp    115f <compute_lambda_path+0x4f>
xorpd  %xmm1,%xmm1
movsd  0xea9(%rip),%xmm3
maxsd  %xmm0,%xmm3
divsd  %xmm3,%xmm1
movsd  %xmm1,(%rbx)
lea    -0x1(%r14),%eax
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
movsd  0xe92(%rip),%xmm1
divsd  %xmm0,%xmm1
movapd %xmm2,%xmm0
call   1030 <pow@plt>
cmp    $0x2,%r14d
jl     1212 <compute_lambda_path+0x102>
mov    %r14d,%esi
movsd  (%rbx),%xmm1
lea    -0x1(%rsi),%rdx
add    $0xfffffffffffffffe,%rsi
mov    %edx,%eax
and    $0x3,%eax
mov    $0x1,%ecx
cmp    $0x3,%rsi
jb     11f5 <compute_lambda_path+0xe5>
and    $0xfffffffffffffffc,%rdx
xor    %ecx,%ecx
xchg   %ax,%ax
mulsd  %xmm0,%xmm1
movsd  %xmm1,0x8(%rbx,%rcx,8)
mulsd  %xmm0,%xmm1
movsd  %xmm1,0x10(%rbx,%rcx,8)
mulsd  %xmm0,%xmm1
movsd  %xmm1,0x18(%rbx,%rcx,8)
mulsd  %xmm0,%xmm1
movsd  %xmm1,0x20(%rbx,%rcx,8)
add    $0x4,%rcx
cmp    %rcx,%rdx
jne    11c0 <compute_lambda_path+0xb0>
add    $0x1,%rcx
test   %rax,%rax
je     1212 <compute_lambda_path+0x102>
lea    (%rbx,%rcx,8),%rcx
xor    %edx,%edx
mulsd  %xmm0,%xmm1
movsd  %xmm1,(%rcx,%rdx,8)
add    $0x1,%rdx
cmp    %rdx,%rax
jne    1200 <compute_lambda_path+0xf0>
add    $0x8,%rsp
pop    %rbx
pop    %r14
ret
mov    %eax,%esi
and    $0xfffffffe,%esi
xorpd  %xmm1,%xmm1
xor    %ecx,%ecx
movapd 0xdd3(%rip),%xmm3
jmp    123d <compute_lambda_path+0x12d>
nop
add    $0x2,%rcx
cmp    %rcx,%rsi
je     113a <compute_lambda_path+0x2a>
movsd  (%rdx,%rcx,8),%xmm4
andpd  %xmm3,%xmm4
ucomisd %xmm1,%xmm4
jbe    1254 <compute_lambda_path+0x144>
movsd  %xmm4,(%rbx)
movapd %xmm4,%xmm1
movsd  0x8(%rdx,%rcx,8),%xmm4
andpd  %xmm3,%xmm4
ucomisd %xmm1,%xmm4
jbe    1230 <compute_lambda_path+0x120>
movsd  %xmm4,(%rbx)
movapd %xmm4,%xmm1
jmp    1230 <compute_lambda_path+0x120>

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

LLVM IR (-O2):
define void @compute_lambda_path(double* nocapture %0, i32 %1, double %2, double %3, double* nocapture %4, i32 %5) {
store double 0.000000e+00, double* %0
%7 = icmp sgt i32 %5, 0
br i1 %7, label %8, label %47
8: ; preds = %6
%9 = zext i32 %5 to i64
%10 = and i64 %9, 1
%11 = icmp eq i32 %5, 1
br i1 %11, label %36, label %12
12: ; preds = %8
%13 = and i64 %9, 4294967294
br label %14
14: ; preds = %31, %12
%15 = phi double [ 0.000000e+00, %12 ], [ %32, %31 ]
%16 = phi i64 [ 0, %12 ], [ %33, %31 ]
%17 = phi i64 [ 0, %12 ], [ %34, %31 ]
%18 = getelementptr inbounds double, double* %4, i64 %16
%19 = load double, double* %18
%20 = tail call double @llvm.fabs.f64(double %19)
%21 = fcmp ogt double %20, %15
br i1 %21, label %22, label %23
22: ; preds = %14
store double %20, double* %0
br label %23
23: ; preds = %14, %22
%24 = phi double [ %15, %14 ], [ %20, %22 ]
%25 = or i64 %16, 1
%26 = getelementptr inbounds double, double* %4, i64 %25
%27 = load double, double* %26
%28 = tail call double @llvm.fabs.f64(double %27)
%29 = fcmp ogt double %28, %24
br i1 %29, label %30, label %31
30: ; preds = %23
store double %28, double* %0
br label %31
31: ; preds = %30, %23
%32 = phi double [ %24, %23 ], [ %28, %30 ]
%33 = add nuw nsw i64 %16, 2
%34 = add i64 %17, 2
%35 = icmp eq i64 %34, %13
br i1 %35, label %36, label %14
36: ; preds = %31, %8
%37 = phi double [ undef, %8 ], [ %32, %31 ]
%38 = phi double [ 0.000000e+00, %8 ], [ %32, %31 ]
%39 = phi i64 [ 0, %8 ], [ %33, %31 ]
%40 = icmp eq i64 %10, 0
br i1 %40, label %47, label %41
41: ; preds = %36
%42 = getelementptr inbounds double, double* %4, i64 %39
%43 = load double, double* %42
%44 = tail call double @llvm.fabs.f64(double %43)
%45 = fcmp ogt double %44, %38
br i1 %45, label %46, label %47
46: ; preds = %41
store double %44, double* %0
br label %47
47: ; preds = %36, %46, %41, %6
%48 = phi double [ 0.000000e+00, %6 ], [ %37, %36 ], [ %38, %41 ], [ %44, %46 ]
%49 = fcmp olt double %2, 1.000000e-03
%50 = select i1 %49, double 1.000000e-03, double %2
%51 = fdiv double %48, %50
store double %51, double* %0
%52 = add nsw i32 %1, -1
%53 = sitofp i32 %52 to double
%54 = fdiv double 1.000000e+00, %53
%55 = tail call double @pow(double %3, double %54)
%56 = icmp sgt i32 %1, 1
br i1 %56, label %57, label %97
57: ; preds = %47
%58 = zext i32 %1 to i64
%59 = load double, double* %0
%60 = add nsw i64 %58, -1
%61 = add nsw i64 %58, -2
%62 = and i64 %60, 3
%63 = icmp ult i64 %61, 3
br i1 %63, label %84, label %64
64: ; preds = %57
%65 = and i64 %60, -4
br label %66
66: ; preds = %66, %64
%67 = phi double [ %59, %64 ], [ %79, %66 ]
%68 = phi i64 [ 1, %64 ], [ %81, %66 ]
%69 = phi i64 [ 0, %64 ], [ %82, %66 ]
%70 = fmul double %55, %67
%71 = getelementptr inbounds double, double* %0, i64 %68
store double %70, double* %71
%72 = add nuw nsw i64 %68, 1
%73 = fmul double %55, %70
%74 = getelementptr inbounds double, double* %0, i64 %72
store double %73, double* %74
%75 = add nuw nsw i64 %68, 2
%76 = fmul double %55, %73
%77 = getelementptr inbounds double, double* %0, i64 %75
store double %76, double* %77
%78 = add nuw nsw i64 %68, 3
%79 = fmul double %55, %76
%80 = getelementptr inbounds double, double* %0, i64 %78
store double %79, double* %80
%81 = add nuw nsw i64 %68, 4
%82 = add i64 %69, 4
%83 = icmp eq i64 %82, %65
br i1 %83, label %84, label %66
84: ; preds = %66, %57
%85 = phi double [ %59, %57 ], [ %79, %66 ]
%86 = phi i64 [ 1, %57 ], [ %81, %66 ]
%87 = icmp eq i64 %62, 0
br i1 %87, label %97, label %88
88: ; preds = %84, %88
%89 = phi double [ %92, %88 ], [ %85, %84 ]
%90 = phi i64 [ %94, %88 ], [ %86, %84 ]
%91 = phi i64 [ %95, %88 ], [ 0, %84 ]
%92 = fmul double %55, %89
%93 = getelementptr inbounds double, double* %0, i64 %90
store double %92, double* %93
%94 = add nuw nsw i64 %90, 1
%95 = add i64 %91, 1
%96 = icmp eq i64 %95, %62
br i1 %96, label %97, label %88
97: ; preds = %84, %88, %47
ret void
}