#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*/ nr_free_lvector(unsigned long *, int, int);
int /*<<< orphan*/ nr_free_vector(float *, int, int);
unsigned long *nr_lvector(int, int);
float *nr_vector(int, int);
int /*<<< orphan*/ nrerror(char *);
float selip(unsigned long k, unsigned long n, float arr[]) {
  void shell(unsigned long n, float a[]);
  unsigned long i, j, jl, jm, ju, kk, mm, nlo, nxtmm, *isel;
  float ahi, alo, sum, *sel;
  if (k < 1 || k > n || n <= 0)
    nrerror("bad input to selip");
  isel = nr_lvector(1, 64 + 2);
  sel = nr_vector(1, 64 + 2);
  kk = k;
  ahi = 1.0e30;
  alo = -1.0e30;
  for (;;) {
    mm = nlo = 0;
    sum = 0.0;
    nxtmm = 64 + 1;
    for (i = 1; i <= n; i++) {
      if (arr[i] >= alo && arr[i] <= ahi) {
        mm++;
        if (arr[i] == alo)
          nlo++;
        if (mm <= 64)
          sel[mm] = arr[i];
        else if (mm == nxtmm) {
          nxtmm = mm + mm / 64;
          sel[1 + ((i + mm + kk) % 64)] = arr[i];
        }
        sum += arr[i];
      }
    }
    if (kk <= nlo) {
      nr_free_vector(sel, 1, 64 + 2);
      nr_free_lvector(isel, 1, 64 + 2);
      return alo;
    } else if (mm <= 64) {
      shell(mm, sel);
      ahi = sel[kk];
      nr_free_vector(sel, 1, 64 + 2);
      nr_free_lvector(isel, 1, 64 + 2);
      return ahi;
    }
    sel[64 + 1] = sum / mm;
    shell(64 + 1, sel);
    sel[64 + 2] = ahi;
    for (j = 1; j <= 64 + 2; j++)
      isel[j] = 0;
    for (i = 1; i <= n; i++) {
      if (arr[i] >= alo && arr[i] <= ahi) {
        jl = 0;
        ju = 64 + 2;
        while (ju - jl > 1) {
          jm = (ju + jl) / 2;
          if (arr[i] >= sel[jm])
            jl = jm;
          else
            ju = jm;
        }
        isel[ju]++;
      }
    }
    j = 1;
    while (kk > isel[j]) {
      alo = sel[j];
      kk -= isel[j++];
    }
    ahi = sel[j];
  }
}


