#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 */
int /*<<< orphan*/ assert(double *);
int /*<<< orphan*/ dbl_qrec(double *, size_t);
int /*<<< orphan*/ dbl_reverse(double *, size_t);
void dbl_qsort(double *array, size_t n, int dir) {
  size_t i, k;
  double *l, *r;
  double t;
  assert(array);
  if (n < 2)
    return;
  if (n < 16)
    k = n;
  else {
    dbl_qrec(array, n);
    k = 16 - 1;
  }
  for (l = r = array; --k > 0;)
    if (*++r < *l)
      l = r;
  r = array;
  t = *l;
  *l = *r;
  *r = t;
  for (i = n; --i > 0;) {
    t = *++r;
    for (l = r; *--l > t;)
      l[1] = *l;
    l[1] = t;
  }
  if (dir < 0)
    dbl_reverse(array, n);
}


x86 assembly (clang, -O0):
<dbl_qsort>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    -0x8(%rbp),%rdi
call   1040 <assert@plt>
cmpq   $0x2,-0x10(%rbp)
jae    115c <dbl_qsort+0x2c>
jmp    12ae <dbl_qsort+0x17e>
cmpq   $0x10,-0x10(%rbp)
jae    1174 <dbl_qsort+0x44>
mov    -0x10(%rbp),%rax
mov    %rax,-0x28(%rbp)
jmp    1189 <dbl_qsort+0x59>
mov    -0x8(%rbp),%rdi
mov    -0x10(%rbp),%rsi
call   1050 <dbl_qrec@plt>
movq   $0xf,-0x28(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    %rax,-0x30(%rbp)
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x28(%rbp)
cmp    $0x0,%rax
jbe    11de <dbl_qsort+0xae>
mov    -0x38(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x38(%rbp)
movsd  0x8(%rax),%xmm1
mov    -0x30(%rbp),%rax
movsd  (%rax),%xmm0
ucomisd %xmm1,%xmm0
jbe    11d9 <dbl_qsort+0xa9>
mov    -0x38(%rbp),%rax
mov    %rax,-0x30(%rbp)
jmp    1195 <dbl_qsort+0x65>
mov    -0x8(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x30(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x38(%rbp),%rax
movsd  (%rax),%xmm0
mov    -0x30(%rbp),%rax
movsd  %xmm0,(%rax)
movsd  -0x40(%rbp),%xmm0
mov    -0x38(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x10(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
cmp    $0x0,%rax
jbe    1297 <dbl_qsort+0x167>
mov    -0x38(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x38(%rbp)
movsd  0x8(%rax),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x38(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
mov    %rax,%rcx
add    $0xfffffffffffffff8,%rcx
mov    %rcx,-0x30(%rbp)
movsd  -0x8(%rax),%xmm0
ucomisd -0x40(%rbp),%xmm0
jbe    1284 <dbl_qsort+0x154>
mov    -0x30(%rbp),%rax
movsd  (%rax),%xmm0
mov    -0x30(%rbp),%rax
movsd  %xmm0,0x8(%rax)
jmp    124f <dbl_qsort+0x11f>
movsd  -0x40(%rbp),%xmm0
mov    -0x30(%rbp),%rax
movsd  %xmm0,0x8(%rax)
jmp    1218 <dbl_qsort+0xe8>
cmpl   $0x0,-0x14(%rbp)
jge    12ae <dbl_qsort+0x17e>
mov    -0x8(%rbp),%rdi
mov    -0x10(%rbp),%rsi
call   1030 <dbl_reverse@plt>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<dbl_qsort>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    %edx,%r15d
mov    %rsi,%r14
mov    %rdi,%rbx
call   1040 <assert@plt>
cmp    $0x2,%r14
jb     123c <dbl_qsort+0x10c>
cmp    $0x10,%r14
jae    115b <dbl_qsort+0x2b>
lea    -0x1(%r14),%rax
jmp    116b <dbl_qsort+0x3b>
mov    %rbx,%rdi
mov    %r14,%rsi
call   1050 <dbl_qrec@plt>
mov    $0xe,%eax
lea    -0x1(%rax),%r8
mov    %rax,%rsi
and    $0x3,%rsi
je     11bb <dbl_qsort+0x8b>
lea    0x8(%rbx),%rcx
xor    %ebp,%ebp
mov    %rbx,%rdx
jmp    11a0 <dbl_qsort+0x70>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    $0x1,%rbp
add    $0x8,%rcx
mov    %rdi,%rdx
cmp    %rbp,%rsi
je     11b2 <dbl_qsort+0x82>
movsd  (%rdx),%xmm0
ucomisd (%rcx),%xmm0
mov    %rcx,%rdi
ja     1190 <dbl_qsort+0x60>
mov    %rdx,%rdi
jmp    1190 <dbl_qsort+0x60>
sub    %rbp,%rax
add    $0xfffffffffffffff8,%rcx
jmp    11c1 <dbl_qsort+0x91>
mov    %rbx,%rcx
mov    %rbx,%rdi
mov    %rdi,%rdx
cmp    $0x3,%r8
jae    1247 <dbl_qsort+0x117>
movsd  (%rdx),%xmm0
movsd  (%rbx),%xmm1
movsd  %xmm1,(%rdx)
movsd  %xmm0,(%rbx)
mov    %r14,%rax
add    $0xffffffffffffffff,%rax
je     1237 <dbl_qsort+0x107>
lea    0x8(%rbx),%rcx
mov    %rbx,%rdx
nopw   0x0(%rax,%rax,1)
movsd  0x8(%rdx),%xmm1
add    $0x8,%rdx
ucomisd %xmm1,%xmm0
mov    %rdx,%rsi
jbe    1223 <dbl_qsort+0xf3>
mov    %rcx,%rsi
cs nopw 0x0(%rax,%rax,1)
nop
movsd  %xmm0,(%rsi)
movsd  -0x10(%rsi),%xmm0
add    $0xfffffffffffffff8,%rsi
ucomisd %xmm1,%xmm0
ja     1210 <dbl_qsort+0xe0>
movsd  %xmm1,(%rsi)
add    $0xffffffffffffffff,%rax
je     1237 <dbl_qsort+0x107>
movsd  (%rdx),%xmm0
add    $0x8,%rcx
jmp    11f0 <dbl_qsort+0xc0>
test   %r15d,%r15d
js     12a0 <dbl_qsort+0x170>
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret
add    $0x20,%rcx
jmp    1261 <dbl_qsort+0x131>
nopl   (%rax)
add    $0x20,%rcx
mov    %rdx,%rdi
add    $0xfffffffffffffffc,%rax
je     11ca <dbl_qsort+0x9a>
movsd  (%rdi),%xmm0
ucomisd -0x18(%rcx),%xmm0
jbe    1270 <dbl_qsort+0x140>
lea    -0x18(%rcx),%rdi
movsd  (%rdi),%xmm0
ucomisd -0x10(%rcx),%xmm0
jbe    127f <dbl_qsort+0x14f>
lea    -0x10(%rcx),%rdi
movsd  (%rdi),%xmm0
ucomisd -0x8(%rcx),%xmm0
jbe    128e <dbl_qsort+0x15e>
lea    -0x8(%rcx),%rdi
movsd  (%rdi),%xmm0
ucomisd (%rcx),%xmm0
mov    %rcx,%rdx
ja     1250 <dbl_qsort+0x120>
mov    %rdi,%rdx
jmp    1250 <dbl_qsort+0x120>
mov    %rbx,%rdi
mov    %r14,%rsi
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
jmp    1030 <dbl_reverse@plt>

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

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