#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 sigma(size_t r, size_t xc, size_t yc, double X[r][xc], double Y[r][yc],
             double xm, double ym, size_t xi, size_t yi) {
  size_t i;
  double s;
  s = 0.0;
  for (i = 0; i < r; i++)
    s += (X[i][xi] - xm) * (Y[i][yi] - ym);
  return s / (r - 1);
}


x86 assembly (clang, -O0):
<sigma>:
push   %rbp
mov    %rsp,%rbp
mov    0x10(%rbp),%rax
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
movsd  %xmm0,-0x30(%rbp)
movsd  %xmm1,-0x38(%rbp)
mov    %r9,-0x40(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x60(%rbp)
mov    -0x18(%rbp),%rax
mov    %rax,-0x58(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x50(%rbp)
movq   $0x0,-0x48(%rbp)
mov    -0x48(%rbp),%rax
cmp    -0x8(%rbp),%rax
jae    11bf <sigma+0xbf>
mov    -0x58(%rbp),%rcx
mov    -0x60(%rbp),%rdx
mov    -0x20(%rbp),%rax
imul   -0x48(%rbp),%rdx
shl    $0x3,%rdx
add    %rdx,%rax
mov    -0x40(%rbp),%rdx
movsd  (%rax,%rdx,8),%xmm0
subsd  -0x30(%rbp),%xmm0
mov    -0x28(%rbp),%rax
imul   -0x48(%rbp),%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    0x10(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
subsd  -0x38(%rbp),%xmm2
movsd  -0x50(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x48(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x48(%rbp)
jmp    114a <sigma+0x4a>
movsd  -0x50(%rbp),%xmm0
mov    -0x8(%rbp),%rax
add    $0xffffffffffffffff,%rax
movq   %rax,%xmm1
movaps 0xe28(%rip),%xmm2
punpckldq %xmm2,%xmm1
movapd 0xe2c(%rip),%xmm2
subpd  %xmm2,%xmm1
movaps %xmm1,%xmm2
unpckhpd %xmm1,%xmm1
addsd  %xmm2,%xmm1
divsd  %xmm1,%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<sigma>:
push   %r14
push   %rbx
test   %rdi,%rdi
je     1127 <sigma+0x27>
movapd %xmm0,%xmm2
mov    0x18(%rsp),%rax
lea    (%rcx,%r9,8),%r9
lea    (%r8,%rax,8),%r8
cmp    $0x1,%rdi
jne    1130 <sigma+0x30>
xorpd  %xmm0,%xmm0
xor    %eax,%eax
jmp    11a1 <sigma+0xa1>
xorpd  %xmm0,%xmm0
jmp    11cb <sigma+0xcb>
mov    %rdi,%r10
and    $0xfffffffffffffffe,%r10
mov    %rsi,%r11
shl    $0x4,%r11
mov    %rdx,%r14
shl    $0x4,%r14
xorpd  %xmm0,%xmm0
xor    %eax,%eax
mov    %r8,%rbx
mov    %r9,%rcx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  (%rcx),%xmm3
subsd  %xmm2,%xmm3
movsd  (%rbx),%xmm4
subsd  %xmm1,%xmm4
mulsd  %xmm3,%xmm4
addsd  %xmm0,%xmm4
movsd  (%rcx,%rsi,8),%xmm3
subsd  %xmm2,%xmm3
movsd  (%rbx,%rdx,8),%xmm0
subsd  %xmm1,%xmm0
mulsd  %xmm3,%xmm0
addsd  %xmm4,%xmm0
add    $0x2,%rax
add    %r11,%rcx
add    %r14,%rbx
cmp    %rax,%r10
jne    1160 <sigma+0x60>
test   $0x1,%dil
je     11cb <sigma+0xcb>
imul   %rax,%rsi
movsd  (%r9,%rsi,8),%xmm3
subsd  %xmm2,%xmm3
imul   %rax,%rdx
movsd  (%r8,%rdx,8),%xmm2
subsd  %xmm1,%xmm2
mulsd  %xmm3,%xmm2
addsd  %xmm2,%xmm0
add    $0xffffffffffffffff,%rdi
movq   %rdi,%xmm1
punpckldq 0xe24(%rip),%xmm1
subpd  0xe2c(%rip),%xmm1
movapd %xmm1,%xmm2
unpckhpd %xmm1,%xmm2
addsd  %xmm1,%xmm2
divsd  %xmm2,%xmm0
pop    %rbx
pop    %r14
ret

LLVM IR (-O0):
define double @sigma(i64 %0, i64 %1, i64 %2, double* %3, double* %4, double %5, double %6, i64 %7, i64 %8) {
%10 = alloca i64
%11 = alloca i64
%12 = alloca i64
%13 = alloca double*
%14 = alloca double*
%15 = alloca double
%16 = alloca double
%17 = alloca i64
%18 = alloca i64
%19 = alloca i64
%20 = alloca double
store i64 %0, i64* %10
store i64 %1, i64* %11
store i64 %2, i64* %12
store double* %3, double** %13
store double* %4, double** %14
store double %5, double* %15
store double %6, double* %16
store i64 %7, i64* %17
store i64 %8, i64* %18
%21 = load i64, i64* %10
%22 = load i64, i64* %11
%23 = load i64, i64* %10
%24 = load i64, i64* %12
store double 0.000000e+00, double* %20
store i64 0, i64* %19
br label %25
25: ; preds = %50, %9
%26 = load i64, i64* %19
%27 = load i64, i64* %10
%28 = icmp ult i64 %26, %27
br i1 %28, label %29, label %53
29: ; preds = %25
%30 = load double*, double** %13
%31 = load i64, i64* %19
%32 = mul nsw i64 %31, %22
%33 = getelementptr inbounds double, double* %30, i64 %32
%34 = load i64, i64* %17
%35 = getelementptr inbounds double, double* %33, i64 %34
%36 = load double, double* %35
%37 = load double, double* %15
%38 = fsub double %36, %37
%39 = load double*, double** %14
%40 = load i64, i64* %19
%41 = mul nsw i64 %40, %24
%42 = getelementptr inbounds double, double* %39, i64 %41
%43 = load i64, i64* %18
%44 = getelementptr inbounds double, double* %42, i64 %43
%45 = load double, double* %44
%46 = load double, double* %16
%47 = fsub double %45, %46
%48 = load double, double* %20
%49 = call double @llvm.fmuladd.f64(double %38, double %47, double %48)
store double %49, double* %20
br label %50
50: ; preds = %29
%51 = load i64, i64* %19
%52 = add i64 %51, 1
store i64 %52, i64* %19
br label %25
53: ; preds = %25
%54 = load double, double* %20
%55 = load i64, i64* %10
%56 = sub i64 %55, 1
%57 = uitofp i64 %56 to double
%58 = fdiv double %54, %57
ret double %58
}

LLVM IR (-O2):
define double @sigma(i64 %0, i64 %1, i64 %2, double* nocapture %3, double* nocapture %4, double %5, double %6, i64 %7, i64 %8) {
%10 = icmp eq i64 %0, 0
br i1 %10, label %59, label %11
11: ; preds = %9
%12 = getelementptr inbounds double, double* %3, i64 %7
%13 = getelementptr inbounds double, double* %4, i64 %8
%14 = and i64 %0, 1
%15 = icmp eq i64 %0, 1
br i1 %15, label %44, label %16
16: ; preds = %11
%17 = and i64 %0, -2
br label %18
18: ; preds = %18, %16
%19 = phi double [ 0.000000e+00, %16 ], [ %40, %18 ]
%20 = phi i64 [ 0, %16 ], [ %41, %18 ]
%21 = phi i64 [ 0, %16 ], [ %42, %18 ]
%22 = mul nsw i64 %20, %1
%23 = getelementptr inbounds double, double* %12, i64 %22
%24 = load double, double* %23
%25 = fsub double %24, %5
%26 = mul nsw i64 %20, %2
%27 = getelementptr inbounds double, double* %13, i64 %26
%28 = load double, double* %27
%29 = fsub double %28, %6
%30 = tail call double @llvm.fmuladd.f64(double %25, double %29, double %19)
%31 = or i64 %20, 1
%32 = mul nsw i64 %31, %1
%33 = getelementptr inbounds double, double* %12, i64 %32
%34 = load double, double* %33
%35 = fsub double %34, %5
%36 = mul nsw i64 %31, %2
%37 = getelementptr inbounds double, double* %13, i64 %36
%38 = load double, double* %37
%39 = fsub double %38, %6
%40 = tail call double @llvm.fmuladd.f64(double %35, double %39, double %30)
%41 = add nuw i64 %20, 2
%42 = add i64 %21, 2
%43 = icmp eq i64 %42, %17
br i1 %43, label %44, label %18
44: ; preds = %18, %11
%45 = phi double [ undef, %11 ], [ %40, %18 ]
%46 = phi double [ 0.000000e+00, %11 ], [ %40, %18 ]
%47 = phi i64 [ 0, %11 ], [ %41, %18 ]
%48 = icmp eq i64 %14, 0
br i1 %48, label %59, label %49
49: ; preds = %44
%50 = mul nsw i64 %47, %1
%51 = getelementptr inbounds double, double* %12, i64 %50
%52 = load double, double* %51
%53 = fsub double %52, %5
%54 = mul nsw i64 %47, %2
%55 = getelementptr inbounds double, double* %13, i64 %54
%56 = load double, double* %55
%57 = fsub double %56, %6
%58 = tail call double @llvm.fmuladd.f64(double %53, double %57, double %46)
br label %59
59: ; preds = %49, %44, %9
%60 = phi double [ 0.000000e+00, %9 ], [ %45, %44 ], [ %58, %49 ]
%61 = add i64 %0, -1
%62 = uitofp i64 %61 to double
%63 = fdiv double %60, %62
ret double %63
}