int partition(float a[], int l, int r, int ind[]) {
  int i, j;
  float pivot, t;
  int index, Z;
  pivot = a[l];
  index = ind[l];
  i = l;
  j = r + 1;
  while (1) {
    do
      ++i;
    while (a[i] <= pivot && i <= r);
    do
      --j;
    while (a[j] > pivot);
    if (i >= j)
      break;
    t = a[i];
    a[i] = a[j];
    a[j] = t;
    Z = ind[i];
    ind[i] = ind[j];
    ind[j] = Z;
  }
  t = a[l];
  a[l] = a[j];
  a[j] = t;
  Z = ind[l];
  ind[l] = ind[j];
  ind[j] = Z;
  return j;
}


x86 assembly (clang, -O0):
<partition>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %rcx,-0x18(%rbp)
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x24(%rbp)
mov    -0x18(%rbp),%rax
movslq -0xc(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x2c(%rbp)
mov    -0xc(%rbp),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1146 <partition+0x46>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm1
movss  -0x24(%rbp),%xmm0
xor    %eax,%eax
ucomiss %xmm1,%xmm0
mov    %al,-0x31(%rbp)
jb     117b <partition+0x7b>
mov    -0x1c(%rbp),%eax
cmp    -0x10(%rbp),%eax
setle  %al
mov    %al,-0x31(%rbp)
mov    -0x31(%rbp),%al
test   $0x1,%al
jne    1146 <partition+0x46>
jmp    118b <partition+0x8b>
mov    -0x20(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x20(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
ucomiss -0x24(%rbp),%xmm0
ja     118b <partition+0x8b>
mov    -0x1c(%rbp),%eax
cmp    -0x20(%rbp),%eax
jl     11bc <partition+0xbc>
jmp    1231 <partition+0x131>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x28(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
movss  -0x28(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x30(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    (%rax,%rcx,4),%edx
mov    -0x18(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x30(%rbp),%edx
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
jmp    1141 <partition+0x41>
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x28(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
movss  -0x28(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x18(%rbp),%rax
movslq -0xc(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x30(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    (%rax,%rcx,4),%edx
mov    -0x18(%rbp),%rax
movslq -0xc(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x30(%rbp),%edx
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x20(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<partition>:
push   %rbx
mov    %edx,%eax
movslq %esi,%r8
movss  (%rdi,%r8,4),%xmm0
movslq %edx,%r9
add    $0x1,%eax
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movslq %esi,%rdx
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
lea    0x1(%rdx),%rsi
movss  0x4(%rdi,%rdx,4),%xmm1
ucomiss %xmm1,%xmm0
jb     1147 <partition+0x47>
cmp    %r9,%rdx
mov    %rsi,%rdx
jl     1130 <partition+0x30>
movslq %eax,%r10
lea    (%rdi,%r10,4),%r11
xor    %edx,%edx
movss  -0x4(%r11,%rdx,4),%xmm2
add    $0xffffffffffffffff,%rdx
ucomiss %xmm0,%xmm2
ja     1150 <partition+0x50>
mov    %eax,%ebx
add    %rdx,%rbx
cmp    %ebx,%esi
jge    118b <partition+0x8b>
movss  %xmm2,(%rdi,%rsi,4)
movss  %xmm1,(%r11,%rdx,4)
mov    (%rcx,%rsi,4),%r11d
lea    (%rcx,%r10,4),%r10
mov    (%r10,%rdx,4),%eax
mov    %eax,(%rcx,%rsi,4)
mov    %r11d,(%r10,%rdx,4)
mov    %ebx,%eax
jmp    1120 <partition+0x20>
add    %edx,%eax
movss  (%rdi,%r8,4),%xmm0
movss  %xmm2,(%rdi,%r8,4)
movss  %xmm0,(%r11,%rdx,4)
mov    (%rcx,%r8,4),%esi
lea    (%rcx,%r10,4),%rdi
mov    (%rdi,%rdx,4),%ebx
mov    %ebx,(%rcx,%r8,4)
mov    %esi,(%rdi,%rdx,4)
pop    %rbx
ret

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

LLVM IR (-O2):
define i32 @partition(float* nocapture %0, i32 %1, i32 %2, i32* nocapture %3) {
%5 = sext i32 %1 to i64
%6 = getelementptr inbounds float, float* %0, i64 %5
%7 = load float, float* %6
%8 = add nsw i32 %2, 1
%9 = sext i32 %2 to i64
br label %10
10: ; preds = %36, %4
%11 = phi i32 [ %8, %4 ], [ %34, %36 ]
%12 = phi i32 [ %1, %4 ], [ %24, %36 ]
%13 = sext i32 %12 to i64
br label %14
14: ; preds = %14, %10
%15 = phi i64 [ %16, %14 ], [ %13, %10 ]
%16 = add nsw i64 %15, 1
%17 = getelementptr inbounds float, float* %0, i64 %16
%18 = load float, float* %17
%19 = fcmp ole float %18, %7
%20 = icmp slt i64 %15, %9
%21 = select i1 %19, i1 %20, i1 false
br i1 %21, label %14, label %22
22: ; preds = %14
%23 = getelementptr inbounds float, float* %0, i64 %16
%24 = trunc i64 %16 to i32
%25 = sext i32 %11 to i64
br label %26
26: ; preds = %22, %26
%27 = phi i64 [ %25, %22 ], [ %28, %26 ]
%28 = add i64 %27, -1
%29 = getelementptr inbounds float, float* %0, i64 %28
%30 = load float, float* %29
%31 = fcmp ogt float %30, %7
br i1 %31, label %26, label %32
32: ; preds = %26
%33 = getelementptr inbounds float, float* %0, i64 %28
%34 = trunc i64 %28 to i32
%35 = icmp slt i32 %24, %34
br i1 %35, label %36, label %41
36: ; preds = %32
store float %30, float* %23
store float %18, float* %33
%37 = getelementptr inbounds i32, i32* %3, i64 %16
%38 = load i32, i32* %37
%39 = getelementptr inbounds i32, i32* %3, i64 %28
%40 = load i32, i32* %39
store i32 %40, i32* %37
store i32 %38, i32* %39
br label %10
41: ; preds = %32
%42 = trunc i64 %28 to i32
%43 = getelementptr inbounds i32, i32* %3, i64 %5
%44 = load float, float* %6
store float %30, float* %6
store float %44, float* %33
%45 = load i32, i32* %43
%46 = getelementptr inbounds i32, i32* %3, i64 %28
%47 = load i32, i32* %46
store i32 %47, i32* %43
store i32 %45, i32* %46
ret i32 %42
}