#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 */
scalar_t__ fabs(double);
void stdlib_strided_dcusumkbn(const int64_t N, const double sum,
                              const double *X, const int64_t strideX, double *Y,
                              const int64_t strideY) {
  int64_t ix;
  int64_t iy;
  int64_t i;
  double s;
  double v;
  double t;
  double c;
  if (N <= 0) {
    return;
  }
  if (strideX < 0) {
    ix = (1 - N) * strideX;
  } else {
    ix = 0;
  }
  if (strideY < 0) {
    iy = (1 - N) * strideY;
  } else {
    iy = 0;
  }
  s = sum;
  c = 0.0;
  for (i = 0; i < N; i++) {
    v = X[ix];
    t = s + v;
    if (fabs(s) >= fabs(v)) {
      c += (s - t) + v;
    } else {
      c += (v - t) + s;
    }
    s = t;
    Y[iy] = s + c;
    ix += strideX;
    iy += strideY;
  }
  return;
}


x86 assembly (clang, -O0):
<stdlib_strided_dcusumkbn>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %rdi,-0x8(%rbp)
movsd  %xmm0,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    %rcx,-0x28(%rbp)
mov    %r8,-0x30(%rbp)
cmpq   $0x0,-0x8(%rbp)
jg     1141 <stdlib_strided_dcusumkbn+0x31>
jmp    128c <stdlib_strided_dcusumkbn+0x17c>
cmpq   $0x0,-0x20(%rbp)
jge    1163 <stdlib_strided_dcusumkbn+0x53>
mov    $0x1,%eax
sub    -0x8(%rbp),%rax
imul   -0x20(%rbp),%rax
mov    %rax,-0x38(%rbp)
jmp    116b <stdlib_strided_dcusumkbn+0x5b>
movq   $0x0,-0x38(%rbp)
cmpq   $0x0,-0x30(%rbp)
jge    118d <stdlib_strided_dcusumkbn+0x7d>
mov    $0x1,%eax
sub    -0x8(%rbp),%rax
imul   -0x30(%rbp),%rax
mov    %rax,-0x40(%rbp)
jmp    1195 <stdlib_strided_dcusumkbn+0x85>
movq   $0x0,-0x40(%rbp)
movsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x68(%rbp)
movq   $0x0,-0x48(%rbp)
mov    -0x48(%rbp),%rax
cmp    -0x8(%rbp),%rax
jge    1287 <stdlib_strided_dcusumkbn+0x177>
mov    -0x18(%rbp),%rax
mov    -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  -0x50(%rbp),%xmm0
addsd  -0x58(%rbp),%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x50(%rbp),%xmm0
call   1030 <fabs@plt>
mov    %rax,-0x70(%rbp)
movsd  -0x58(%rbp),%xmm0
call   1030 <fabs@plt>
mov    %rax,%rcx
mov    -0x70(%rbp),%rax
cmp    %rcx,%rax
jl     1224 <stdlib_strided_dcusumkbn+0x114>
movsd  -0x50(%rbp),%xmm0
subsd  -0x60(%rbp),%xmm0
addsd  -0x58(%rbp),%xmm0
addsd  -0x68(%rbp),%xmm0
movsd  %xmm0,-0x68(%rbp)
jmp    123d <stdlib_strided_dcusumkbn+0x12d>
movsd  -0x58(%rbp),%xmm0
subsd  -0x60(%rbp),%xmm0
addsd  -0x50(%rbp),%xmm0
addsd  -0x68(%rbp),%xmm0
movsd  %xmm0,-0x68(%rbp)
movsd  -0x60(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  -0x50(%rbp),%xmm0
addsd  -0x68(%rbp),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x40(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x20(%rbp),%rax
add    -0x38(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x30(%rbp),%rax
add    -0x40(%rbp),%rax
mov    %rax,-0x40(%rbp)
mov    -0x48(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x48(%rbp)
jmp    11af <stdlib_strided_dcusumkbn+0x9f>
jmp    128c <stdlib_strided_dcusumkbn+0x17c>
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<stdlib_strided_dcusumkbn>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
test   %rdi,%rdi
jle    1211 <stdlib_strided_dcusumkbn+0x101>
mov    %r8,%r14
mov    %rdx,%r15
mov    %rdi,%r12
mov    $0x1,%eax
sub    %rdi,%rax
mov    %rax,%rdx
imul   %r8,%rdx
mov    %r8,%rdi
sar    $0x3f,%rdi
and    %rdx,%rdi
imul   %r15,%rax
mov    %r15,%rdx
sar    $0x3f,%rdx
and    %rax,%rdx
lea    (%rsi,%rdx,8),%rbx
shl    $0x3,%r15
lea    (%rcx,%rdi,8),%rbp
shl    $0x3,%r14
xorpd  %xmm1,%xmm1
movapd %xmm0,%xmm2
jmp    11bd <stdlib_strided_dcusumkbn+0xad>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  0x20(%rsp),%xmm0
movsd  0x10(%rsp),%xmm2
subsd  %xmm2,%xmm0
addsd  0x8(%rsp),%xmm0
movsd  0x18(%rsp),%xmm1
addsd  %xmm0,%xmm1
movapd %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,0x0(%rbp)
add    %r15,%rbx
add    %r14,%rbp
movapd %xmm2,%xmm0
add    $0xffffffffffffffff,%r12
je     1211 <stdlib_strided_dcusumkbn+0x101>
movsd  %xmm1,0x18(%rsp)
movsd  (%rbx),%xmm1
movsd  %xmm1,0x8(%rsp)
addsd  %xmm1,%xmm2
movsd  %xmm2,0x10(%rsp)
movsd  %xmm0,0x20(%rsp)
call   1030 <fabs@plt>
mov    %rax,%r13
movsd  0x8(%rsp),%xmm0
call   1030 <fabs@plt>
cmp    %rax,%r13
jge    1180 <stdlib_strided_dcusumkbn+0x70>
movsd  0x10(%rsp),%xmm2
movsd  0x8(%rsp),%xmm1
subsd  %xmm2,%xmm1
movsd  0x20(%rsp),%xmm0
addsd  %xmm1,%xmm0
jmp    1196 <stdlib_strided_dcusumkbn+0x86>
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @stdlib_strided_dcusumkbn(i64 %0, double %1, double* %2, i64 %3, double* %4, i64 %5) {
%7 = alloca i64
%8 = alloca double
%9 = alloca double*
%10 = alloca i64
%11 = alloca double*
%12 = alloca i64
%13 = alloca i64
%14 = alloca i64
%15 = alloca i64
%16 = alloca double
%17 = alloca double
%18 = alloca double
%19 = alloca double
store i64 %0, i64* %7
store double %1, double* %8
store double* %2, double** %9
store i64 %3, i64* %10
store double* %4, double** %11
store i64 %5, i64* %12
%20 = load i64, i64* %7
%21 = icmp sle i64 %20, 0
br i1 %21, label %22, label %23
22: ; preds = %6
br label %94
23: ; preds = %6
%24 = load i64, i64* %10
%25 = icmp slt i64 %24, 0
br i1 %25, label %26, label %31
26: ; preds = %23
%27 = load i64, i64* %7
%28 = sub nsw i64 1, %27
%29 = load i64, i64* %10
%30 = mul nsw i64 %28, %29
store i64 %30, i64* %13
br label %32
31: ; preds = %23
store i64 0, i64* %13
br label %32
32: ; preds = %31, %26
%33 = load i64, i64* %12
%34 = icmp slt i64 %33, 0
br i1 %34, label %35, label %40
35: ; preds = %32
%36 = load i64, i64* %7
%37 = sub nsw i64 1, %36
%38 = load i64, i64* %12
%39 = mul nsw i64 %37, %38
store i64 %39, i64* %14
br label %41
40: ; preds = %32
store i64 0, i64* %14
br label %41
41: ; preds = %40, %35
%42 = load double, double* %8
store double %42, double* %16
store double 0.000000e+00, double* %19
store i64 0, i64* %15
br label %43
43: ; preds = %90, %41
%44 = load i64, i64* %15
%45 = load i64, i64* %7
%46 = icmp slt i64 %44, %45
br i1 %46, label %47, label %93
47: ; preds = %43
%48 = load double*, double** %9
%49 = load i64, i64* %13
%50 = getelementptr inbounds double, double* %48, i64 %49
%51 = load double, double* %50
store double %51, double* %17
%52 = load double, double* %16
%53 = load double, double* %17
%54 = fadd double %52, %53
store double %54, double* %18
%55 = load double, double* %16
%56 = call i64 @fabs(double %55)
%57 = load double, double* %17
%58 = call i64 @fabs(double %57)
%59 = icmp sge i64 %56, %58
br i1 %59, label %60, label %68
60: ; preds = %47
%61 = load double, double* %16
%62 = load double, double* %18
%63 = fsub double %61, %62
%64 = load double, double* %17
%65 = fadd double %63, %64
%66 = load double, double* %19
%67 = fadd double %66, %65
store double %67, double* %19
br label %76
68: ; preds = %47
%69 = load double, double* %17
%70 = load double, double* %18
%71 = fsub double %69, %70
%72 = load double, double* %16
%73 = fadd double %71, %72
%74 = load double, double* %19
%75 = fadd double %74, %73
store double %75, double* %19
br label %76
76: ; preds = %68, %60
%77 = load double, double* %18
store double %77, double* %16
%78 = load double, double* %16
%79 = load double, double* %19
%80 = fadd double %78, %79
%81 = load double*, double** %11
%82 = load i64, i64* %14
%83 = getelementptr inbounds double, double* %81, i64 %82
store double %80, double* %83
%84 = load i64, i64* %10
%85 = load i64, i64* %13
%86 = add nsw i64 %85, %84
store i64 %86, i64* %13
%87 = load i64, i64* %12
%88 = load i64, i64* %14
%89 = add nsw i64 %88, %87
store i64 %89, i64* %14
br label %90
90: ; preds = %76
%91 = load i64, i64* %15
%92 = add nsw i64 %91, 1
store i64 %92, i64* %15
br label %43
93: ; preds = %43
br label %94
94: ; preds = %93, %22
ret void
}

LLVM IR (-O2):
define void @stdlib_strided_dcusumkbn(i64 %0, double %1, double* nocapture %2, i64 %3, double* nocapture writeonly %4, i64 %5) {
%7 = icmp slt i64 %0, 1
br i1 %7, label %40, label %8
8: ; preds = %6
%9 = sub nsw i64 1, %0
%10 = icmp slt i64 %5, 0
%11 = mul nsw i64 %9, %5
%12 = select i1 %10, i64 %11, i64 0
%13 = icmp slt i64 %3, 0
%14 = mul nsw i64 %9, %3
%15 = select i1 %13, i64 %14, i64 0
br label %16
16: ; preds = %8, %16
%17 = phi double [ %33, %16 ], [ 0.000000e+00, %8 ]
%18 = phi i64 [ %36, %16 ], [ %15, %8 ]
%19 = phi i64 [ %37, %16 ], [ %12, %8 ]
%20 = phi double [ %24, %16 ], [ %1, %8 ]
%21 = phi i64 [ %38, %16 ], [ 0, %8 ]
%22 = getelementptr inbounds double, double* %2, i64 %18
%23 = load double, double* %22
%24 = fadd double %20, %23
%25 = tail call i64 @fabs(double %20)
%26 = tail call i64 @fabs(double %23)
%27 = icmp slt i64 %25, %26
%28 = fsub double %20, %24
%29 = fadd double %23, %28
%30 = fsub double %23, %24
%31 = fadd double %20, %30
%32 = select i1 %27, double %31, double %29
%33 = fadd double %17, %32
%34 = fadd double %24, %33
%35 = getelementptr inbounds double, double* %4, i64 %19
store double %34, double* %35
%36 = add nsw i64 %18, %3
%37 = add nsw i64 %19, %5
%38 = add nuw nsw i64 %21, 1
%39 = icmp eq i64 %38, %0
br i1 %39, label %40, label %16
40: ; preds = %16, %6
ret void
}