#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 */
void fr_quicksortclassic_double_i_(const double *a, size_t indx[],
                                   const size_t n, const size_t crit_size) {
  double p;
  size_t i, j, it;
  if (n < crit_size) {
    for (i = 1; i < n; ++i) {
      it = indx[i];
      for (j = i; j > 0 && a[indx[j - 1]] > a[it]; --j) {
        indx[j] = indx[j - 1];
      }
    }
    return;
  }
  p = a[indx[n / 2]];
  for (i = 0, j = n - 1;; i++, j--) {
    while (a[indx[i]] < p)
      i++;
    while (p < a[indx[j]])
      j--;
    if (i >= j)
      break;
    it = indx[i];
    indx[i] = indx[j];
    indx[j] = it;
  }
  fr_quicksortclassic_double_i_(a, indx, i, crit_size);
  fr_quicksortclassic_double_i_(a, indx + i, n - i, crit_size);
}


x86 assembly (clang, -O0):
<fr_quicksortclassic_double_i_>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0x18(%rbp),%rax
cmp    -0x20(%rbp),%rax
jae    11f8 <fr_quicksortclassic_double_i_+0xe8>
movq   $0x1,-0x30(%rbp)
mov    -0x30(%rbp),%rax
cmp    -0x18(%rbp),%rax
jae    11f3 <fr_quicksortclassic_double_i_+0xe3>
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x40(%rbp)
mov    -0x30(%rbp),%rax
mov    %rax,-0x38(%rbp)
xor    %eax,%eax
cmpq   $0x0,-0x38(%rbp)
mov    %al,-0x41(%rbp)
jbe    11a0 <fr_quicksortclassic_double_i_+0x90>
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
mov    -0x38(%rbp),%rdx
sub    $0x1,%rdx
mov    (%rcx,%rdx,8),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x40(%rbp),%rcx
ucomisd (%rax,%rcx,8),%xmm0
seta   %al
mov    %al,-0x41(%rbp)
mov    -0x41(%rbp),%al
test   $0x1,%al
jne    11b0 <fr_quicksortclassic_double_i_+0xa0>
jmp    11dd <fr_quicksortclassic_double_i_+0xcd>
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
sub    $0x1,%rcx
mov    (%rax,%rcx,8),%rdx
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x38(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x38(%rbp)
jmp    1164 <fr_quicksortclassic_double_i_+0x54>
jmp    11e2 <fr_quicksortclassic_double_i_+0xd2>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    113e <fr_quicksortclassic_double_i_+0x2e>
jmp    133f <fr_quicksortclassic_double_i_+0x22f>
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
mov    -0x18(%rbp),%rdx
shr    $0x1,%rdx
mov    (%rcx,%rdx,8),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x28(%rbp)
movq   $0x0,-0x30(%rbp)
mov    -0x18(%rbp),%rax
sub    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    122f <fr_quicksortclassic_double_i_+0x11f>
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
mov    -0x30(%rbp),%rdx
mov    (%rcx,%rdx,8),%rcx
movsd  (%rax,%rcx,8),%xmm1
movsd  -0x28(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    1264 <fr_quicksortclassic_double_i_+0x154>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    122f <fr_quicksortclassic_double_i_+0x11f>
jmp    1269 <fr_quicksortclassic_double_i_+0x159>
movsd  -0x28(%rbp),%xmm1
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
mov    -0x38(%rbp),%rdx
mov    (%rcx,%rdx,8),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd %xmm1,%xmm0
jbe    129e <fr_quicksortclassic_double_i_+0x18e>
mov    -0x38(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x38(%rbp)
jmp    1269 <fr_quicksortclassic_double_i_+0x159>
mov    -0x30(%rbp),%rax
cmp    -0x38(%rbp),%rax
jb     12b1 <fr_quicksortclassic_double_i_+0x1a1>
jmp    1306 <fr_quicksortclassic_double_i_+0x1f6>
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x40(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x40(%rbp),%rdx
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
mov    -0x38(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x38(%rbp)
jmp    122a <fr_quicksortclassic_double_i_+0x11a>
mov    -0x8(%rbp),%rdi
mov    -0x10(%rbp),%rsi
mov    -0x30(%rbp),%rdx
mov    -0x20(%rbp),%rcx
call   1030 <fr_quicksortclassic_double_i_@plt>
mov    -0x8(%rbp),%rdi
mov    -0x10(%rbp),%rsi
mov    -0x30(%rbp),%rax
shl    $0x3,%rax
add    %rax,%rsi
mov    -0x18(%rbp),%rdx
sub    -0x30(%rbp),%rdx
mov    -0x20(%rbp),%rcx
call   1030 <fr_quicksortclassic_double_i_@plt>
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<fr_quicksortclassic_double_i_>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rdi,%r15
cmp    %rcx,%rdx
jb     11d4 <fr_quicksortclassic_double_i_+0xc4>
mov    %rcx,%r14
jmp    1152 <fr_quicksortclassic_double_i_+0x42>
nopl   0x0(%rax)
mov    %r15,%rdi
mov    %r12,%rsi
mov    %rbx,%rdx
mov    %r14,%rcx
call   1030 <fr_quicksortclassic_double_i_@plt>
mov    %r13,%rdx
sub    %rbx,%rdx
mov    %r12,%rsi
sub    %rbp,%rsi
cmp    %r14,%rdx
jb     11c8 <fr_quicksortclassic_double_i_+0xb8>
mov    %rsi,%r12
mov    %rdx,%r13
mov    %rdx,%rax
and    $0xfffffffffffffffe,%rax
mov    (%rsi,%rax,4),%rax
movsd  (%r15,%rax,8),%xmm0
xor    %ecx,%ecx
mov    %rdx,%rax
xchg   %ax,%ax
lea    -0x1(%rcx),%rbx
shl    $0x3,%rcx
mov    $0x8,%ebp
sub    %rcx,%rbp
mov    0x8(%r12,%rbx,8),%rdx
add    $0x1,%rbx
add    $0xfffffffffffffff8,%rbp
ucomisd (%r15,%rdx,8),%xmm0
ja     1180 <fr_quicksortclassic_double_i_+0x70>
lea    0x1(%rbx),%rcx
nopl   0x0(%rax)
mov    -0x8(%r12,%rax,8),%rsi
add    $0xffffffffffffffff,%rax
movsd  (%r15,%rsi,8),%xmm1
ucomisd %xmm0,%xmm1
ja     11a0 <fr_quicksortclassic_double_i_+0x90>
cmp    %rax,%rbx
jae    1130 <fr_quicksortclassic_double_i_+0x20>
mov    %rsi,(%r12,%rbx,8)
mov    %rdx,(%r12,%rax,8)
jmp    1170 <fr_quicksortclassic_double_i_+0x60>
sub    %rbx,%r13
sub    %rbp,%r12
mov    %r12,%rsi
mov    %r13,%rdx
cmp    $0x2,%rdx
jb     121b <fr_quicksortclassic_double_i_+0x10b>
lea    -0x1(%rdx),%rcx
mov    $0x1,%ebx
cmp    $0x2,%rdx
jne    122a <fr_quicksortclassic_double_i_+0x11a>
test   $0x1,%cl
je     121b <fr_quicksortclassic_double_i_+0x10b>
mov    (%rsi,%rbx,8),%rax
movsd  (%r15,%rax,8),%xmm0
nopl   0x0(%rax,%rax,1)
mov    -0x8(%rsi,%rbx,8),%rax
movsd  (%r15,%rax,8),%xmm1
ucomisd %xmm0,%xmm1
jbe    121b <fr_quicksortclassic_double_i_+0x10b>
mov    %rax,(%rsi,%rbx,8)
add    $0xffffffffffffffff,%rbx
jne    1200 <fr_quicksortclassic_double_i_+0xf0>
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
mov    %rcx,%rdx
and    $0xfffffffffffffffe,%rdx
mov    $0x1,%ebx
xor    %edi,%edi
jmp    124d <fr_quicksortclassic_double_i_+0x13d>
nopw   0x0(%rax,%rax,1)
add    $0x2,%rbx
add    $0x2,%rdi
cmp    %rdx,%rdi
je     11e9 <fr_quicksortclassic_double_i_+0xd9>
mov    (%rsi,%rbx,8),%rax
movsd  (%r15,%rax,8),%xmm0
mov    %rbx,%rax
nopw   0x0(%rax,%rax,1)
mov    -0x8(%rsi,%rax,8),%rbp
movsd  (%r15,%rbp,8),%xmm1
ucomisd %xmm0,%xmm1
jbe    127b <fr_quicksortclassic_double_i_+0x16b>
mov    %rbp,(%rsi,%rax,8)
add    $0xffffffffffffffff,%rax
jne    1260 <fr_quicksortclassic_double_i_+0x150>
lea    0x1(%rbx),%rbp
mov    0x8(%rsi,%rbx,8),%rax
movsd  (%r15,%rax,8),%xmm0
nopw   0x0(%rax,%rax,1)
mov    -0x8(%rsi,%rbp,8),%rax
movsd  (%r15,%rax,8),%xmm1
ucomisd %xmm0,%xmm1
jbe    1240 <fr_quicksortclassic_double_i_+0x130>
mov    %rax,(%rsi,%rbp,8)
add    $0xffffffffffffffff,%rbp
jne    1290 <fr_quicksortclassic_double_i_+0x180>
jmp    1240 <fr_quicksortclassic_double_i_+0x130>

LLVM IR (-O0):
define void @fr_quicksortclassic_double_i_(double* %0, i64* %1, i64 %2, i64 %3) {
%5 = alloca double*
%6 = alloca i64*
%7 = alloca i64
%8 = alloca i64
%9 = alloca double
%10 = alloca i64
%11 = alloca i64
%12 = alloca i64
store double* %0, double** %5
store i64* %1, i64** %6
store i64 %2, i64* %7
store i64 %3, i64* %8
%13 = load i64, i64* %7
%14 = load i64, i64* %8
%15 = icmp ult i64 %13, %14
br i1 %15, label %16, label %63
16: ; preds = %4
store i64 1, i64* %10
br label %17
17: ; preds = %59, %16
%18 = load i64, i64* %10
%19 = load i64, i64* %7
%20 = icmp ult i64 %18, %19
br i1 %20, label %21, label %62
21: ; preds = %17
%22 = load i64*, i64** %6
%23 = load i64, i64* %10
%24 = getelementptr inbounds i64, i64* %22, i64 %23
%25 = load i64, i64* %24
store i64 %25, i64* %12
%26 = load i64, i64* %10
store i64 %26, i64* %11
br label %27
27: ; preds = %55, %21
%28 = load i64, i64* %11
%29 = icmp ugt i64 %28, 0
br i1 %29, label %30, label %44
30: ; preds = %27
%31 = load double*, double** %5
%32 = load i64*, i64** %6
%33 = load i64, i64* %11
%34 = sub i64 %33, 1
%35 = getelementptr inbounds i64, i64* %32, i64 %34
%36 = load i64, i64* %35
%37 = getelementptr inbounds double, double* %31, i64 %36
%38 = load double, double* %37
%39 = load double*, double** %5
%40 = load i64, i64* %12
%41 = getelementptr inbounds double, double* %39, i64 %40
%42 = load double, double* %41
%43 = fcmp ogt double %38, %42
br label %44
44: ; preds = %30, %27
%45 = phi i1 [ false, %27 ], [ %43, %30 ]
br i1 %45, label %46, label %58
46: ; preds = %44
%47 = load i64*, i64** %6
%48 = load i64, i64* %11
%49 = sub i64 %48, 1
%50 = getelementptr inbounds i64, i64* %47, i64 %49
%51 = load i64, i64* %50
%52 = load i64*, i64** %6
%53 = load i64, i64* %11
%54 = getelementptr inbounds i64, i64* %52, i64 %53
store i64 %51, i64* %54
br label %55
55: ; preds = %46
%56 = load i64, i64* %11
%57 = add i64 %56, -1
store i64 %57, i64* %11
br label %27
58: ; preds = %44
br label %59
59: ; preds = %58
%60 = load i64, i64* %10
%61 = add i64 %60, 1
store i64 %61, i64* %10
br label %17
62: ; preds = %17
br label %141
63: ; preds = %4
%64 = load double*, double** %5
%65 = load i64*, i64** %6
%66 = load i64, i64* %7
%67 = udiv i64 %66, 2
%68 = getelementptr inbounds i64, i64* %65, i64 %67
%69 = load i64, i64* %68
%70 = getelementptr inbounds double, double* %64, i64 %69
%71 = load double, double* %70
store double %71, double* %9
store i64 0, i64* %10
%72 = load i64, i64* %7
%73 = sub i64 %72, 1
store i64 %73, i64* %11
br label %74
74: ; preds = %123, %63
br label %75
75: ; preds = %85, %74
%76 = load double*, double** %5
%77 = load i64*, i64** %6
%78 = load i64, i64* %10
%79 = getelementptr inbounds i64, i64* %77, i64 %78
%80 = load i64, i64* %79
%81 = getelementptr inbounds double, double* %76, i64 %80
%82 = load double, double* %81
%83 = load double, double* %9
%84 = fcmp olt double %82, %83
br i1 %84, label %85, label %88
85: ; preds = %75
%86 = load i64, i64* %10
%87 = add i64 %86, 1
store i64 %87, i64* %10
br label %75
88: ; preds = %75
br label %89
89: ; preds = %99, %88
%90 = load double, double* %9
%91 = load double*, double** %5
%92 = load i64*, i64** %6
%93 = load i64, i64* %11
%94 = getelementptr inbounds i64, i64* %92, i64 %93
%95 = load i64, i64* %94
%96 = getelementptr inbounds double, double* %91, i64 %95
%97 = load double, double* %96
%98 = fcmp olt double %90, %97
br i1 %98, label %99, label %102
99: ; preds = %89
%100 = load i64, i64* %11
%101 = add i64 %100, -1
store i64 %101, i64* %11
br label %89
102: ; preds = %89
%103 = load i64, i64* %10
%104 = load i64, i64* %11
%105 = icmp uge i64 %103, %104
br i1 %105, label %106, label %107
106: ; preds = %102
br label %128
107: ; preds = %102
%108 = load i64*, i64** %6
%109 = load i64, i64* %10
%110 = getelementptr inbounds i64, i64* %108, i64 %109
%111 = load i64, i64* %110
store i64 %111, i64* %12
%112 = load i64*, i64** %6
%113 = load i64, i64* %11
%114 = getelementptr inbounds i64, i64* %112, i64 %113
%115 = load i64, i64* %114
%116 = load i64*, i64** %6
%117 = load i64, i64* %10
%118 = getelementptr inbounds i64, i64* %116, i64 %117
store i64 %115, i64* %118
%119 = load i64, i64* %12
%120 = load i64*, i64** %6
%121 = load i64, i64* %11
%122 = getelementptr inbounds i64, i64* %120, i64 %121
store i64 %119, i64* %122
br label %123
123: ; preds = %107
%124 = load i64, i64* %10
%125 = add i64 %124, 1
store i64 %125, i64* %10
%126 = load i64, i64* %11
%127 = add i64 %126, -1
store i64 %127, i64* %11
br label %74
128: ; preds = %106
%129 = load double*, double** %5
%130 = load i64*, i64** %6
%131 = load i64, i64* %10
%132 = load i64, i64* %8
%133 = load double*, double** %5
%134 = load i64*, i64** %6
%135 = load i64, i64* %10
%136 = getelementptr inbounds i64, i64* %134, i64 %135
%137 = load i64, i64* %7
%138 = load i64, i64* %10
%139 = sub i64 %137, %138
%140 = load i64, i64* %8
br label %141
141: ; preds = %128, %62
ret void
}

LLVM IR (-O2):
define void @fr_quicksortclassic_double_i_(double* %0, i64* %1, i64 %2, i64 %3) {
%5 = icmp ult i64 %2, %3
br i1 %5, label %6, label %55
6: ; preds = %88, %4
%7 = phi i64* [ %1, %4 ], [ %75, %88 ]
%8 = phi i64 [ %2, %4 ], [ %89, %88 ]
%9 = icmp ugt i64 %8, 1
br i1 %9, label %10, label %110
10: ; preds = %6
%11 = add i64 %8, -1
%12 = and i64 %11, 1
%13 = icmp eq i64 %8, 2
br i1 %13, label %91, label %14
14: ; preds = %10
%15 = and i64 %11, -2
br label %16
16: ; preds = %51, %14
%17 = phi i64 [ 1, %14 ], [ %52, %51 ]
%18 = phi i64 [ 0, %14 ], [ %53, %51 ]
%19 = getelementptr inbounds i64, i64* %7, i64 %17
%20 = load i64, i64* %19
%21 = getelementptr inbounds double, double* %0, i64 %20
%22 = load double, double* %21
br label %23
23: ; preds = %16, %31
%24 = phi i64 [ %17, %16 ], [ %25, %31 ]
%25 = add i64 %24, -1
%26 = getelementptr inbounds i64, i64* %7, i64 %25
%27 = load i64, i64* %26
%28 = getelementptr inbounds double, double* %0, i64 %27
%29 = load double, double* %28
%30 = fcmp ogt double %29, %22
br i1 %30, label %31, label %34
31: ; preds = %23
%32 = getelementptr inbounds i64, i64* %7, i64 %24
store i64 %27, i64* %32
%33 = icmp eq i64 %25, 0
br i1 %33, label %34, label %23
34: ; preds = %31, %23
%35 = add nuw i64 %17, 1
%36 = getelementptr inbounds i64, i64* %7, i64 %35
%37 = load i64, i64* %36
%38 = getelementptr inbounds double, double* %0, i64 %37
%39 = load double, double* %38
br label %40
40: ; preds = %48, %34
%41 = phi i64 [ %35, %34 ], [ %42, %48 ]
%42 = add i64 %41, -1
%43 = getelementptr inbounds i64, i64* %7, i64 %42
%44 = load i64, i64* %43
%45 = getelementptr inbounds double, double* %0, i64 %44
%46 = load double, double* %45
%47 = fcmp ogt double %46, %39
br i1 %47, label %48, label %51
48: ; preds = %40
%49 = getelementptr inbounds i64, i64* %7, i64 %41
store i64 %44, i64* %49
%50 = icmp eq i64 %42, 0
br i1 %50, label %51, label %40
51: ; preds = %48, %40
%52 = add nuw i64 %17, 2
%53 = add i64 %18, 2
%54 = icmp eq i64 %53, %15
br i1 %54, label %91, label %16
55: ; preds = %4, %88
%56 = phi i64 [ %89, %88 ], [ %2, %4 ]
%57 = phi i64* [ %75, %88 ], [ %1, %4 ]
%58 = lshr i64 %56, 1
%59 = getelementptr inbounds i64, i64* %57, i64 %58
%60 = load i64, i64* %59
%61 = getelementptr inbounds double, double* %0, i64 %60
%62 = load double, double* %61
br label %63
63: ; preds = %86, %55
%64 = phi i64 [ 0, %55 ], [ %73, %86 ]
%65 = phi i64 [ %56, %55 ], [ %78, %86 ]
br label %66
66: ; preds = %66, %63
%67 = phi i64 [ %64, %63 ], [ %73, %66 ]
%68 = getelementptr inbounds i64, i64* %57, i64 %67
%69 = load i64, i64* %68
%70 = getelementptr inbounds double, double* %0, i64 %69
%71 = load double, double* %70
%72 = fcmp olt double %71, %62
%73 = add i64 %67, 1
br i1 %72, label %66, label %74
74: ; preds = %66
%75 = getelementptr inbounds i64, i64* %57, i64 %67
br label %76
76: ; preds = %74, %76
%77 = phi i64 [ %78, %76 ], [ %65, %74 ]
%78 = add i64 %77, -1
%79 = getelementptr inbounds i64, i64* %57, i64 %78
%80 = load i64, i64* %79
%81 = getelementptr inbounds double, double* %0, i64 %80
%82 = load double, double* %81
%83 = fcmp olt double %62, %82
br i1 %83, label %76, label %84
84: ; preds = %76
%85 = icmp ult i64 %67, %78
br i1 %85, label %86, label %88
86: ; preds = %84
%87 = getelementptr inbounds i64, i64* %57, i64 %78
store i64 %80, i64* %75
store i64 %69, i64* %87
br label %63
88: ; preds = %84
tail call void @fr_quicksortclassic_double_i_(double* %0, i64* %57, i64 %67, i64 %3)
%89 = sub i64 %56, %67
%90 = icmp ult i64 %89, %3
br i1 %90, label %6, label %55
91: ; preds = %51, %10
%92 = phi i64 [ 1, %10 ], [ %52, %51 ]
%93 = icmp eq i64 %12, 0
br i1 %93, label %110, label %94
94: ; preds = %91
%95 = getelementptr inbounds i64, i64* %7, i64 %92
%96 = load i64, i64* %95
%97 = getelementptr inbounds double, double* %0, i64 %96
%98 = load double, double* %97
br label %99
99: ; preds = %107, %94
%100 = phi i64 [ %92, %94 ], [ %101, %107 ]
%101 = add i64 %100, -1
%102 = getelementptr inbounds i64, i64* %7, i64 %101
%103 = load i64, i64* %102
%104 = getelementptr inbounds double, double* %0, i64 %103
%105 = load double, double* %104
%106 = fcmp ogt double %105, %98
br i1 %106, label %107, label %110
107: ; preds = %99
%108 = getelementptr inbounds i64, i64* %7, i64 %100
store i64 %103, i64* %108
%109 = icmp eq i64 %101, 0
br i1 %109, label %110, label %99
110: ; preds = %91, %107, %99, %6
ret void
}