#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 genrand_real1();
double log(double);
double sqrt(double);
double genrand_gauss(void) {
  double v1, v2, s;
  do {
    v1 = 2.0 * genrand_real1() - 1.0;
    v2 = 2.0 * genrand_real1() - 1.0;
    s = v1 * v1 + v2 * v2;
  } while (s >= 1.0);
  if (s == 0.0)
    return 0.0;
  else
    return (v1 * sqrt(-2.0 * log(s) / s));
}


x86 assembly (clang, -O0):
<genrand_gauss>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    $0x0,%al
call   1050 <genrand_real1@plt>
addsd  %xmm0,%xmm0
movsd  0xeb5(%rip),%xmm1
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x10(%rbp)
mov    $0x0,%al
call   1050 <genrand_real1@plt>
addsd  %xmm0,%xmm0
movsd  0xe99(%rip),%xmm1
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x18(%rbp)
movsd  -0x10(%rbp),%xmm0
movsd  -0x10(%rbp),%xmm2
movsd  -0x18(%rbp),%xmm1
mulsd  -0x18(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x20(%rbp)
movsd  -0x20(%rbp),%xmm0
movsd  0xe6a(%rip),%xmm1
ucomisd %xmm1,%xmm0
jae    1138 <genrand_gauss+0x8>
movsd  -0x20(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    11cd <genrand_gauss+0x9d>
jp     11cd <genrand_gauss+0x9d>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    120b <genrand_gauss+0xdb>
movsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x20(%rbp),%xmm0
call   1030 <log@plt>
movaps %xmm0,%xmm1
movsd  0xe24(%rip),%xmm0
mulsd  %xmm1,%xmm0
divsd  -0x20(%rbp),%xmm0
call   1040 <sqrt@plt>
movaps %xmm0,%xmm1
movsd  -0x28(%rbp),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<genrand_gauss>:
sub    $0x18,%rsp
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
xor    %eax,%eax
call   1050 <genrand_real1@plt>
movapd %xmm0,%xmm1
addsd  %xmm0,%xmm1
movsd  0xea9(%rip),%xmm0
addsd  %xmm0,%xmm1
movsd  %xmm1,0x8(%rsp)
xor    %eax,%eax
call   1050 <genrand_real1@plt>
movsd  0x8(%rsp),%xmm2
addsd  %xmm0,%xmm0
addsd  0xe86(%rip),%xmm0
mulsd  %xmm0,%xmm0
mulsd  %xmm2,%xmm2
addsd  %xmm0,%xmm2
ucomisd 0xe7a(%rip),%xmm2
jae    1140 <genrand_gauss+0x10>
xorpd  %xmm0,%xmm0
ucomisd %xmm0,%xmm2
jne    11a1 <genrand_gauss+0x71>
jp     11a1 <genrand_gauss+0x71>
add    $0x18,%rsp
ret
movapd %xmm2,%xmm0
movsd  %xmm2,0x10(%rsp)
call   1030 <log@plt>
mulsd  0xe58(%rip),%xmm0
divsd  0x10(%rsp),%xmm0
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jb     11ce <genrand_gauss+0x9e>
sqrtsd %xmm0,%xmm0
jmp    11d3 <genrand_gauss+0xa3>
call   1040 <sqrt@plt>
movsd  0x8(%rsp),%xmm1
mulsd  %xmm0,%xmm1
movapd %xmm1,%xmm0
add    $0x18,%rsp
ret

LLVM IR (-O0):
define double @genrand_gauss() {
%1 = alloca double
%2 = alloca double
%3 = alloca double
%4 = alloca double
br label %5
5: ; preds = %16, %0
%6 = call double (...) @genrand_real1()
%7 = call double @llvm.fmuladd.f64(double 2.000000e+00, double %6, double -1.000000e+00)
store double %7, double* %2
%8 = call double (...) @genrand_real1()
%9 = call double @llvm.fmuladd.f64(double 2.000000e+00, double %8, double -1.000000e+00)
store double %9, double* %3
%10 = load double, double* %2
%11 = load double, double* %2
%12 = load double, double* %3
%13 = load double, double* %3
%14 = fmul double %12, %13
%15 = call double @llvm.fmuladd.f64(double %10, double %11, double %14)
store double %15, double* %4
br label %16
16: ; preds = %5
%17 = load double, double* %4
%18 = fcmp oge double %17, 1.000000e+00
br i1 %18, label %5, label %19
19: ; preds = %16
%20 = load double, double* %4
%21 = fcmp oeq double %20, 0.000000e+00
br i1 %21, label %22, label %23
22: ; preds = %19
store double 0.000000e+00, double* %1
br label %32
23: ; preds = %19
%24 = load double, double* %2
%25 = load double, double* %4
%26 = call double @log(double %25)
%27 = fmul double -2.000000e+00, %26
%28 = load double, double* %4
%29 = fdiv double %27, %28
%30 = call double @sqrt(double %29)
%31 = fmul double %24, %30
store double %31, double* %1
br label %32
32: ; preds = %23, %22
%33 = load double, double* %1
ret double %33
}

LLVM IR (-O2):
define double @genrand_gauss() {
br label %1
1: ; preds = %1, %0
%2 = tail call double (...) @genrand_real1()
%3 = tail call double @llvm.fmuladd.f64(double %2, double 2.000000e+00, double -1.000000e+00)
%4 = tail call double (...) @genrand_real1()
%5 = tail call double @llvm.fmuladd.f64(double %4, double 2.000000e+00, double -1.000000e+00)
%6 = fmul double %5, %5
%7 = tail call double @llvm.fmuladd.f64(double %3, double %3, double %6)
%8 = fcmp ult double %7, 1.000000e+00
br i1 %8, label %9, label %1
9: ; preds = %1
%10 = fcmp oeq double %7, 0.000000e+00
br i1 %10, label %17, label %11
11: ; preds = %9
%12 = tail call double @log(double %7)
%13 = fmul double %12, -2.000000e+00
%14 = fdiv double %13, %7
%15 = tail call double @sqrt(double %14)
%16 = fmul double %3, %15
br label %17
17: ; preds = %9, %11
%18 = phi double [ %16, %11 ], [ 0.000000e+00, %9 ]
ret double %18
}