#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 */
typedef size_t uint64_t;
typedef size_t uint32_t;

/* Variables and functions */
scalar_t__ isnan(double);
double sqrt(size_t);
double pearson(double *x, double *y, uint32_t len) {
  double sumx;
  double sumy;
  double sumxy;
  double sumx2;
  double sumy2;
  double numer;
  double denom;
  uint64_t i;
  sumx = 0;
  sumy = 0;
  sumxy = 0;
  sumx2 = 0;
  sumy2 = 0;
  for (i = 0; i < len; i++) {
    sumx += x[i];
    sumy += y[i];
    sumxy += x[i] * y[i];
    sumx2 += x[i] * x[i];
    sumy2 += y[i] * y[i];
  }
  numer = (len * sumxy) - (sumx * sumy);
  denom = sqrt((len * sumx2) - sumx * sumx) * sqrt((len * sumy2) - sumy * sumy);
  if (isnan(denom))
    return 0.0;
  return numer / denom;
}


x86 assembly (clang, -O0):
<pearson>:
push   %rbp
mov    %rsp,%rbp
sub    $0x90,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x28(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x30(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x38(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x40(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x48(%rbp)
movq   $0x0,-0x60(%rbp)
mov    -0x60(%rbp),%rax
cmp    -0x20(%rbp),%rax
jae    1238 <pearson+0x118>
mov    -0x10(%rbp),%rax
mov    -0x60(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
addsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x60(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
addsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x60(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x60(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x38(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x60(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x60(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x40(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x60(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x60(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x48(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x60(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x60(%rbp)
jmp    1167 <pearson+0x47>
movq   -0x20(%rbp),%xmm0
movaps 0xdbc(%rip),%xmm2
movaps %xmm2,-0x90(%rbp)
punpckldq %xmm2,%xmm0
movapd 0xdb9(%rip),%xmm1
movaps %xmm1,-0x80(%rbp)
subpd  %xmm1,%xmm0
movaps %xmm0,%xmm3
unpckhpd %xmm0,%xmm0
addsd  %xmm3,%xmm0
movsd  -0x38(%rbp),%xmm4
movsd  -0x28(%rbp),%xmm3
movsd  -0x30(%rbp),%xmm5
mulsd  %xmm5,%xmm3
mulsd  %xmm4,%xmm0
subsd  %xmm3,%xmm0
movsd  %xmm0,-0x50(%rbp)
movq   -0x20(%rbp),%xmm0
punpckldq %xmm2,%xmm0
subpd  %xmm1,%xmm0
movaps %xmm0,%xmm1
unpckhpd %xmm0,%xmm0
addsd  %xmm1,%xmm0
movsd  -0x40(%rbp),%xmm2
movsd  -0x28(%rbp),%xmm1
mulsd  %xmm1,%xmm1
mulsd  %xmm2,%xmm0
subsd  %xmm1,%xmm0
movaps %xmm0,%xmm1
cvttsd2si %xmm1,%rdi
mov    %rdi,%rcx
sar    $0x3f,%rcx
movsd  0xd51(%rip),%xmm1
movsd  %xmm1,-0x70(%rbp)
subsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
and    %rcx,%rax
or     %rax,%rdi
call   1040 <sqrt@plt>
movaps -0x90(%rbp),%xmm3
movaps -0x80(%rbp),%xmm2
movsd  -0x70(%rbp),%xmm1
movsd  %xmm0,-0x68(%rbp)
movq   -0x20(%rbp),%xmm0
punpckldq %xmm3,%xmm0
subpd  %xmm2,%xmm0
movaps %xmm0,%xmm2
unpckhpd %xmm0,%xmm0
addsd  %xmm2,%xmm0
movsd  -0x48(%rbp),%xmm3
movsd  -0x30(%rbp),%xmm2
mulsd  %xmm2,%xmm2
mulsd  %xmm3,%xmm0
subsd  %xmm2,%xmm0
movaps %xmm0,%xmm2
cvttsd2si %xmm2,%rdi
mov    %rdi,%rcx
sar    $0x3f,%rcx
subsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
and    %rcx,%rax
or     %rax,%rdi
call   1040 <sqrt@plt>
movaps %xmm0,%xmm1
movsd  -0x68(%rbp),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  -0x58(%rbp),%xmm0
call   1030 <isnan@plt>
cmp    $0x0,%rax
je     1380 <pearson+0x260>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    138f <pearson+0x26f>
movsd  -0x50(%rbp),%xmm0
divsd  -0x58(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
add    $0x90,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<pearson>:
sub    $0x68,%rsp
test   %rdx,%rdx
je     114f <pearson+0x2f>
cmp    $0x1,%rdx
jne    1164 <pearson+0x44>
xorpd  %xmm0,%xmm0
xorpd  %xmm5,%xmm5
xor    %eax,%eax
xorpd  %xmm4,%xmm4
xorpd  %xmm6,%xmm6
test   $0x1,%dl
jne    11f4 <pearson+0xd4>
jmp    1222 <pearson+0x102>
xorpd  %xmm7,%xmm7
xorpd  %xmm6,%xmm6
xorpd  %xmm4,%xmm4
xorpd  %xmm5,%xmm5
jmp    1222 <pearson+0x102>
mov    %rdx,%rcx
and    $0xfffffffffffffffe,%rcx
xorpd  %xmm0,%xmm0
xorpd  %xmm5,%xmm5
xor    %eax,%eax
xorpd  %xmm4,%xmm4
xorpd  %xmm6,%xmm6
nopl   (%rax)
movsd  (%rdi,%rax,8),%xmm1
movsd  0x8(%rdi,%rax,8),%xmm7
addsd  %xmm1,%xmm5
movsd  (%rsi,%rax,8),%xmm2
addsd  %xmm2,%xmm6
movapd %xmm2,%xmm3
mulsd  %xmm2,%xmm2
addsd  %xmm4,%xmm2
movsd  0x8(%rsi,%rax,8),%xmm4
unpcklpd %xmm1,%xmm3
unpcklpd %xmm1,%xmm1
mulpd  %xmm3,%xmm1
addpd  %xmm0,%xmm1
addsd  %xmm7,%xmm5
addsd  %xmm4,%xmm6
movapd %xmm4,%xmm0
unpcklpd %xmm7,%xmm0
unpcklpd %xmm7,%xmm7
mulpd  %xmm0,%xmm7
movapd %xmm7,%xmm0
addpd  %xmm1,%xmm0
mulsd  %xmm4,%xmm4
addsd  %xmm2,%xmm4
add    $0x2,%rax
cmp    %rax,%rcx
jne    1180 <pearson+0x60>
addpd  %xmm1,%xmm7
test   $0x1,%dl
je     1222 <pearson+0x102>
movsd  (%rdi,%rax,8),%xmm7
addsd  %xmm7,%xmm5
movsd  (%rsi,%rax,8),%xmm1
addsd  %xmm1,%xmm6
movapd %xmm1,%xmm2
unpcklpd %xmm7,%xmm2
unpcklpd %xmm7,%xmm7
mulpd  %xmm2,%xmm7
addpd  %xmm0,%xmm7
mulsd  %xmm1,%xmm1
addsd  %xmm1,%xmm4
movapd %xmm6,0x10(%rsp)
movapd %xmm4,0x50(%rsp)
movapd %xmm5,0x30(%rsp)
movapd %xmm7,0x40(%rsp)
movq   %rdx,%xmm0
punpckldq 0xdb9(%rip),%xmm0
subpd  0xdc1(%rip),%xmm0
movapd %xmm0,%xmm2
unpckhpd %xmm0,%xmm2
addsd  %xmm0,%xmm2
movapd %xmm2,0x20(%rsp)
movapd %xmm5,%xmm0
mulsd  %xmm5,%xmm0
movapd %xmm7,%xmm1
unpckhpd %xmm7,%xmm1
mulsd  %xmm2,%xmm1
subsd  %xmm0,%xmm1
cvttsd2si %xmm1,%rax
mov    %rax,%rcx
sar    $0x3f,%rcx
subsd  0xda3(%rip),%xmm1
cvttsd2si %xmm1,%rdi
and    %rcx,%rdi
or     %rax,%rdi
call   1040 <sqrt@plt>
movsd  %xmm0,0x8(%rsp)
movapd 0x10(%rsp),%xmm0
mulsd  %xmm0,%xmm0
movapd 0x50(%rsp),%xmm1
mulsd  0x20(%rsp),%xmm1
subsd  %xmm0,%xmm1
cvttsd2si %xmm1,%rax
mov    %rax,%rcx
sar    $0x3f,%rcx
subsd  0xd5f(%rip),%xmm1
cvttsd2si %xmm1,%rdi
and    %rcx,%rdi
or     %rax,%rdi
call   1040 <sqrt@plt>
mulsd  0x8(%rsp),%xmm0
movsd  %xmm0,0x8(%rsp)
call   1030 <isnan@plt>
test   %rax,%rax
xorpd  %xmm0,%xmm0
je     1300 <pearson+0x1e0>
add    $0x68,%rsp
ret
movapd 0x30(%rsp),%xmm0
xorpd  0xd12(%rip),%xmm0
movapd 0x10(%rsp),%xmm1
mulsd  %xmm0,%xmm1
movapd 0x20(%rsp),%xmm0
mulsd  0x40(%rsp),%xmm0
addsd  %xmm1,%xmm0
divsd  0x8(%rsp),%xmm0
add    $0x68,%rsp
ret

LLVM IR (-O0):
define double @pearson(double* %0, double* %1, i64 %2) {
%4 = alloca double
%5 = alloca double*
%6 = alloca double*
%7 = alloca i64
%8 = alloca double
%9 = alloca double
%10 = alloca double
%11 = alloca double
%12 = alloca double
%13 = alloca double
%14 = alloca double
%15 = alloca i64
store double* %0, double** %5
store double* %1, double** %6
store i64 %2, i64* %7
store double 0.000000e+00, double* %8
store double 0.000000e+00, double* %9
store double 0.000000e+00, double* %10
store double 0.000000e+00, double* %11
store double 0.000000e+00, double* %12
store i64 0, i64* %15
br label %16
16: ; preds = %63, %3
%17 = load i64, i64* %15
%18 = load i64, i64* %7
%19 = icmp ult i64 %17, %18
br i1 %19, label %20, label %66
20: ; preds = %16
%21 = load double*, double** %5
%22 = load i64, i64* %15
%23 = getelementptr inbounds double, double* %21, i64 %22
%24 = load double, double* %23
%25 = load double, double* %8
%26 = fadd double %25, %24
store double %26, double* %8
%27 = load double*, double** %6
%28 = load i64, i64* %15
%29 = getelementptr inbounds double, double* %27, i64 %28
%30 = load double, double* %29
%31 = load double, double* %9
%32 = fadd double %31, %30
store double %32, double* %9
%33 = load double*, double** %5
%34 = load i64, i64* %15
%35 = getelementptr inbounds double, double* %33, i64 %34
%36 = load double, double* %35
%37 = load double*, double** %6
%38 = load i64, i64* %15
%39 = getelementptr inbounds double, double* %37, i64 %38
%40 = load double, double* %39
%41 = load double, double* %10
%42 = call double @llvm.fmuladd.f64(double %36, double %40, double %41)
store double %42, double* %10
%43 = load double*, double** %5
%44 = load i64, i64* %15
%45 = getelementptr inbounds double, double* %43, i64 %44
%46 = load double, double* %45
%47 = load double*, double** %5
%48 = load i64, i64* %15
%49 = getelementptr inbounds double, double* %47, i64 %48
%50 = load double, double* %49
%51 = load double, double* %11
%52 = call double @llvm.fmuladd.f64(double %46, double %50, double %51)
store double %52, double* %11
%53 = load double*, double** %6
%54 = load i64, i64* %15
%55 = getelementptr inbounds double, double* %53, i64 %54
%56 = load double, double* %55
%57 = load double*, double** %6
%58 = load i64, i64* %15
%59 = getelementptr inbounds double, double* %57, i64 %58
%60 = load double, double* %59
%61 = load double, double* %12
%62 = call double @llvm.fmuladd.f64(double %56, double %60, double %61)
store double %62, double* %12
br label %63
63: ; preds = %20
%64 = load i64, i64* %15
%65 = add i64 %64, 1
store i64 %65, i64* %15
br label %16
66: ; preds = %16
%67 = load i64, i64* %7
%68 = uitofp i64 %67 to double
%69 = load double, double* %10
%70 = load double, double* %8
%71 = load double, double* %9
%72 = fmul double %70, %71
%73 = fneg double %72
%74 = call double @llvm.fmuladd.f64(double %68, double %69, double %73)
store double %74, double* %13
%75 = load i64, i64* %7
%76 = uitofp i64 %75 to double
%77 = load double, double* %11
%78 = load double, double* %8
%79 = load double, double* %8
%80 = fmul double %78, %79
%81 = fneg double %80
%82 = call double @llvm.fmuladd.f64(double %76, double %77, double %81)
%83 = fptoui double %82 to i64
%84 = call double @sqrt(i64 %83)
%85 = load i64, i64* %7
%86 = uitofp i64 %85 to double
%87 = load double, double* %12
%88 = load double, double* %9
%89 = load double, double* %9
%90 = fmul double %88, %89
%91 = fneg double %90
%92 = call double @llvm.fmuladd.f64(double %86, double %87, double %91)
%93 = fptoui double %92 to i64
%94 = call double @sqrt(i64 %93)
%95 = fmul double %84, %94
store double %95, double* %14
%96 = load double, double* %14
%97 = call i64 @isnan(double %96)
%98 = icmp ne i64 %97, 0
br i1 %98, label %99, label %100
99: ; preds = %66
store double 0.000000e+00, double* %4
br label %104
100: ; preds = %66
%101 = load double, double* %13
%102 = load double, double* %14
%103 = fdiv double %101, %102
store double %103, double* %4
br label %104
104: ; preds = %100, %99
%105 = load double, double* %4
ret double %105
}

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