void StatLocalMaxDouble(double a[], int n, int s, int *pos, int *num) {
  int i, j;
  double cur;
  double pre;
  double *p = a;
  int end = n - 1;
  cur = *p;
  for (i = 0, j = 0; i < end; i++) {
    pre = cur;
    p += s;
    cur = *p;
    if (cur < pre) {
      pos[j++] = i;
      while (i < end) {
        pre = cur;
        p += s;
        i++;
        cur = *p;
        if (cur > pre)
          break;
      }
    }
  }
  if (a[end * s] > a[(end - 1) * s]) {
    pos[j++] = end;
  }
  *num = j;
  return;
}


x86 assembly (clang, -O0):
<StatLocalMaxDouble>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %rcx,-0x18(%rbp)
mov    %r8,-0x20(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x40(%rbp)
mov    -0xc(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x44(%rbp)
mov    -0x40(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x30(%rbp)
movl   $0x0,-0x24(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x44(%rbp),%eax
jge    1219 <StatLocalMaxDouble+0x119>
movsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x10(%rbp),%ecx
mov    -0x40(%rbp),%rax
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x40(%rbp)
mov    -0x40(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x30(%rbp),%xmm1
movsd  -0x38(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    1206 <StatLocalMaxDouble+0x106>
mov    -0x24(%rbp),%edx
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
mov    %ecx,%esi
add    $0x1,%esi
mov    %esi,-0x28(%rbp)
movslq %ecx,%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x24(%rbp),%eax
cmp    -0x44(%rbp),%eax
jge    1201 <StatLocalMaxDouble+0x101>
movsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x10(%rbp),%ecx
mov    -0x40(%rbp),%rax
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x40(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
mov    -0x40(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x30(%rbp),%xmm0
ucomisd -0x38(%rbp),%xmm0
jbe    11fc <StatLocalMaxDouble+0xfc>
jmp    1201 <StatLocalMaxDouble+0x101>
jmp    11a6 <StatLocalMaxDouble+0xa6>
jmp    1206 <StatLocalMaxDouble+0x106>
jmp    120b <StatLocalMaxDouble+0x10b>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1142 <StatLocalMaxDouble+0x42>
mov    -0x8(%rbp),%rax
mov    -0x44(%rbp),%ecx
imul   -0x10(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x44(%rbp),%ecx
sub    $0x1,%ecx
imul   -0x10(%rbp),%ecx
movslq %ecx,%rcx
ucomisd (%rax,%rcx,8),%xmm0
jbe    1260 <StatLocalMaxDouble+0x160>
mov    -0x44(%rbp),%edx
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
mov    %ecx,%esi
add    $0x1,%esi
mov    %esi,-0x28(%rbp)
movslq %ecx,%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x28(%rbp),%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<StatLocalMaxDouble>:
push   %rbp
push   %r15
push   %r14
push   %rbx
lea    -0x1(%rsi),%r11d
xor    %r9d,%r9d
cmp    $0x2,%esi
jl     11a7 <StatLocalMaxDouble+0xa7>
movsd  (%rdi),%xmm0
movslq %edx,%r10
lea    0x0(,%r10,8),%r15
mov    %r10,%r14
shl    $0x4,%r14
xor    %ebp,%ebp
mov    %rdi,%rbx
xor    %r9d,%r9d
jmp    114c <StatLocalMaxDouble+0x4c>
cs nopw 0x0(%rax,%rax,1)
lea    (%rbx,%r10,8),%rbx
add    $0x1,%ebp
cmp    %r11d,%ebp
jge    11a7 <StatLocalMaxDouble+0xa7>
movapd %xmm0,%xmm1
movsd  (%rbx,%r10,8),%xmm0
ucomisd %xmm0,%xmm1
jbe    1140 <StatLocalMaxDouble+0x40>
movslq %r9d,%rax
add    $0x1,%r9d
mov    %ebp,(%rcx,%rax,4)
cmp    %r11d,%ebp
mov    %r11d,%eax
cmovg  %ebp,%eax
nop
cmp    %ebp,%eax
je     11a0 <StatLocalMaxDouble+0xa0>
add    $0x1,%ebp
movsd  (%rbx,%r14,1),%xmm1
add    %r15,%rbx
ucomisd %xmm0,%xmm1
movapd %xmm1,%xmm0
jbe    1170 <StatLocalMaxDouble+0x70>
add    %r15,%rbx
movapd %xmm1,%xmm0
jmp    1144 <StatLocalMaxDouble+0x44>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    %r15,%rbx
mov    %eax,%ebp
jmp    1144 <StatLocalMaxDouble+0x44>
mov    %r11d,%eax
imul   %edx,%eax
cltq
movsd  (%rdi,%rax,8),%xmm0
add    $0xfffffffe,%esi
imul   %edx,%esi
movslq %esi,%rax
ucomisd (%rdi,%rax,8),%xmm0
jbe    11cf <StatLocalMaxDouble+0xcf>
movslq %r9d,%rax
add    $0x1,%r9d
mov    %r11d,(%rcx,%rax,4)
mov    %r9d,(%r8)
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define void @StatLocalMaxDouble(double* nocapture %0, i32 %1, i32 %2, i32* nocapture writeonly %3, i32* nocapture writeonly %4) {
%6 = add i32 %1, -1
%7 = icmp sgt i32 %1, 1
br i1 %7, label %8, label %41
8: ; preds = %5
%9 = load double, double* %0
%10 = sext i32 %2 to i64
br label %11
11: ; preds = %8, %34
%12 = phi i32 [ 0, %8 ], [ %39, %34 ]
%13 = phi double* [ %0, %8 ], [ %37, %34 ]
%14 = phi double [ %9, %8 ], [ %36, %34 ]
%15 = phi i32 [ 0, %8 ], [ %35, %34 ]
%16 = getelementptr inbounds double, double* %13, i64 %10
%17 = load double, double* %16
%18 = fcmp olt double %17, %14
br i1 %18, label %19, label %34
19: ; preds = %11
%20 = add nsw i32 %15, 1
%21 = sext i32 %15 to i64
%22 = getelementptr inbounds i32, i32* %3, i64 %21
store i32 %12, i32* %22
%23 = call i32 @llvm.smax.i32(i32 %12, i32 %6)
br label %24
24: ; preds = %29, %19
%25 = phi double [ %17, %19 ], [ %32, %29 ]
%26 = phi double* [ %16, %19 ], [ %30, %29 ]
%27 = phi i32 [ %12, %19 ], [ %31, %29 ]
%28 = icmp eq i32 %27, %23
br i1 %28, label %34, label %29
29: ; preds = %24
%30 = getelementptr inbounds double, double* %26, i64 %10
%31 = add i32 %27, 1
%32 = load double, double* %30
%33 = fcmp ogt double %32, %25
br i1 %33, label %34, label %24
34: ; preds = %29, %24, %11
%35 = phi i32 [ %15, %11 ], [ %20, %24 ], [ %20, %29 ]
%36 = phi double [ %17, %11 ], [ %32, %29 ], [ %25, %24 ]
%37 = phi double* [ %16, %11 ], [ %30, %29 ], [ %26, %24 ]
%38 = phi i32 [ %12, %11 ], [ %31, %29 ], [ %23, %24 ]
%39 = add nsw i32 %38, 1
%40 = icmp slt i32 %39, %6
br i1 %40, label %11, label %41
41: ; preds = %34, %5
%42 = phi i32 [ 0, %5 ], [ %35, %34 ]
%43 = mul nsw i32 %6, %2
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds double, double* %0, i64 %44
%46 = load double, double* %45
%47 = add nsw i32 %1, -2
%48 = mul nsw i32 %47, %2
%49 = sext i32 %48 to i64
%50 = getelementptr inbounds double, double* %0, i64 %49
%51 = load double, double* %50
%52 = fcmp ogt double %46, %51
br i1 %52, label %53, label %57
53: ; preds = %41
%54 = add nsw i32 %42, 1
%55 = sext i32 %42 to i64
%56 = getelementptr inbounds i32, i32* %3, i64 %55
store i32 %6, i32* %56
br label %57
57: ; preds = %53, %41
%58 = phi i32 [ %54, %53 ], [ %42, %41 ]
store i32 %58, i32* %4
ret void
}