#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 scalar_t__ int64_t;

/* Variables and functions */
double stdlib_strided_dvariancetk(const int64_t N, const double correction,
                                  const double *X, const int64_t stride) {
  int64_t ix;
  int64_t i;
  double dN;
  double S2;
  double S;
  double n;
  double v;
  dN = (double)N;
  n = dN - correction;
  if (N <= 0 || n <= 0.0) {
    return 0.0 / 0.0;
  }
  if (N == 1 || stride == 0) {
    return 0.0;
  }
  if (stride < 0) {
    ix = (1 - N) * stride;
  } else {
    ix = 0;
  }
  S2 = 0.0;
  S = 0.0;
  for (i = 0; i < N; i++) {
    v = X[ix];
    S2 += v * v;
    S += v;
    ix += stride;
  }
  return (S2 - ((S / dN) * S)) / n;
}


x86 assembly (clang, -O0):
<stdlib_strided_dvariancetk>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
movsd  %xmm0,-0x18(%rbp)
mov    %rsi,-0x20(%rbp)
mov    %rdx,-0x28(%rbp)
cvtsi2sdq -0x10(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x40(%rbp),%xmm0
subsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x58(%rbp)
cmpq   $0x0,-0x10(%rbp)
jle    1148 <stdlib_strided_dvariancetk+0x48>
xorps  %xmm0,%xmm0
ucomisd -0x58(%rbp),%xmm0
jb     115a <stdlib_strided_dvariancetk+0x5a>
movsd  0xeb0(%rip),%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1264 <stdlib_strided_dvariancetk+0x164>
cmpq   $0x1,-0x10(%rbp)
je     1170 <stdlib_strided_dvariancetk+0x70>
cmpq   $0x0,-0x28(%rbp)
jne    117d <stdlib_strided_dvariancetk+0x7d>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    1264 <stdlib_strided_dvariancetk+0x164>
cmpq   $0x0,-0x28(%rbp)
jge    119f <stdlib_strided_dvariancetk+0x9f>
mov    $0x1,%eax
sub    -0x10(%rbp),%rax
imul   -0x28(%rbp),%rax
mov    %rax,-0x30(%rbp)
jmp    11a7 <stdlib_strided_dvariancetk+0xa7>
movq   $0x0,-0x30(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x48(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x50(%rbp)
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    1227 <stdlib_strided_dvariancetk+0x127>
mov    -0x20(%rbp),%rax
mov    -0x30(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x60(%rbp),%xmm0
movsd  -0x60(%rbp),%xmm2
movsd  -0x48(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x48(%rbp)
movsd  -0x60(%rbp),%xmm0
addsd  -0x50(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x28(%rbp),%rax
add    -0x30(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    11bf <stdlib_strided_dvariancetk+0xbf>
movsd  -0x48(%rbp),%xmm1
movsd  -0x50(%rbp),%xmm0
divsd  -0x40(%rbp),%xmm0
movsd  -0x50(%rbp),%xmm2
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
divsd  -0x58(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<stdlib_strided_dvariancetk>:
push   %r15
push   %r14
push   %rbx
movapd %xmm0,%xmm1
movsd  0xeef(%rip),%xmm0
test   %rdi,%rdi
jle    126d <stdlib_strided_dvariancetk+0x16d>
cvtsi2sd %rdi,%xmm3
movapd %xmm3,%xmm2
subsd  %xmm1,%xmm2
xorpd  %xmm1,%xmm1
ucomisd %xmm2,%xmm1
jae    126d <stdlib_strided_dvariancetk+0x16d>
xorpd  %xmm0,%xmm0
cmp    $0x1,%rdi
je     126d <stdlib_strided_dvariancetk+0x16d>
test   %rdx,%rdx
je     126d <stdlib_strided_dvariancetk+0x16d>
mov    $0x1,%eax
sub    %rdi,%rax
imul   %rdx,%rax
mov    %rdx,%r15
sar    $0x3f,%r15
and    %rax,%r15
lea    -0x1(%rdi),%rax
mov    %edi,%r8d
and    $0x3,%r8d
cmp    $0x3,%rax
jae    1189 <stdlib_strided_dvariancetk+0x89>
xorpd  %xmm1,%xmm1
xorpd  %xmm0,%xmm0
test   %r8,%r8
jne    122e <stdlib_strided_dvariancetk+0x12e>
jmp    1259 <stdlib_strided_dvariancetk+0x159>
and    $0xfffffffffffffffc,%rdi
lea    (%rsi,%r15,8),%rax
mov    %rdx,%r9
shl    $0x5,%r9
mov    %r15,%rcx
neg    %rcx
lea    0x0(,%rdx,4),%r10
lea    0x0(,%rdx,8),%rbx
lea    (%rbx,%rbx,2),%r11
mov    %rdx,%r14
shl    $0x4,%r14
add    %rdx,%r15
lea    (%rsi,%r15,8),%rbx
xorpd  %xmm1,%xmm1
xorpd  %xmm0,%xmm0
nopl   0x0(%rax,%rax,1)
sub    %r10,%rcx
movsd  (%rax),%xmm4
addsd  %xmm4,%xmm1
mulsd  %xmm4,%xmm4
addsd  %xmm0,%xmm4
movsd  (%rbx),%xmm0
addsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm0
addsd  %xmm4,%xmm0
movsd  (%rax,%r14,1),%xmm4
addsd  %xmm4,%xmm1
mulsd  %xmm4,%xmm4
addsd  %xmm0,%xmm4
movsd  (%rax,%r11,1),%xmm0
addsd  %xmm0,%xmm1
mulsd  %xmm0,%xmm0
addsd  %xmm4,%xmm0
add    %r9,%rax
add    %r9,%rbx
add    $0xfffffffffffffffc,%rdi
jne    11d0 <stdlib_strided_dvariancetk+0xd0>
neg    %rcx
mov    %rcx,%r15
test   %r8,%r8
je     1259 <stdlib_strided_dvariancetk+0x159>
lea    (%rsi,%r15,8),%rax
shl    $0x3,%rdx
cs nopw 0x0(%rax,%rax,1)
movsd  (%rax),%xmm4
addsd  %xmm4,%xmm1
mulsd  %xmm4,%xmm4
addsd  %xmm4,%xmm0
add    %rdx,%rax
add    $0xffffffffffffffff,%r8
jne    1240 <stdlib_strided_dvariancetk+0x140>
movapd %xmm1,%xmm4
divsd  %xmm3,%xmm4
mulsd  %xmm1,%xmm4
subsd  %xmm4,%xmm0
divsd  %xmm2,%xmm0
pop    %rbx
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
define double @stdlib_strided_dvariancetk(i64 %0, double %1, double* %2, i64 %3) {
%5 = alloca double
%6 = alloca i64
%7 = alloca double
%8 = alloca double*
%9 = alloca i64
%10 = alloca i64
%11 = alloca i64
%12 = alloca double
%13 = alloca double
%14 = alloca double
%15 = alloca double
%16 = alloca double
store i64 %0, i64* %6
store double %1, double* %7
store double* %2, double** %8
store i64 %3, i64* %9
%17 = load i64, i64* %6
%18 = sitofp i64 %17 to double
store double %18, double* %12
%19 = load double, double* %12
%20 = load double, double* %7
%21 = fsub double %19, %20
store double %21, double* %15
%22 = load i64, i64* %6
%23 = icmp sle i64 %22, 0
br i1 %23, label %27, label %24
24: ; preds = %4
%25 = load double, double* %15
%26 = fcmp ole double %25, 0.000000e+00
br i1 %26, label %27, label %28
27: ; preds = %24, %4
store double 0x7FF8000000000000, double* %5
br label %77
28: ; preds = %24
%29 = load i64, i64* %6
%30 = icmp eq i64 %29, 1
br i1 %30, label %34, label %31
31: ; preds = %28
%32 = load i64, i64* %9
%33 = icmp eq i64 %32, 0
br i1 %33, label %34, label %35
34: ; preds = %31, %28
store double 0.000000e+00, double* %5
br label %77
35: ; preds = %31
%36 = load i64, i64* %9
%37 = icmp slt i64 %36, 0
br i1 %37, label %38, label %43
38: ; preds = %35
%39 = load i64, i64* %6
%40 = sub nsw i64 1, %39
%41 = load i64, i64* %9
%42 = mul nsw i64 %40, %41
store i64 %42, i64* %10
br label %44
43: ; preds = %35
store i64 0, i64* %10
br label %44
44: ; preds = %43, %38
store double 0.000000e+00, double* %13
store double 0.000000e+00, double* %14
store i64 0, i64* %11
br label %45
45: ; preds = %64, %44
%46 = load i64, i64* %11
%47 = load i64, i64* %6
%48 = icmp slt i64 %46, %47
br i1 %48, label %49, label %67
49: ; preds = %45
%50 = load double*, double** %8
%51 = load i64, i64* %10
%52 = getelementptr inbounds double, double* %50, i64 %51
%53 = load double, double* %52
store double %53, double* %16
%54 = load double, double* %16
%55 = load double, double* %16
%56 = load double, double* %13
%57 = call double @llvm.fmuladd.f64(double %54, double %55, double %56)
store double %57, double* %13
%58 = load double, double* %16
%59 = load double, double* %14
%60 = fadd double %59, %58
store double %60, double* %14
%61 = load i64, i64* %9
%62 = load i64, i64* %10
%63 = add nsw i64 %62, %61
store i64 %63, i64* %10
br label %64
64: ; preds = %49
%65 = load i64, i64* %11
%66 = add nsw i64 %65, 1
store i64 %66, i64* %11
br label %45
67: ; preds = %45
%68 = load double, double* %13
%69 = load double, double* %14
%70 = load double, double* %12
%71 = fdiv double %69, %70
%72 = load double, double* %14
%73 = fneg double %71
%74 = call double @llvm.fmuladd.f64(double %73, double %72, double %68)
%75 = load double, double* %15
%76 = fdiv double %74, %75
store double %76, double* %5
br label %77
77: ; preds = %67, %34, %27
%78 = load double, double* %5
ret double %78
}

LLVM IR (-O2):
define double @stdlib_strided_dvariancetk(i64 %0, double %1, double* nocapture %2, i64 %3) {
%5 = sitofp i64 %0 to double
%6 = fsub double %5, %1
%7 = icmp slt i64 %0, 1
%8 = fcmp ole double %6, 0.000000e+00
%9 = or i1 %7, %8
br i1 %9, label %77, label %10
10: ; preds = %4
%11 = icmp eq i64 %0, 1
%12 = icmp eq i64 %3, 0
%13 = or i1 %11, %12
br i1 %13, label %77, label %14
14: ; preds = %10
%15 = icmp slt i64 %3, 0
%16 = sub nsw i64 1, %0
%17 = mul nsw i64 %16, %3
%18 = select i1 %15, i64 %17, i64 0
%19 = add i64 %0, -1
%20 = and i64 %0, 3
%21 = icmp ult i64 %19, 3
br i1 %21, label %51, label %22
22: ; preds = %14
%23 = and i64 %0, -4
br label %24
24: ; preds = %24, %22
%25 = phi i64 [ %18, %22 ], [ %48, %24 ]
%26 = phi double [ 0.000000e+00, %22 ], [ %47, %24 ]
%27 = phi double [ 0.000000e+00, %22 ], [ %46, %24 ]
%28 = phi i64 [ 0, %22 ], [ %49, %24 ]
%29 = getelementptr inbounds double, double* %2, i64 %25
%30 = load double, double* %29
%31 = tail call double @llvm.fmuladd.f64(double %30, double %30, double %27)
%32 = fadd double %26, %30
%33 = add nsw i64 %25, %3
%34 = getelementptr inbounds double, double* %2, i64 %33
%35 = load double, double* %34
%36 = tail call double @llvm.fmuladd.f64(double %35, double %35, double %31)
%37 = fadd double %32, %35
%38 = add nsw i64 %33, %3
%39 = getelementptr inbounds double, double* %2, i64 %38
%40 = load double, double* %39
%41 = tail call double @llvm.fmuladd.f64(double %40, double %40, double %36)
%42 = fadd double %37, %40
%43 = add nsw i64 %38, %3
%44 = getelementptr inbounds double, double* %2, i64 %43
%45 = load double, double* %44
%46 = tail call double @llvm.fmuladd.f64(double %45, double %45, double %41)
%47 = fadd double %42, %45
%48 = add nsw i64 %43, %3
%49 = add i64 %28, 4
%50 = icmp eq i64 %49, %23
br i1 %50, label %51, label %24
51: ; preds = %24, %14
%52 = phi double [ undef, %14 ], [ %46, %24 ]
%53 = phi double [ undef, %14 ], [ %47, %24 ]
%54 = phi i64 [ %18, %14 ], [ %48, %24 ]
%55 = phi double [ 0.000000e+00, %14 ], [ %47, %24 ]
%56 = phi double [ 0.000000e+00, %14 ], [ %46, %24 ]
%57 = icmp eq i64 %20, 0
br i1 %57, label %70, label %58
58: ; preds = %51, %58
%59 = phi i64 [ %67, %58 ], [ %54, %51 ]
%60 = phi double [ %66, %58 ], [ %55, %51 ]
%61 = phi double [ %65, %58 ], [ %56, %51 ]
%62 = phi i64 [ %68, %58 ], [ 0, %51 ]
%63 = getelementptr inbounds double, double* %2, i64 %59
%64 = load double, double* %63
%65 = tail call double @llvm.fmuladd.f64(double %64, double %64, double %61)
%66 = fadd double %60, %64
%67 = add nsw i64 %59, %3
%68 = add i64 %62, 1
%69 = icmp eq i64 %68, %20
br i1 %69, label %70, label %58
70: ; preds = %58, %51
%71 = phi double [ %52, %51 ], [ %65, %58 ]
%72 = phi double [ %53, %51 ], [ %66, %58 ]
%73 = fneg double %72
%74 = fdiv double %73, %5
%75 = tail call double @llvm.fmuladd.f64(double %74, double %72, double %71)
%76 = fdiv double %75, %6
br label %77
77: ; preds = %10, %4, %70
%78 = phi double [ %76, %70 ], [ 0x7FF8000000000000, %4 ], [ 0.000000e+00, %10 ]
ret double %78
}