x86 assembly (clang, -O0):
<selip>:
push   %rbp
mov    %rsp,%rbp
sub    $0xa0,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
cmpq   $0x1,-0x10(%rbp)
jb     119b <selip+0x3b>
mov    -0x10(%rbp),%rax
cmp    -0x18(%rbp),%rax
ja     119b <selip+0x3b>
cmpq   $0x0,-0x18(%rbp)
ja     11a7 <selip+0x47>
lea    0xe66(%rip),%rdi
call   1050 <nrerror@plt>
mov    $0x1,%edi
mov    $0x42,%esi
call   1040 <nr_lvector@plt>
mov    %rax,-0x70(%rbp)
mov    $0x1,%edi
mov    $0x42,%esi
call   1030 <nr_vector@plt>
mov    %rax,-0x88(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x50(%rbp)
movss  0xe24(%rip),%xmm0
movss  %xmm0,-0x74(%rbp)
movss  0xe13(%rip),%xmm0
movss  %xmm0,-0x78(%rbp)
movq   $0x0,-0x60(%rbp)
movq   $0x0,-0x58(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x7c(%rbp)
movq   $0x41,-0x68(%rbp)
movq   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x18(%rbp),%rax
ja     133c <selip+0x1dc>
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
ucomiss -0x78(%rbp),%xmm0
jb     1326 <selip+0x1c6>
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm1
movss  -0x74(%rbp),%xmm0
ucomiss %xmm1,%xmm0
jb     1326 <selip+0x1c6>
mov    -0x58(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x58(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
ucomiss -0x78(%rbp),%xmm0
jne    128f <selip+0x12f>
jp     128f <selip+0x12f>
mov    -0x60(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x60(%rbp)
cmpq   $0x40,-0x58(%rbp)
ja     12bc <selip+0x15c>
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x88(%rbp),%rax
mov    -0x58(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
jmp    130f <selip+0x1af>
mov    -0x58(%rbp),%rax
cmp    -0x68(%rbp),%rax
jne    130a <selip+0x1aa>
mov    -0x58(%rbp),%rax
mov    -0x58(%rbp),%rcx
shr    $0x6,%rcx
add    %rcx,%rax
mov    %rax,-0x68(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x88(%rbp),%rax
mov    -0x28(%rbp),%rcx
add    -0x58(%rbp),%rcx
add    -0x50(%rbp),%rcx
and    $0x3f,%rcx
add    $0x1,%rcx
movss  %xmm0,(%rax,%rcx,4)
jmp    130f <selip+0x1af>
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
addss  -0x7c(%rbp),%xmm0
movss  %xmm0,-0x7c(%rbp)
jmp    132b <selip+0x1cb>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    121a <selip+0xba>
mov    -0x50(%rbp),%rax
cmp    -0x60(%rbp),%rax
ja     1382 <selip+0x222>
mov    -0x88(%rbp),%rdi
mov    $0x1,%esi
mov    $0x42,%edx
call   1070 <nr_free_vector@plt>
mov    -0x70(%rbp),%rdi
mov    $0x1,%esi
mov    $0x42,%edx
call   1060 <nr_free_lvector@plt>
movss  -0x78(%rbp),%xmm0
movss  %xmm0,-0x4(%rbp)
jmp    1615 <selip+0x4b5>
cmpq   $0x40,-0x58(%rbp)
ja     13ea <selip+0x28a>
mov    -0x58(%rbp),%rdi
mov    -0x88(%rbp),%rsi
call   1080 <shell@plt>
mov    -0x88(%rbp),%rax
mov    -0x50(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x74(%rbp)
mov    -0x88(%rbp),%rdi
mov    $0x1,%esi
mov    $0x42,%edx
call   1070 <nr_free_vector@plt>
mov    -0x70(%rbp),%rdi
mov    $0x1,%esi
mov    $0x42,%edx
call   1060 <nr_free_lvector@plt>
movss  -0x74(%rbp),%xmm0
movss  %xmm0,-0x4(%rbp)
jmp    1615 <selip+0x4b5>
jmp    13ef <selip+0x28f>
movss  -0x7c(%rbp),%xmm0
movss  %xmm0,-0x94(%rbp)
ff
mov    -0x58(%rbp),%rax
mov    %rax,%rdx
shr    %rdx
mov    %eax,%ecx
and    $0x1,%ecx
or     %rdx,%rcx
cvtsi2ss %rcx,%xmm0
addss  %xmm0,%xmm0
cvtsi2ss %rax,%xmm1
movss  %xmm1,-0x90(%rbp)
ff
test   %rax,%rax
movss  %xmm0,-0x8c(%rbp)
ff
js     1445 <selip+0x2e5>
movss  -0x90(%rbp),%xmm0
ff
movss  %xmm0,-0x8c(%rbp)
ff
movss  -0x94(%rbp),%xmm0
ff
movss  -0x8c(%rbp),%xmm1
ff
divss  %xmm1,%xmm0
mov    -0x88(%rbp),%rax
movss  %xmm0,0x104(%rax)
mov    -0x88(%rbp),%rsi
mov    $0x41,%edi
call   1080 <shell@plt>
movss  -0x74(%rbp),%xmm0
mov    -0x88(%rbp),%rax
movss  %xmm0,0x108(%rax)
movq   $0x1,-0x30(%rbp)
cmpq   $0x42,-0x30(%rbp)
ja     14c1 <selip+0x361>
mov    -0x70(%rbp),%rax
mov    -0x30(%rbp),%rcx
movq   $0x0,(%rax,%rcx,8)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    1495 <selip+0x335>
movq   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%rax
cmp    -0x18(%rbp),%rax
ja     15a1 <selip+0x441>
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
ucomiss -0x78(%rbp),%xmm0
jb     158b <selip+0x42b>
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm1
movss  -0x74(%rbp),%xmm0
ucomiss %xmm1,%xmm0
jb     158b <selip+0x42b>
movq   $0x0,-0x38(%rbp)
movq   $0x42,-0x48(%rbp)
mov    -0x48(%rbp),%rax
sub    -0x38(%rbp),%rax
cmp    $0x1,%rax
jbe    1577 <selip+0x417>
mov    -0x48(%rbp),%rax
add    -0x38(%rbp),%rax
shr    $0x1,%rax
mov    %rax,-0x40(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x88(%rbp),%rax
mov    -0x40(%rbp),%rcx
ucomiss (%rax,%rcx,4),%xmm0
jb     156a <selip+0x40a>
mov    -0x40(%rbp),%rax
mov    %rax,-0x38(%rbp)
jmp    1572 <selip+0x412>
mov    -0x40(%rbp),%rax
mov    %rax,-0x48(%rbp)
jmp    1519 <selip+0x3b9>
mov    -0x70(%rbp),%rax
mov    -0x48(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
add    $0x1,%rdx
mov    %rdx,(%rax,%rcx,8)
jmp    1590 <selip+0x430>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    14c9 <selip+0x369>
movq   $0x1,-0x30(%rbp)
mov    -0x50(%rbp),%rax
mov    -0x70(%rbp),%rcx
mov    -0x30(%rbp),%rdx
cmp    (%rcx,%rdx,8),%rax
jbe    15fb <selip+0x49b>
mov    -0x88(%rbp),%rax
mov    -0x30(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x78(%rbp)
mov    -0x70(%rbp),%rax
mov    -0x30(%rbp),%rcx
mov    %rcx,%rdx
add    $0x1,%rdx
mov    %rdx,-0x30(%rbp)
mov    (%rax,%rcx,8),%rcx
mov    -0x50(%rbp),%rax
sub    %rcx,%rax
mov    %rax,-0x50(%rbp)
jmp    15a9 <selip+0x449>
mov    -0x88(%rbp),%rax
mov    -0x30(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x74(%rbp)
jmp    11f2 <selip+0x92>
movss  -0x4(%rbp),%xmm0
add    $0xa0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<selip>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %rdx,%r12
mov    %rdi,%r15
lea    -0x1(%rdi),%rax
mov    %rsi,0x8(%rsp)
cmp    %rsi,%rax
jb     119e <selip+0x2e>
lea    0xe6f(%rip),%rdi
call   1050 <nrerror@plt>
mov    $0x1,%edi
mov    $0x42,%esi
call   1040 <nr_lvector@plt>
mov    %rax,%r14
mov    $0x1,%edi
mov    $0x42,%esi
call   1030 <nr_vector@plt>
mov    %rax,%rbx
mov    0x8(%rsp),%r13
test   %r13,%r13
je     13ec <selip+0x27c>
mov    %r14,%rax
add    $0x8,%rax
mov    %rax,0x10(%rsp)
neg    %r13
movss  0xe1d(%rip),%xmm4
movss  0xe11(%rip),%xmm3
jmp    120e <selip+0x9e>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movss  (%rbx,%rax,4),%xmm4
test   %rdi,%rdi
je     13f4 <selip+0x284>
mov    $0x1,%eax
xorps  %xmm0,%xmm0
mov    $0x41,%ecx
xor    %r8d,%r8d
xor    %edi,%edi
jmp    1253 <selip+0xe3>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mov    %rdi,%rbp
movss  %xmm1,(%rbx,%rbp,4)
add    %rsi,%r8
addss  (%r12,%rax,4),%xmm0
lea    (%rax,%r13,1),%rdx
add    $0x1,%rdx
add    $0x1,%rax
cmp    $0x1,%rdx
je     12a0 <selip+0x130>
movss  (%r12,%rax,4),%xmm1
ucomiss %xmm3,%xmm1
jb     1241 <selip+0xd1>
ucomiss %xmm1,%xmm4
jb     1241 <selip+0xd1>
add    $0x1,%rdi
movaps %xmm1,%xmm2
cmpeqss %xmm3,%xmm2
movd   %xmm2,%esi
and    $0x1,%esi
cmp    $0x41,%rdi
jb     1230 <selip+0xc0>
cmp    %rcx,%rdi
jne    1238 <selip+0xc8>
mov    %rcx,%rdx
shr    $0x6,%rdx
add    %rcx,%rdx
add    %r15d,%ecx
lea    (%rax,%rcx,1),%ebp
and    $0x3f,%ebp
add    $0x1,%rbp
mov    %rdx,%rcx
jmp    1233 <selip+0xc3>
nopl   (%rax)
cmp    %r8,%r15
jbe    1409 <selip+0x299>
cmp    $0x40,%rdi
jbe    13fb <selip+0x28b>
test   %rdi,%rdi
movss  %xmm3,(%rsp)
movss  %xmm4,0x4(%rsp)
js     12d0 <selip+0x160>
xorps  %xmm1,%xmm1
cvtsi2ss %rdi,%xmm1
jmp    12e8 <selip+0x178>
nopl   (%rax)
mov    %rdi,%rax
shr    %rax
and    $0x1,%edi
or     %rax,%rdi
xorps  %xmm1,%xmm1
cvtsi2ss %rdi,%xmm1
addss  %xmm1,%xmm1
divss  %xmm1,%xmm0
movss  %xmm0,0x104(%rbx)
mov    $0x41,%edi
mov    %rbx,%rsi
call   1090 <shell@plt>
movss  0x4(%rsp),%xmm0
movss  %xmm0,0x108(%rbx)
mov    $0x210,%edx
mov    0x10(%rsp),%rdi
xor    %esi,%esi
call   1060 <memset@plt>
mov    0x8(%rsp),%rdi
test   %rdi,%rdi
je     13b0 <selip+0x240>
mov    $0x1,%eax
movss  (%rsp),%xmm3
movss  0x4(%rsp),%xmm1
jmp    1351 <selip+0x1e1>
addq   $0x1,(%r14,%rcx,8)
lea    0x1(%rax),%rcx
cmp    %rdi,%rax
mov    %rcx,%rax
je     13a0 <selip+0x230>
movss  (%r12,%rax,4),%xmm0
ucomiss %xmm3,%xmm0
jb     1345 <selip+0x1d5>
ucomiss %xmm0,%xmm1
jb     1345 <selip+0x1d5>
mov    $0x42,%ecx
xor    %edx,%edx
jmp    137f <selip+0x20f>
nopw   0x0(%rax,%rax,1)
mov    %rsi,%rdx
mov    %rcx,%rsi
sub    %rdx,%rsi
cmp    $0x1,%rsi
jbe    1340 <selip+0x1d0>
lea    (%rcx,%rdx,1),%rsi
shr    %rsi
ucomiss (%rbx,%rsi,4),%xmm0
jae    1370 <selip+0x200>
mov    %rsi,%rcx
jmp    1373 <selip+0x203>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    0x10(%rsp),%rax
mov    (%rax),%rcx
jmp    13b7 <selip+0x247>
nopw   0x0(%rax,%rax,1)
xor    %ecx,%ecx
movss  (%rsp),%xmm3
mov    $0x1,%eax
cmp    %rcx,%r15
jbe    1200 <selip+0x90>
mov    $0x1,%eax
nopw   0x0(%rax,%rax,1)
sub    %rcx,%r15
mov    0x8(%r14,%rax,8),%rcx
add    $0x1,%rax
cmp    %rcx,%r15
ja     13d0 <selip+0x260>
movss  -0x4(%rbx,%rax,4),%xmm3
jmp    1200 <selip+0x90>
movss  0xc0c(%rip),%xmm3
test   %r15,%r15
je     1409 <selip+0x299>
xor    %edi,%edi
mov    %rbx,%rsi
call   1090 <shell@plt>
movss  (%rbx,%r15,4),%xmm3
movss  %xmm3,(%rsp)
mov    %rbx,%rdi
mov    $0x1,%esi
mov    $0x42,%edx
call   1080 <nr_free_vector@plt>
mov    %r14,%rdi
mov    $0x1,%esi
mov    $0x42,%edx
call   1070 <nr_free_lvector@plt>
movss  (%rsp),%xmm0
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [19 x i8] c"bad input to selip\00"
define float @selip(i64 %0, i64 %1, float* %2) {
%4 = alloca float
%5 = alloca i64
%6 = alloca i64
%7 = alloca float*
%8 = alloca i64
%9 = alloca i64
%10 = alloca i64
%11 = alloca i64
%12 = alloca i64
%13 = alloca i64
%14 = alloca i64
%15 = alloca i64
%16 = alloca i64
%17 = alloca i64*
%18 = alloca float
%19 = alloca float
%20 = alloca float
%21 = alloca float*
store i64 %0, i64* %5
store i64 %1, i64* %6
store float* %2, float** %7
%22 = load i64, i64* %5
%23 = icmp ult i64 %22, 1
br i1 %23, label %31, label %24
24: ; preds = %3
%25 = load i64, i64* %5
%26 = load i64, i64* %6
%27 = icmp ugt i64 %25, %26
br i1 %27, label %31, label %28
28: ; preds = %24
%29 = load i64, i64* %6
%30 = icmp ule i64 %29, 0
br i1 %30, label %31, label %33
31: ; preds = %28, %24, %3
%32 = call i32 @nrerror(i8* getelementptr inbounds ([19 x i8], [19 x i8]* @.str, i64 0, i64 0))
br label %33
33: ; preds = %31, %28
%34 = call i64* @nr_lvector(i32 1, i32 66)
store i64* %34, i64** %17
%35 = call float* @nr_vector(i32 1, i32 66)
store float* %35, float** %21
%36 = load i64, i64* %5
store i64 %36, i64* %13
store float 0x46293E5940000000, float* %18
store float 0xC6293E5940000000, float* %19
br label %37
37: ; preds = %234, %33
store i64 0, i64* %15
store i64 0, i64* %14
store float 0.000000e+00, float* %20
store i64 65, i64* %16
store i64 1, i64* %8
br label %38
38: ; preds = %110, %37
%39 = load i64, i64* %8
%40 = load i64, i64* %6
%41 = icmp ule i64 %39, %40
br i1 %41, label %42, label %113
42: ; preds = %38
%43 = load float*, float** %7
%44 = load i64, i64* %8
%45 = getelementptr inbounds float, float* %43, i64 %44
%46 = load float, float* %45
%47 = load float, float* %19
%48 = fcmp oge float %46, %47
br i1 %48, label %49, label %109
49: ; preds = %42
%50 = load float*, float** %7
%51 = load i64, i64* %8
%52 = getelementptr inbounds float, float* %50, i64 %51
%53 = load float, float* %52
%54 = load float, float* %18
%55 = fcmp ole float %53, %54
br i1 %55, label %56, label %109
56: ; preds = %49
%57 = load i64, i64* %14
%58 = add i64 %57, 1
store i64 %58, i64* %14
%59 = load float*, float** %7
%60 = load i64, i64* %8
%61 = getelementptr inbounds float, float* %59, i64 %60
%62 = load float, float* %61
%63 = load float, float* %19
%64 = fcmp oeq float %62, %63
br i1 %64, label %65, label %68
65: ; preds = %56
%66 = load i64, i64* %15
%67 = add i64 %66, 1
store i64 %67, i64* %15
br label %68
68: ; preds = %65, %56
%69 = load i64, i64* %14
%70 = icmp ule i64 %69, 64
br i1 %70, label %71, label %79
71: ; preds = %68
%72 = load float*, float** %7
%73 = load i64, i64* %8
%74 = getelementptr inbounds float, float* %72, i64 %73
%75 = load float, float* %74
%76 = load float*, float** %21
%77 = load i64, i64* %14
%78 = getelementptr inbounds float, float* %76, i64 %77
store float %75, float* %78
br label %102
79: ; preds = %68
%80 = load i64, i64* %14
%81 = load i64, i64* %16
%82 = icmp eq i64 %80, %81
br i1 %82, label %83, label %101
83: ; preds = %79
%84 = load i64, i64* %14
%85 = load i64, i64* %14
%86 = udiv i64 %85, 64
%87 = add i64 %84, %86
store i64 %87, i64* %16
%88 = load float*, float** %7
%89 = load i64, i64* %8
%90 = getelementptr inbounds float, float* %88, i64 %89
%91 = load float, float* %90
%92 = load float*, float** %21
%93 = load i64, i64* %8
%94 = load i64, i64* %14
%95 = add i64 %93, %94
%96 = load i64, i64* %13
%97 = add i64 %95, %96
%98 = urem i64 %97, 64
%99 = add i64 1, %98
%100 = getelementptr inbounds float, float* %92, i64 %99
store float %91, float* %100
br label %101
101: ; preds = %83, %79
br label %102
102: ; preds = %101, %71
%103 = load float*, float** %7
%104 = load i64, i64* %8
%105 = getelementptr inbounds float, float* %103, i64 %104
%106 = load float, float* %105
%107 = load float, float* %20
%108 = fadd float %107, %106
store float %108, float* %20
br label %109
109: ; preds = %102, %49, %42
br label %110
110: ; preds = %109
%111 = load i64, i64* %8
%112 = add i64 %111, 1
store i64 %112, i64* %8
br label %38
113: ; preds = %38
%114 = load i64, i64* %13
%115 = load i64, i64* %15
%116 = icmp ule i64 %114, %115
br i1 %116, label %117, label %123
117: ; preds = %113
%118 = load float*, float** %21
%119 = call i32 @nr_free_vector(float* %118, i32 1, i32 66)
%120 = load i64*, i64** %17
%121 = call i32 @nr_free_lvector(i64* %120, i32 1, i32 66)
%122 = load float, float* %19
store float %122, float* %4
br label %239
123: ; preds = %113
%124 = load i64, i64* %14
%125 = icmp ule i64 %124, 64
br i1 %125, label %126, label %138
126: ; preds = %123
%127 = load i64, i64* %14
%128 = load float*, float** %21
%129 = load float*, float** %21
%130 = load i64, i64* %13
%131 = getelementptr inbounds float, float* %129, i64 %130
%132 = load float, float* %131
store float %132, float* %18
%133 = load float*, float** %21
%134 = call i32 @nr_free_vector(float* %133, i32 1, i32 66)
%135 = load i64*, i64** %17
%136 = call i32 @nr_free_lvector(i64* %135, i32 1, i32 66)
%137 = load float, float* %18
store float %137, float* %4
br label %239
138: ; preds = %123
br label %139
139: ; preds = %138
%140 = load float, float* %20
%141 = load i64, i64* %14
%142 = uitofp i64 %141 to float
%143 = fdiv float %140, %142
%144 = load float*, float** %21
%145 = getelementptr inbounds float, float* %144, i64 65
store float %143, float* %145
%146 = load float*, float** %21
%147 = load float, float* %18
%148 = load float*, float** %21
%149 = getelementptr inbounds float, float* %148, i64 66
store float %147, float* %149
store i64 1, i64* %9
br label %150
150: ; preds = %157, %139
%151 = load i64, i64* %9
%152 = icmp ule i64 %151, 66
br i1 %152, label %153, label %160
153: ; preds = %150
%154 = load i64*, i64** %17
%155 = load i64, i64* %9
%156 = getelementptr inbounds i64, i64* %154, i64 %155
store i64 0, i64* %156
br label %157
157: ; preds = %153
%158 = load i64, i64* %9
%159 = add i64 %158, 1
store i64 %159, i64* %9
br label %150
160: ; preds = %150
store i64 1, i64* %8
br label %161
161: ; preds = %211, %160
%162 = load i64, i64* %8
%163 = load i64, i64* %6
%164 = icmp ule i64 %162, %163
br i1 %164, label %165, label %214
165: ; preds = %161
%166 = load float*, float** %7
%167 = load i64, i64* %8
%168 = getelementptr inbounds float, float* %166, i64 %167
%169 = load float, float* %168
%170 = load float, float* %19
%171 = fcmp oge float %169, %170
br i1 %171, label %172, label %210
172: ; preds = %165
%173 = load float*, float** %7
%174 = load i64, i64* %8
%175 = getelementptr inbounds float, float* %173, i64 %174
%176 = load float, float* %175
%177 = load float, float* %18
%178 = fcmp ole float %176, %177
br i1 %178, label %179, label %210
179: ; preds = %172
store i64 0, i64* %10
store i64 66, i64* %12
br label %180
180: ; preds = %203, %179
%181 = load i64, i64* %12
%182 = load i64, i64* %10
%183 = sub i64 %181, %182
%184 = icmp ugt i64 %183, 1
br i1 %184, label %185, label %204
185: ; preds = %180
%186 = load i64, i64* %12
%187 = load i64, i64* %10
%188 = add i64 %186, %187
%189 = udiv i64 %188, 2
store i64 %189, i64* %11
%190 = load float*, float** %7
%191 = load i64, i64* %8
%192 = getelementptr inbounds float, float* %190, i64 %191
%193 = load float, float* %192
%194 = load float*, float** %21
%195 = load i64, i64* %11
%196 = getelementptr inbounds float, float* %194, i64 %195
%197 = load float, float* %196
%198 = fcmp oge float %193, %197
br i1 %198, label %199, label %201
199: ; preds = %185
%200 = load i64, i64* %11
store i64 %200, i64* %10
br label %203
201: ; preds = %185
%202 = load i64, i64* %11
store i64 %202, i64* %12
br label %203
203: ; preds = %201, %199
br label %180
204: ; preds = %180
%205 = load i64*, i64** %17
%206 = load i64, i64* %12
%207 = getelementptr inbounds i64, i64* %205, i64 %206
%208 = load i64, i64* %207
%209 = add i64 %208, 1
store i64 %209, i64* %207
br label %210
210: ; preds = %204, %172, %165
br label %211
211: ; preds = %210
%212 = load i64, i64* %8
%213 = add i64 %212, 1
store i64 %213, i64* %8
br label %161
214: ; preds = %161
store i64 1, i64* %9
br label %215
215: ; preds = %222, %214
%216 = load i64, i64* %13
%217 = load i64*, i64** %17
%218 = load i64, i64* %9
%219 = getelementptr inbounds i64, i64* %217, i64 %218
%220 = load i64, i64* %219
%221 = icmp ugt i64 %216, %220
br i1 %221, label %222, label %234
222: ; preds = %215
%223 = load float*, float** %21
%224 = load i64, i64* %9
%225 = getelementptr inbounds float, float* %223, i64 %224
%226 = load float, float* %225
store float %226, float* %19
%227 = load i64*, i64** %17
%228 = load i64, i64* %9
%229 = add i64 %228, 1
store i64 %229, i64* %9
%230 = getelementptr inbounds i64, i64* %227, i64 %228
%231 = load i64, i64* %230
%232 = load i64, i64* %13
%233 = sub i64 %232, %231
store i64 %233, i64* %13
br label %215
234: ; preds = %215
%235 = load float*, float** %21
%236 = load i64, i64* %9
%237 = getelementptr inbounds float, float* %235, i64 %236
%238 = load float, float* %237
store float %238, float* %18
br label %37
239: ; preds = %126, %117
%240 = load float, float* %4
ret float %240
}

LLVM IR (-O2):
@.str = [19 x i8] c"bad input to selip\00"
define float @selip(i64 %0, i64 %1, float* nocapture %2) {
%4 = add i64 %0, -1
%5 = icmp ult i64 %4, %1
br i1 %5, label %8, label %6
6: ; preds = %3
%7 = tail call i32 @nrerror(i8* getelementptr inbounds ([19 x i8], [19 x i8]* @.str, i64 0, i64 0))
br label %8
8: ; preds = %3, %6
%9 = tail call i64* @nr_lvector(i32 1, i32 66)
%10 = tail call float* @nr_vector(i32 1, i32 66)
%11 = icmp eq i64 %1, 0
%12 = getelementptr inbounds float, float* %10, i64 65
%13 = getelementptr inbounds float, float* %10, i64 66
%14 = getelementptr i64, i64* %9, i64 1
%15 = bitcast i64* %14 to i8*
br i1 %11, label %63, label %16
16: ; preds = %8, %120
%17 = phi float [ %123, %120 ], [ 0xC6293E5940000000, %8 ]
%18 = phi float [ %125, %120 ], [ 0x46293E5940000000, %8 ]
%19 = phi i64 [ %122, %120 ], [ %0, %8 ]
br label %20
20: ; preds = %16, %54
%21 = phi float [ %58, %54 ], [ 0.000000e+00, %16 ]
%22 = phi i64 [ %59, %54 ], [ 1, %16 ]
%23 = phi i64 [ %57, %54 ], [ 65, %16 ]
%24 = phi i64 [ %56, %54 ], [ 0, %16 ]
%25 = phi i64 [ %55, %54 ], [ 0, %16 ]
%26 = getelementptr inbounds float, float* %2, i64 %22
%27 = load float, float* %26
%28 = fcmp ult float %27, %17
%29 = fcmp ugt float %27, %18
%30 = select i1 %28, i1 true, i1 %29
br i1 %30, label %54, label %31
31: ; preds = %20
%32 = add i64 %25, 1
%33 = fcmp oeq float %27, %17
%34 = zext i1 %33 to i64
%35 = add i64 %24, %34
%36 = icmp ult i64 %32, 65
br i1 %36, label %46, label %37
37: ; preds = %31
%38 = icmp eq i64 %32, %23
br i1 %38, label %39, label %50
39: ; preds = %37
%40 = lshr i64 %23, 6
%41 = add i64 %40, %23
%42 = add i64 %23, %19
%43 = add i64 %42, %22
%44 = and i64 %43, 63
%45 = add nuw nsw i64 %44, 1
br label %46
46: ; preds = %31, %39
%47 = phi i64 [ %45, %39 ], [ %32, %31 ]
%48 = phi i64 [ %41, %39 ], [ %23, %31 ]
%49 = getelementptr inbounds float, float* %10, i64 %47
store float %27, float* %49
br label %50
50: ; preds = %46, %37
%51 = phi i64 [ %23, %37 ], [ %48, %46 ]
%52 = load float, float* %26
%53 = fadd float %21, %52
br label %54
54: ; preds = %20, %50
%55 = phi i64 [ %32, %50 ], [ %25, %20 ]
%56 = phi i64 [ %35, %50 ], [ %24, %20 ]
%57 = phi i64 [ %51, %50 ], [ %23, %20 ]
%58 = phi float [ %53, %50 ], [ %21, %20 ]
%59 = add nuw i64 %22, 1
%60 = icmp eq i64 %22, %1
br i1 %60, label %61, label %20
61: ; preds = %54
%62 = icmp ugt i64 %19, %56
br i1 %62, label %67, label %126
63: ; preds = %120, %8
%64 = phi i64 [ %0, %8 ], [ %122, %120 ]
%65 = phi float [ 0xC6293E5940000000, %8 ], [ %123, %120 ]
%66 = icmp eq i64 %64, 0
br i1 %66, label %126, label %69
67: ; preds = %61
%68 = icmp ult i64 %55, 65
br i1 %68, label %69, label %74
69: ; preds = %67, %63
%70 = phi i64 [ %64, %63 ], [ %19, %67 ]
%71 = phi i64 [ 0, %63 ], [ %55, %67 ]
tail call void @shell(i64 %71, float* %10)
%72 = getelementptr inbounds float, float* %10, i64 %70
%73 = load float, float* %72
br label %126
74: ; preds = %67
%75 = uitofp i64 %55 to float
%76 = fdiv float %58, %75
store float %76, float* %12
tail call void @shell(i64 65, float* %10)
store float %18, float* %13
br i1 %11, label %79, label %82
77: ; preds = %105
%78 = load i64, i64* %14
br label %79
79: ; preds = %77, %74
%80 = phi i64 [ %78, %77 ], [ 0, %74 ]
%81 = icmp ugt i64 %19, %80
br i1 %81, label %108, label %120
82: ; preds = %74, %105
%83 = phi i64 [ %106, %105 ], [ 1, %74 ]
%84 = getelementptr inbounds float, float* %2, i64 %83
%85 = load float, float* %84
%86 = fcmp ult float %85, %17
%87 = fcmp ugt float %85, %18
%88 = select i1 %86, i1 true, i1 %87
br i1 %88, label %105, label %89
89: ; preds = %82, %89
%90 = phi i64 [ %98, %89 ], [ 66, %82 ]
%91 = phi i64 [ %97, %89 ], [ 0, %82 ]
%92 = add i64 %90, %91
%93 = lshr i64 %92, 1
%94 = getelementptr inbounds float, float* %10, i64 %93
%95 = load float, float* %94
%96 = fcmp ult float %85, %95
%97 = select i1 %96, i64 %91, i64 %93
%98 = select i1 %96, i64 %93, i64 %90
%99 = sub i64 %98, %97
%100 = icmp ugt i64 %99, 1
br i1 %100, label %89, label %101
101: ; preds = %89
%102 = getelementptr inbounds i64, i64* %9, i64 %98
%103 = load i64, i64* %102
%104 = add i64 %103, 1
store i64 %104, i64* %102
br label %105
105: ; preds = %82, %101
%106 = add nuw i64 %83, 1
%107 = icmp eq i64 %83, %1
br i1 %107, label %77, label %82
108: ; preds = %79, %108
%109 = phi i64 [ %115, %108 ], [ %80, %79 ]
%110 = phi i64 [ %113, %108 ], [ %19, %79 ]
%111 = phi i64 [ %112, %108 ], [ 1, %79 ]
%112 = add i64 %111, 1
%113 = sub i64 %110, %109
%114 = getelementptr inbounds i64, i64* %9, i64 %112
%115 = load i64, i64* %114
%116 = icmp ugt i64 %113, %115
br i1 %116, label %108, label %117
117: ; preds = %108
%118 = getelementptr inbounds float, float* %10, i64 %111
%119 = load float, float* %118
br label %120
120: ; preds = %117, %79
%121 = phi i64 [ %112, %117 ], [ 1, %79 ]
%122 = phi i64 [ %113, %117 ], [ %19, %79 ]
%123 = phi float [ %119, %117 ], [ %17, %79 ]
%124 = getelementptr inbounds float, float* %10, i64 %121
%125 = load float, float* %124
br i1 %11, label %63, label %16
126: ; preds = %61, %63, %69
%127 = phi float [ %73, %69 ], [ %65, %63 ], [ %17, %61 ]
%128 = tail call i32 @nr_free_vector(float* %10, i32 1, i32 66)
%129 = tail call i32 @nr_free_lvector(i64* %9, i32 1, i32 66)
ret float %127
}