#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 */
int /*<<< orphan*/ Emptied(int, double **);
double Variance(int, int, double **);
double Lamda(int a, int b, double vab, double **delta, int n, int r) {
  int i;
  double lamda = 0.0;
  if (vab == 0.0)
    lamda = 0.5;
  else {
    for (i = 1; i <= n; i++) {
      if (a != i && b != i && !Emptied(i, delta))
        lamda = lamda + (Variance(b, i, delta) - Variance(a, i, delta));
    }
    lamda = 0.5 + lamda / (2 * (r - 2) * vab);
  }
  if (lamda > 1.0)
    lamda = 1.0;
  if (lamda < 0.0)
    lamda = 0.0;
  return (lamda);
}


x86 assembly (clang, -O0):
<Lamda>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
movsd  %xmm0,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    %r8d,-0x20(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x10(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    1170 <Lamda+0x50>
jp     1170 <Lamda+0x50>
movsd  0xe9a(%rip),%xmm0
movsd  %xmm0,-0x30(%rbp)
jmp    1236 <Lamda+0x116>
movl   $0x1,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jg     120a <Lamda+0xea>
mov    -0x4(%rbp),%eax
cmp    -0x24(%rbp),%eax
je     11f7 <Lamda+0xd7>
mov    -0x8(%rbp),%eax
cmp    -0x24(%rbp),%eax
je     11f7 <Lamda+0xd7>
mov    -0x24(%rbp),%edi
mov    -0x18(%rbp),%rsi
call   1040 <Emptied@plt>
cmp    $0x0,%eax
jne    11f7 <Lamda+0xd7>
movsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x8(%rbp),%edi
mov    -0x24(%rbp),%esi
mov    -0x18(%rbp),%rdx
call   1030 <Variance@plt>
movsd  %xmm0,-0x40(%rbp)
mov    -0x4(%rbp),%edi
mov    -0x24(%rbp),%esi
mov    -0x18(%rbp),%rdx
call   1030 <Variance@plt>
movsd  -0x40(%rbp),%xmm1
movaps %xmm0,%xmm2
movsd  -0x38(%rbp),%xmm0
subsd  %xmm2,%xmm1
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x30(%rbp)
jmp    11fc <Lamda+0xdc>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1177 <Lamda+0x57>
movsd  -0x30(%rbp),%xmm1
mov    -0x20(%rbp),%eax
sub    $0x2,%eax
shl    $0x1,%eax
cvtsi2sd %eax,%xmm0
mulsd  -0x10(%rbp),%xmm0
divsd  %xmm0,%xmm1
movsd  0xdd3(%rip),%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x30(%rbp),%xmm0
movsd  0xdc5(%rip),%xmm1
ucomisd %xmm1,%xmm0
jbe    125a <Lamda+0x13a>
movsd  0xdb3(%rip),%xmm0
movsd  %xmm0,-0x30(%rbp)
xorps  %xmm0,%xmm0
ucomisd -0x30(%rbp),%xmm0
jbe    1270 <Lamda+0x150>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x30(%rbp),%xmm0
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<Lamda>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    1147 <Lamda+0x27>
jp     1147 <Lamda+0x27>
movsd  0xebe(%rip),%xmm0
jmp    120c <Lamda+0xec>
mov    %r8d,%r14d
mov    %ecx,%r13d
movsd  %xmm0,0x8(%rsp)
xorpd  %xmm0,%xmm0
movsd  %xmm0,(%rsp)
test   %ecx,%ecx
jle    11e3 <Lamda+0xc3>
mov    %rdx,%r15
mov    %esi,%r12d
mov    %edi,%ebp
neg    %r13d
mov    $0x1,%ebx
xorpd  %xmm0,%xmm0
movsd  %xmm0,(%rsp)
jmp    1193 <Lamda+0x73>
nop
lea    (%rbx,%r13,1),%eax
add    $0x1,%eax
mov    %ebx,%ecx
add    $0x1,%ecx
mov    %ecx,%ebx
cmp    $0x1,%eax
je     11e3 <Lamda+0xc3>
cmp    %ebx,%ebp
je     1180 <Lamda+0x60>
cmp    %ebx,%r12d
je     1180 <Lamda+0x60>
mov    %ebx,%edi
mov    %r15,%rsi
call   1040 <Emptied@plt>
test   %eax,%eax
jne    1180 <Lamda+0x60>
mov    %r12d,%edi
mov    %ebx,%esi
mov    %r15,%rdx
call   1030 <Variance@plt>
movsd  %xmm0,0x10(%rsp)
mov    %ebp,%edi
mov    %ebx,%esi
mov    %r15,%rdx
call   1030 <Variance@plt>
movsd  0x10(%rsp),%xmm1
subsd  %xmm0,%xmm1
movsd  (%rsp),%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rsp)
jmp    1180 <Lamda+0x60>
lea    (%r14,%r14,1),%eax
add    $0xfffffffc,%eax
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
mulsd  0x8(%rsp),%xmm0
movsd  (%rsp),%xmm1
divsd  %xmm0,%xmm1
movapd %xmm1,%xmm0
addsd  0xdf4(%rip),%xmm0
movsd  0xdf4(%rip),%xmm1
minsd  %xmm0,%xmm1
xorpd  %xmm0,%xmm0
maxsd  %xmm1,%xmm0
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define double @Lamda(i32 %0, i32 %1, double %2, double** %3, i32 %4, i32 %5) {
%7 = alloca i32
%8 = alloca i32
%9 = alloca double
%10 = alloca double**
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca double
store i32 %0, i32* %7
store i32 %1, i32* %8
store double %2, double* %9
store double** %3, double*** %10
store i32 %4, i32* %11
store i32 %5, i32* %12
store double 0.000000e+00, double* %14
%15 = load double, double* %9
%16 = fcmp oeq double %15, 0.000000e+00
br i1 %16, label %17, label %18
17: ; preds = %6
store double 5.000000e-01, double* %14
br label %62
18: ; preds = %6
store i32 1, i32* %13
br label %19
19: ; preds = %49, %18
%20 = load i32, i32* %13
%21 = load i32, i32* %11
%22 = icmp sle i32 %20, %21
br i1 %22, label %23, label %52
23: ; preds = %19
%24 = load i32, i32* %7
%25 = load i32, i32* %13
%26 = icmp ne i32 %24, %25
br i1 %26, label %27, label %48
27: ; preds = %23
%28 = load i32, i32* %8
%29 = load i32, i32* %13
%30 = icmp ne i32 %28, %29
br i1 %30, label %31, label %48
31: ; preds = %27
%32 = load i32, i32* %13
%33 = load double**, double*** %10
%34 = call i32 @Emptied(i32 %32, double** %33)
%35 = icmp ne i32 %34, 0
br i1 %35, label %48, label %36
36: ; preds = %31
%37 = load double, double* %14
%38 = load i32, i32* %8
%39 = load i32, i32* %13
%40 = load double**, double*** %10
%41 = call double @Variance(i32 %38, i32 %39, double** %40)
%42 = load i32, i32* %7
%43 = load i32, i32* %13
%44 = load double**, double*** %10
%45 = call double @Variance(i32 %42, i32 %43, double** %44)
%46 = fsub double %41, %45
%47 = fadd double %37, %46
store double %47, double* %14
br label %48
48: ; preds = %36, %31, %27, %23
br label %49
49: ; preds = %48
%50 = load i32, i32* %13
%51 = add nsw i32 %50, 1
store i32 %51, i32* %13
br label %19
52: ; preds = %19
%53 = load double, double* %14
%54 = load i32, i32* %12
%55 = sub nsw i32 %54, 2
%56 = mul nsw i32 2, %55
%57 = sitofp i32 %56 to double
%58 = load double, double* %9
%59 = fmul double %57, %58
%60 = fdiv double %53, %59
%61 = fadd double 5.000000e-01, %60
store double %61, double* %14
br label %62
62: ; preds = %52, %17
%63 = load double, double* %14
%64 = fcmp ogt double %63, 1.000000e+00
br i1 %64, label %65, label %66
65: ; preds = %62
store double 1.000000e+00, double* %14
br label %66
66: ; preds = %65, %62
%67 = load double, double* %14
%68 = fcmp olt double %67, 0.000000e+00
br i1 %68, label %69, label %70
69: ; preds = %66
store double 0.000000e+00, double* %14
br label %70
70: ; preds = %69, %66
%71 = load double, double* %14
ret double %71
}

LLVM IR (-O2):
define double @Lamda(i32 %0, i32 %1, double %2, double** %3, i32 %4, i32 %5) {
%7 = fcmp oeq double %2, 0.000000e+00
br i1 %7, label %36, label %8
8: ; preds = %6
%9 = icmp slt i32 %4, 1
br i1 %9, label %28, label %10
10: ; preds = %8, %24
%11 = phi double [ %25, %24 ], [ 0.000000e+00, %8 ]
%12 = phi i32 [ %26, %24 ], [ 1, %8 ]
%13 = icmp eq i32 %12, %0
%14 = icmp eq i32 %12, %1
%15 = or i1 %13, %14
br i1 %15, label %24, label %16
16: ; preds = %10
%17 = tail call i32 @Emptied(i32 %12, double** %3)
%18 = icmp eq i32 %17, 0
br i1 %18, label %19, label %24
19: ; preds = %16
%20 = tail call double @Variance(i32 %1, i32 %12, double** %3)
%21 = tail call double @Variance(i32 %0, i32 %12, double** %3)
%22 = fsub double %20, %21
%23 = fadd double %11, %22
br label %24
24: ; preds = %10, %16, %19
%25 = phi double [ %11, %16 ], [ %23, %19 ], [ %11, %10 ]
%26 = add nuw i32 %12, 1
%27 = icmp eq i32 %12, %4
br i1 %27, label %28, label %10
28: ; preds = %24, %8
%29 = phi double [ 0.000000e+00, %8 ], [ %25, %24 ]
%30 = shl i32 %5, 1
%31 = add i32 %30, -4
%32 = sitofp i32 %31 to double
%33 = fmul double %32, %2
%34 = fdiv double %29, %33
%35 = fadd double %34, 5.000000e-01
br label %36
36: ; preds = %6, %28
%37 = phi double [ %35, %28 ], [ 5.000000e-01, %6 ]
%38 = fcmp ogt double %37, 1.000000e+00
%39 = select i1 %38, double 1.000000e+00, double %37
%40 = fcmp olt double %39, 0.000000e+00
%41 = select i1 %40, double 0.000000e+00, double %39
ret double %41
}