#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 StatAvgDouble(double *, int, int);
double StatMomentDouble(double a[], int n, int s, int m) {
  int i, j;
  double temp1, temp2;
  double avg = StatAvgDouble(a, n, s);
  double moment = 0;
  for (i = 0; i < n; i++) {
    temp1 = a[i * s] - avg;
    temp2 = temp1;
    for (j = 1; j < m; j++) {
      temp2 *= temp1;
    }
    moment += temp2;
  }
  return moment;
}


x86 assembly (clang, -O0):
<StatMomentDouble>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %ecx,-0x14(%rbp)
mov    -0x8(%rbp),%rdi
mov    -0xc(%rbp),%esi
mov    -0x10(%rbp),%edx
call   1030 <StatAvgDouble@plt>
movsd  %xmm0,-0x38(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x40(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    11c8 <StatMomentDouble+0xb8>
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%ecx
imul   -0x10(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
subsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x30(%rbp)
movl   $0x1,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    11ab <StatMomentDouble+0x9b>
movsd  -0x28(%rbp),%xmm0
mulsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1182 <StatMomentDouble+0x72>
movsd  -0x30(%rbp),%xmm0
addsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1148 <StatMomentDouble+0x38>
movsd  -0x40(%rbp),%xmm0
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<StatMomentDouble>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    %ecx,%r14d
mov    %edx,%r15d
mov    %esi,%ebp
mov    %rdi,%rbx
call   1030 <StatAvgDouble@plt>
test   %ebp,%ebp
jle    11cb <StatMomentDouble+0xbb>
movslq %r15d,%rax
mov    %ebp,%ecx
lea    -0x1(%r14),%r8d
lea    -0x2(%r14),%esi
mov    %r8d,%edi
and    $0x7,%edi
and    $0xfffffff8,%r8d
xorpd  %xmm1,%xmm1
xor    %ebp,%ebp
jmp    1161 <StatMomentDouble+0x51>
xchg   %ax,%ax
movapd %xmm2,%xmm3
addsd  %xmm3,%xmm1
add    $0x1,%rbp
cmp    %rcx,%rbp
je     11cf <StatMomentDouble+0xbf>
mov    %rbp,%rdx
imul   %rax,%rdx
movsd  (%rbx,%rdx,8),%xmm2
subsd  %xmm0,%xmm2
cmp    $0x2,%r14d
jl     1150 <StatMomentDouble+0x40>
movapd %xmm2,%xmm3
cmp    $0x7,%esi
jb     11b5 <StatMomentDouble+0xa5>
mov    %r8d,%edx
movapd %xmm2,%xmm3
nopw   0x0(%rax,%rax,1)
mulsd  %xmm2,%xmm3
mulsd  %xmm2,%xmm3
mulsd  %xmm2,%xmm3
mulsd  %xmm2,%xmm3
mulsd  %xmm2,%xmm3
mulsd  %xmm2,%xmm3
mulsd  %xmm2,%xmm3
mulsd  %xmm2,%xmm3
add    $0xfffffff8,%edx
jne    1190 <StatMomentDouble+0x80>
test   %edi,%edi
je     1154 <StatMomentDouble+0x44>
mov    %edi,%edx
nopl   0x0(%rax,%rax,1)
mulsd  %xmm2,%xmm3
add    $0xffffffff,%edx
jne    11c0 <StatMomentDouble+0xb0>
jmp    1154 <StatMomentDouble+0x44>
xorpd  %xmm1,%xmm1
movapd %xmm1,%xmm0
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define double @StatMomentDouble(double* %0, i32 %1, i32 %2, i32 %3) {
%5 = tail call double @StatAvgDouble(double* %0, i32 %1, i32 %2)
%6 = icmp sgt i32 %1, 0
br i1 %6, label %7, label %52
7: ; preds = %4
%8 = icmp sgt i32 %3, 1
%9 = sext i32 %2 to i64
%10 = zext i32 %1 to i64
%11 = add i32 %3, -1
%12 = add i32 %3, -2
%13 = and i32 %11, 7
%14 = icmp ult i32 %12, 7
%15 = and i32 %11, -8
%16 = icmp eq i32 %13, 0
br label %17
17: ; preds = %7, %47
%18 = phi i64 [ 0, %7 ], [ %50, %47 ]
%19 = phi double [ 0.000000e+00, %7 ], [ %49, %47 ]
%20 = mul nsw i64 %18, %9
%21 = getelementptr inbounds double, double* %0, i64 %20
%22 = load double, double* %21
%23 = fsub double %22, %5
br i1 %8, label %24, label %47
24: ; preds = %17
br i1 %14, label %38, label %25
25: ; preds = %24, %25
%26 = phi double [ %35, %25 ], [ %23, %24 ]
%27 = phi i32 [ %36, %25 ], [ 0, %24 ]
%28 = fmul double %23, %26
%29 = fmul double %23, %28
%30 = fmul double %23, %29
%31 = fmul double %23, %30
%32 = fmul double %23, %31
%33 = fmul double %23, %32
%34 = fmul double %23, %33
%35 = fmul double %23, %34
%36 = add i32 %27, 8
%37 = icmp eq i32 %36, %15
br i1 %37, label %38, label %25
38: ; preds = %25, %24
%39 = phi double [ undef, %24 ], [ %35, %25 ]
%40 = phi double [ %23, %24 ], [ %35, %25 ]
br i1 %16, label %47, label %41
41: ; preds = %38, %41
%42 = phi double [ %44, %41 ], [ %40, %38 ]
%43 = phi i32 [ %45, %41 ], [ 0, %38 ]
%44 = fmul double %23, %42
%45 = add i32 %43, 1
%46 = icmp eq i32 %45, %13
br i1 %46, label %47, label %41
47: ; preds = %38, %41, %17
%48 = phi double [ %23, %17 ], [ %39, %38 ], [ %44, %41 ]
%49 = fadd double %19, %48
%50 = add nuw nsw i64 %18, 1
%51 = icmp eq i64 %50, %10
br i1 %51, label %52, label %17
52: ; preds = %47, %4
%53 = phi double [ 0.000000e+00, %4 ], [ %49, %47 ]
ret double %53
}