#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 BetaRand(size_t, size_t);
double DBL_EPSILON;
int Rand();
scalar_t__ isnan(double);
double log(int);
size_t BinoRand(double p, size_t n) {
  size_t r = 0;
  if (isnan(p))
    return 0;
  if (p < DBL_EPSILON)
    return 0;
  if (p >= 1 - DBL_EPSILON)
    return n;
  if ((p > 0.5) && (n < 15)) {
    size_t i;
    for (i = 0; i < n; i++) {
      if (Rand() < p)
        r++;
    }
    return r;
  }
  if (n * p < 10) {
    double q = -log(1 - p), e = -log(Rand()), s;
    r = n;
    for (s = e / r; s <= q; s += e / r) {
      r--;
      if (r == 0)
        break;
      e = -log(Rand());
    }
    r = n - r;
    return r;
  }
  if (1) {
    size_t i = (size_t)(p * (n + 1));
    double b = BetaRand(i, n + 1 - i);
    if (b <= p)
      r = i + BinoRand((p - b) / (1 - b), n - i);
    else
      r = i - 1 - BinoRand((b - p) / b, i - 1);
    return r;
  }
}


x86 assembly (clang, -O0):
<BinoRand>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
movsd  %xmm0,-0x10(%rbp)
mov    %rdi,-0x18(%rbp)
movq   $0x0,-0x20(%rbp)
movsd  -0x10(%rbp),%xmm0
call   1050 <isnan@plt>
cmp    $0x0,%rax
je     118a <BinoRand+0x3a>
movq   $0x0,-0x8(%rbp)
jmp    14e9 <BinoRand+0x399>
movsd  -0x10(%rbp),%xmm1
mov    0x2e52(%rip),%rax
movsd  (%rax),%xmm0
ucomisd %xmm1,%xmm0
jbe    11b1 <BinoRand+0x61>
movq   $0x0,-0x8(%rbp)
jmp    14e9 <BinoRand+0x399>
movsd  -0x10(%rbp),%xmm0
movsd  0xe42(%rip),%xmm1
mov    0x2e23(%rip),%rax
subsd  (%rax),%xmm1
ucomisd %xmm1,%xmm0
jb     11e0 <BinoRand+0x90>
mov    -0x18(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    14e9 <BinoRand+0x399>
movsd  -0x10(%rbp),%xmm0
movsd  0xe1b(%rip),%xmm1
ucomisd %xmm1,%xmm0
jbe    1261 <BinoRand+0x111>
cmpq   $0xf,-0x18(%rbp)
jae    1261 <BinoRand+0x111>
movq   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x18(%rbp),%rax
jae    1254 <BinoRand+0x104>
mov    $0x0,%al
call   1070 <Rand@plt>
cvtsi2sd %eax,%xmm1
movsd  -0x10(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    123e <BinoRand+0xee>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1243 <BinoRand+0xf3>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    120a <BinoRand+0xba>
mov    -0x20(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    14e9 <BinoRand+0x399>
movaps 0xdb8(%rip),%xmm0
movq   -0x18(%rbp),%xmm1
punpckldq %xmm0,%xmm1
movapd 0xdb7(%rip),%xmm0
subpd  %xmm0,%xmm1
movaps %xmm1,%xmm0
unpckhpd %xmm1,%xmm1
addsd  %xmm0,%xmm1
mulsd  -0x10(%rbp),%xmm1
movsd  0xd7b(%rip),%xmm0
ucomisd %xmm1,%xmm0
jbe    13d8 <BinoRand+0x288>
movsd  -0x10(%rbp),%xmm1
movsd  0xd54(%rip),%xmm0
subsd  %xmm1,%xmm0
cvttsd2si %xmm0,%edi
call   1060 <log@plt>
movapd 0xd7f(%rip),%xmm1
movaps %xmm1,-0x60(%rbp)
pxor   %xmm1,%xmm0
movlpd %xmm0,-0x30(%rbp)
xor    %eax,%eax
call   1070 <Rand@plt>
mov    %eax,%edi
call   1060 <log@plt>
movaps -0x60(%rbp),%xmm1
pxor   %xmm1,%xmm0
movlpd %xmm0,-0x38(%rbp)
mov    -0x18(%rbp),%rax
mov    %rax,-0x20(%rbp)
movsd  -0x38(%rbp),%xmm0
movaps 0xd23(%rip),%xmm2
movq   -0x20(%rbp),%xmm1
punpckldq %xmm2,%xmm1
movapd 0xd22(%rip),%xmm2
subpd  %xmm2,%xmm1
movaps %xmm1,%xmm2
unpckhpd %xmm1,%xmm1
addsd  %xmm2,%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x40(%rbp),%xmm1
movsd  -0x30(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jb     13bf <BinoRand+0x26f>
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
cmpq   $0x0,-0x20(%rbp)
jne    1356 <BinoRand+0x206>
jmp    13bf <BinoRand+0x26f>
mov    $0x0,%al
call   1070 <Rand@plt>
mov    %eax,%edi
call   1060 <log@plt>
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x38(%rbp),%xmm0
movaps 0xc94(%rip),%xmm2
movq   -0x20(%rbp),%xmm1
punpckldq %xmm2,%xmm1
movapd 0xc93(%rip),%xmm2
subpd  %xmm2,%xmm1
movaps %xmm1,%xmm2
unpckhpd %xmm1,%xmm1
addsd  %xmm2,%xmm1
divsd  %xmm1,%xmm0
addsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
jmp    1326 <BinoRand+0x1d6>
mov    -0x18(%rbp),%rax
sub    -0x20(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    14e9 <BinoRand+0x399>
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
add    $0x1,%rax
movq   %rax,%xmm1
movaps 0xc2f(%rip),%xmm2
punpckldq %xmm2,%xmm1
movapd 0xc33(%rip),%xmm2
subpd  %xmm2,%xmm1
movaps %xmm1,%xmm2
unpckhpd %xmm1,%xmm1
addsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
movaps %xmm0,%xmm1
cvttsd2si %xmm1,%rax
mov    %rax,%rdx
sar    $0x3f,%rdx
movsd  0xbf1(%rip),%xmm1
subsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rcx
and    %rdx,%rcx
or     %rcx,%rax
mov    %rax,-0x48(%rbp)
mov    -0x48(%rbp),%rdi
mov    -0x18(%rbp),%rsi
add    $0x1,%rsi
sub    -0x48(%rbp),%rsi
call   1030 <BetaRand@plt>
movsd  %xmm0,-0x50(%rbp)
movsd  -0x50(%rbp),%xmm1
movsd  -0x10(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jb     14ab <BinoRand+0x35b>
mov    -0x48(%rbp),%rax
mov    %rax,-0x68(%rbp)
movsd  -0x10(%rbp),%xmm0
subsd  -0x50(%rbp),%xmm0
movsd  0xb7e(%rip),%xmm1
subsd  -0x50(%rbp),%xmm1
divsd  %xmm1,%xmm0
mov    -0x18(%rbp),%rdi
sub    -0x48(%rbp),%rdi
call   1040 <BinoRand@plt>
mov    %rax,%rcx
mov    -0x68(%rbp),%rax
add    %rcx,%rax
mov    %rax,-0x20(%rbp)
jmp    14e1 <BinoRand+0x391>
mov    -0x48(%rbp),%rax
sub    $0x1,%rax
mov    %rax,-0x70(%rbp)
movsd  -0x50(%rbp),%xmm0
subsd  -0x10(%rbp),%xmm0
divsd  -0x50(%rbp),%xmm0
mov    -0x48(%rbp),%rdi
sub    $0x1,%rdi
call   1040 <BinoRand@plt>
mov    %rax,%rcx
mov    -0x70(%rbp),%rax
sub    %rcx,%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<BinoRand>:
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x20,%rsp
mov    %rdi,%r15
movsd  %xmm0,(%rsp)
call   1050 <isnan@plt>
test   %rax,%rax
je     1189 <BinoRand+0x39>
xor    %r14d,%r14d
xor    %r15d,%r15d
add    %r15,%r14
mov    %r14,%rax
add    $0x20,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
ret
mov    0x2e58(%rip),%r12
movdqa 0xe88(%rip),%xmm2
movapd 0xe90(%rip),%xmm3
xor    %r14d,%r14d
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movsd  (%r12),%xmm0
movsd  (%rsp),%xmm1
ucomisd %xmm1,%xmm0
ja     1172 <BinoRand+0x22>
movapd %xmm1,%xmm4
movsd  0xe33(%rip),%xmm1
subsd  %xmm0,%xmm1
ucomisd %xmm1,%xmm4
jae    1175 <BinoRand+0x25>
ucomisd 0xe29(%rip),%xmm4
jbe    11eb <BinoRand+0x9b>
cmp    $0xe,%r15
jbe    12be <BinoRand+0x16e>
movq   %r15,%xmm0
punpckldq %xmm2,%xmm0
subpd  %xmm3,%xmm0
movapd %xmm0,%xmm5
unpckhpd %xmm0,%xmm5
addsd  %xmm0,%xmm5
movapd %xmm4,%xmm0
mulsd  %xmm5,%xmm0
movsd  0xdfc(%rip),%xmm1
ucomisd %xmm0,%xmm1
ja     1300 <BinoRand+0x1b0>
lea    0x1(%r15),%rsi
movq   %rsi,%xmm0
punpckldq %xmm2,%xmm0
subpd  %xmm3,%xmm0
movapd %xmm0,%xmm1
unpckhpd %xmm0,%xmm1
addsd  %xmm0,%xmm1
mulsd  %xmm4,%xmm1
cvttsd2si %xmm1,%rax
mov    %rax,%rcx
subsd  0xdc9(%rip),%xmm1
cvttsd2si %xmm1,%rbx
sar    $0x3f,%rcx
and    %rcx,%rbx
or     %rax,%rbx
sub    %rbx,%rsi
mov    %rbx,%rdi
call   1030 <BetaRand@plt>
movsd  (%rsp),%xmm2
ucomisd %xmm0,%xmm2
jb     13c5 <BinoRand+0x275>
subsd  %xmm0,%xmm2
movsd  0xd7c(%rip),%xmm1
subsd  %xmm0,%xmm1
divsd  %xmm1,%xmm2
movsd  %xmm2,(%rsp)
sub    %rbx,%r15
add    %rbx,%r14
movapd %xmm2,%xmm0
call   1050 <isnan@plt>
test   %rax,%rax
movdqa 0xd75(%rip),%xmm2
movapd 0xd7d(%rip),%xmm3
je     11b0 <BinoRand+0x60>
jmp    1172 <BinoRand+0x22>
test   %r15,%r15
je     1172 <BinoRand+0x22>
xor    %ebx,%ebx
movsd  %xmm4,(%rsp)
xchg   %ax,%ax
xor    %eax,%eax
call   1070 <Rand@plt>
movsd  (%rsp),%xmm4
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
xor    %eax,%eax
ucomisd %xmm0,%xmm4
seta   %al
add    %rax,%rbx
add    $0xffffffffffffffff,%r15
jne    12d0 <BinoRand+0x180>
mov    %rbx,%r15
add    %rbx,%r14
jmp    1178 <BinoRand+0x28>
movsd  0xcf8(%rip),%xmm0
subsd  %xmm4,%xmm0
cvttsd2si %xmm0,%edi
movapd %xmm5,(%rsp)
call   1060 <log@plt>
xorpd  0xd1e(%rip),%xmm0
movapd %xmm0,0x10(%rsp)
xor    %eax,%eax
call   1070 <Rand@plt>
mov    %eax,%edi
call   1060 <log@plt>
movapd %xmm0,%xmm1
xorpd  0xcfe(%rip),%xmm1
divsd  (%rsp),%xmm1
movapd 0x10(%rsp),%xmm0
ucomisd %xmm1,%xmm0
mov    %r15,%r12
jb     13bd <BinoRand+0x26d>
lea    -0x1(%r15),%r13
xor    %r12d,%r12d
mov    %r13,%rbx
sub    $0x1,%rbx
jb     13bd <BinoRand+0x26d>
xor    %eax,%eax
movapd %xmm1,(%rsp)
call   1070 <Rand@plt>
mov    %eax,%edi
call   1060 <log@plt>
movq   %r13,%xmm1
punpckldq 0xc9a(%rip),%xmm1
subpd  0xca2(%rip),%xmm1
movapd %xmm1,%xmm2
unpckhpd %xmm1,%xmm2
addsd  %xmm1,%xmm2
movapd (%rsp),%xmm1
divsd  %xmm2,%xmm0
subsd  %xmm0,%xmm1
movapd 0x10(%rsp),%xmm0
ucomisd %xmm1,%xmm0
mov    %rbx,%r13
jae    1360 <BinoRand+0x210>
add    $0x1,%rbx
mov    %rbx,%r12
sub    %r12,%r15
jmp    1175 <BinoRand+0x25>
lea    -0x1(%rbx),%rdi
movapd %xmm0,%xmm1
subsd  %xmm2,%xmm1
divsd  %xmm0,%xmm1
movapd %xmm1,%xmm0
call   1040 <BinoRand@plt>
add    %rbx,%r14
add    $0xffffffffffffffff,%r14
sub    %rax,%r14
jmp    1178 <BinoRand+0x28>

LLVM IR (-O0):
@DBL_EPSILON = global double 0.000000e+00
define i64 @BinoRand(double %0, i64 %1) {
%3 = alloca i64
%4 = alloca double
%5 = alloca i64
%6 = alloca i64
%7 = alloca i64
%8 = alloca double
%9 = alloca double
%10 = alloca double
%11 = alloca i64
%12 = alloca double
store double %0, double* %4
store i64 %1, i64* %5
store i64 0, i64* %6
%13 = load double, double* %4
%14 = call i64 @isnan(double %13)
%15 = icmp ne i64 %14, 0
br i1 %15, label %16, label %17
16: ; preds = %2
store i64 0, i64* %3
br label %143
17: ; preds = %2
%18 = load double, double* %4
%19 = load double, double* @DBL_EPSILON
%20 = fcmp olt double %18, %19
br i1 %20, label %21, label %22
21: ; preds = %17
store i64 0, i64* %3
br label %143
22: ; preds = %17
%23 = load double, double* %4
%24 = load double, double* @DBL_EPSILON
%25 = fsub double 1.000000e+00, %24
%26 = fcmp oge double %23, %25
br i1 %26, label %27, label %29
27: ; preds = %22
%28 = load i64, i64* %5
store i64 %28, i64* %3
br label %143
29: ; preds = %22
%30 = load double, double* %4
%31 = fcmp ogt double %30, 5.000000e-01
br i1 %31, label %32, label %54
32: ; preds = %29
%33 = load i64, i64* %5
%34 = icmp ult i64 %33, 15
br i1 %34, label %35, label %54
35: ; preds = %32
store i64 0, i64* %7
br label %36
36: ; preds = %49, %35
%37 = load i64, i64* %7
%38 = load i64, i64* %5
%39 = icmp ult i64 %37, %38
br i1 %39, label %40, label %52
40: ; preds = %36
%41 = call i32 (...) @Rand()
%42 = sitofp i32 %41 to double
%43 = load double, double* %4
%44 = fcmp olt double %42, %43
br i1 %44, label %45, label %48
45: ; preds = %40
%46 = load i64, i64* %6
%47 = add i64 %46, 1
store i64 %47, i64* %6
br label %48
48: ; preds = %45, %40
br label %49
49: ; preds = %48
%50 = load i64, i64* %7
%51 = add i64 %50, 1
store i64 %51, i64* %7
br label %36
52: ; preds = %36
%53 = load i64, i64* %6
store i64 %53, i64* %3
br label %143
54: ; preds = %32, %29
%55 = load i64, i64* %5
%56 = uitofp i64 %55 to double
%57 = load double, double* %4
%58 = fmul double %56, %57
%59 = fcmp olt double %58, 1.000000e+01
br i1 %59, label %60, label %100
60: ; preds = %54
%61 = load double, double* %4
%62 = fsub double 1.000000e+00, %61
%63 = fptosi double %62 to i32
%64 = call double @log(i32 %63)
%65 = fneg double %64
store double %65, double* %8
%66 = call i32 (...) @Rand()
%67 = call double @log(i32 %66)
%68 = fneg double %67
store double %68, double* %9
%69 = load i64, i64* %5
store i64 %69, i64* %6
%70 = load double, double* %9
%71 = load i64, i64* %6
%72 = uitofp i64 %71 to double
%73 = fdiv double %70, %72
store double %73, double* %10
br label %74
74: ; preds = %88, %60
%75 = load double, double* %10
%76 = load double, double* %8
%77 = fcmp ole double %75, %76
br i1 %77, label %78, label %95
78: ; preds = %74
%79 = load i64, i64* %6
%80 = add i64 %79, -1
store i64 %80, i64* %6
%81 = load i64, i64* %6
%82 = icmp eq i64 %81, 0
br i1 %82, label %83, label %84
83: ; preds = %78
br label %95
84: ; preds = %78
%85 = call i32 (...) @Rand()
%86 = call double @log(i32 %85)
%87 = fneg double %86
store double %87, double* %9
br label %88
88: ; preds = %84
%89 = load double, double* %9
%90 = load i64, i64* %6
%91 = uitofp i64 %90 to double
%92 = fdiv double %89, %91
%93 = load double, double* %10
%94 = fadd double %93, %92
store double %94, double* %10
br label %74
95: ; preds = %83, %74
%96 = load i64, i64* %5
%97 = load i64, i64* %6
%98 = sub i64 %96, %97
store i64 %98, i64* %6
%99 = load i64, i64* %6
store i64 %99, i64* %3
br label %143
100: ; preds = %54
%101 = load double, double* %4
%102 = load i64, i64* %5
%103 = add i64 %102, 1
%104 = uitofp i64 %103 to double
%105 = fmul double %101, %104
%106 = fptoui double %105 to i64
store i64 %106, i64* %11
%107 = load i64, i64* %11
%108 = load i64, i64* %5
%109 = add i64 %108, 1
%110 = load i64, i64* %11
%111 = sub i64 %109, %110
%112 = call double @BetaRand(i64 %107, i64 %111)
store double %112, double* %12
%113 = load double, double* %12
%114 = load double, double* %4
%115 = fcmp ole double %113, %114
br i1 %115, label %116, label %129
116: ; preds = %100
%117 = load i64, i64* %11
%118 = load double, double* %4
%119 = load double, double* %12
%120 = fsub double %118, %119
%121 = load double, double* %12
%122 = fsub double 1.000000e+00, %121
%123 = fdiv double %120, %122
%124 = load i64, i64* %5
%125 = load i64, i64* %11
%126 = sub i64 %124, %125
%127 = call i64 @BinoRand(double %123, i64 %126)
%128 = add i64 %117, %127
store i64 %128, i64* %6
br label %141
129: ; preds = %100
%130 = load i64, i64* %11
%131 = sub i64 %130, 1
%132 = load double, double* %12
%133 = load double, double* %4
%134 = fsub double %132, %133
%135 = load double, double* %12
%136 = fdiv double %134, %135
%137 = load i64, i64* %11
%138 = sub i64 %137, 1
%139 = call i64 @BinoRand(double %136, i64 %138)
%140 = sub i64 %131, %139
store i64 %140, i64* %6
br label %141
141: ; preds = %129, %116
%142 = load i64, i64* %6
store i64 %142, i64* %3
br label %143
143: ; preds = %141, %95, %52, %27, %21, %16
%144 = load i64, i64* %3
ret i64 %144
}

LLVM IR (-O2):
@DBL_EPSILON = global double 0.000000e+00
define i64 @BinoRand(double %0, i64 %1) {
%3 = tail call i64 @isnan(double %0)
%4 = icmp eq i64 %3, 0
br i1 %4, label %5, label %84
5: ; preds = %2, %67
%6 = phi i64 [ %71, %67 ], [ %1, %2 ]
%7 = phi double [ %70, %67 ], [ %0, %2 ]
%8 = phi i64 [ %72, %67 ], [ 0, %2 ]
%9 = load double, double* @DBL_EPSILON
%10 = fcmp ogt double %9, %7
br i1 %10, label %84, label %11
11: ; preds = %5
%12 = fsub double 1.000000e+00, %9
%13 = fcmp ugt double %12, %7
br i1 %13, label %14, label %84
14: ; preds = %11
%15 = fcmp ogt double %7, 5.000000e-01
%16 = icmp ult i64 %6, 15
%17 = and i1 %15, %16
br i1 %17, label %18, label %30
18: ; preds = %14
%19 = icmp eq i64 %6, 0
br i1 %19, label %84, label %20
20: ; preds = %18, %20
%21 = phi i64 [ %27, %20 ], [ 0, %18 ]
%22 = phi i64 [ %28, %20 ], [ 0, %18 ]
%23 = tail call i32 (...) @Rand()
%24 = sitofp i32 %23 to double
%25 = fcmp ogt double %7, %24
%26 = zext i1 %25 to i64
%27 = add i64 %21, %26
%28 = add nuw i64 %22, 1
%29 = icmp eq i64 %28, %6
br i1 %29, label %84, label %20
30: ; preds = %14
%31 = uitofp i64 %6 to double
%32 = fmul double %7, %31
%33 = fcmp olt double %32, 1.000000e+01
br i1 %33, label %34, label %59
34: ; preds = %30
%35 = fsub double 1.000000e+00, %7
%36 = fptosi double %35 to i32
%37 = tail call double @log(i32 %36)
%38 = fneg double %37
%39 = tail call i32 (...) @Rand()
%40 = tail call double @log(i32 %39)
%41 = fneg double %40
%42 = fdiv double %41, %31
%43 = fcmp ugt double %42, %38
br i1 %43, label %56, label %44
44: ; preds = %34, %49
%45 = phi i64 [ %47, %49 ], [ %6, %34 ]
%46 = phi double [ %54, %49 ], [ %42, %34 ]
%47 = add i64 %45, -1
%48 = icmp eq i64 %47, 0
br i1 %48, label %56, label %49
49: ; preds = %44
%50 = tail call i32 (...) @Rand()
%51 = tail call double @log(i32 %50)
%52 = uitofp i64 %47 to double
%53 = fdiv double %51, %52
%54 = fsub double %46, %53
%55 = fcmp ugt double %54, %38
br i1 %55, label %56, label %44
56: ; preds = %49, %44, %34
%57 = phi i64 [ %6, %34 ], [ 0, %44 ], [ %47, %49 ]
%58 = sub i64 %6, %57
br label %84
59: ; preds = %30
%60 = add i64 %6, 1
%61 = uitofp i64 %60 to double
%62 = fmul double %7, %61
%63 = fptoui double %62 to i64
%64 = sub i64 %60, %63
%65 = tail call double @BetaRand(i64 %63, i64 %64)
%66 = fcmp ugt double %65, %7
br i1 %66, label %77, label %67
67: ; preds = %59
%68 = fsub double %7, %65
%69 = fsub double 1.000000e+00, %65
%70 = fdiv double %68, %69
%71 = sub i64 %6, %63
%72 = add i64 %8, %63
%73 = tail call i64 @isnan(double %70)
%74 = icmp eq i64 %73, 0
br i1 %74, label %5, label %84
75: ; preds = %84, %77
%76 = phi i64 [ %83, %77 ], [ %87, %84 ]
ret i64 %76
77: ; preds = %59
%78 = add i64 %63, -1
%79 = fsub double %65, %7
%80 = fdiv double %79, %65
%81 = tail call i64 @BinoRand(double %80, i64 %78)
%82 = add i64 %78, %8
%83 = sub i64 %82, %81
br label %75
84: ; preds = %67, %5, %11, %20, %2, %18, %56
%85 = phi i64 [ %8, %56 ], [ %8, %18 ], [ 0, %2 ], [ %8, %20 ], [ %72, %67 ], [ %8, %5 ], [ %8, %11 ]
%86 = phi i64 [ %58, %56 ], [ 0, %18 ], [ 0, %2 ], [ %27, %20 ], [ 0, %67 ], [ 0, %5 ], [ %6, %11 ]
%87 = add i64 %86, %85
br label %75
}