#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*/ free_vector(float *, int, int);
float ran1(long *);
int /*<<< orphan*/ shell_sort(int, float *, int *);
float *vector(int, int);
void randperms(int n, int *index, long idum) {
  int i;
  float f;
  float *r;
  r = vector(1, n);
  for (i = 1; i <= n; i++)
    index[i] = i;
  for (i = 1; i <= n; i++) {
    f = ran1(&idum);
    r[i] = f;
  }
  shell_sort(n, r, index);
  free_vector(r, 1, n);
}


x86 assembly (clang, -O0):
<randperms>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    -0x4(%rbp),%esi
mov    $0x1,%edi
call   1040 <vector@plt>
mov    %rax,-0x28(%rbp)
movl   $0x1,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x4(%rbp),%eax
jg     1193 <randperms+0x53>
mov    -0x1c(%rbp),%edx
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    116b <randperms+0x2b>
movl   $0x1,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x4(%rbp),%eax
jg     11d4 <randperms+0x94>
lea    -0x18(%rbp),%rdi
call   1050 <ran1@plt>
movss  %xmm0,-0x20(%rbp)
movss  -0x20(%rbp),%xmm0
mov    -0x28(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    119a <randperms+0x5a>
mov    -0x4(%rbp),%edi
mov    -0x28(%rbp),%rsi
mov    -0x10(%rbp),%rdx
call   1060 <shell_sort@plt>
mov    -0x28(%rbp),%rdi
mov    -0x4(%rbp),%edx
mov    $0x1,%esi
call   1030 <free_vector@plt>
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<randperms>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rsi,%rbx
mov    %edi,%r14d
mov    %rdx,(%rsp)
mov    $0x1,%edi
mov    %r14d,%esi
call   1040 <vector@plt>
mov    %rax,%r15
test   %r14d,%r14d
jle    1307 <randperms+0x1c7>
mov    %r14d,%eax
mov    $0x1,%ecx
cmp    $0x8,%r14d
jb     12c6 <randperms+0x186>
mov    %eax,%ecx
and    $0xfffffff8,%ecx
lea    -0x8(%rcx),%rsi
mov    %rsi,%rdi
shr    $0x3,%rdi
add    $0x1,%rdi
mov    %edi,%edx
and    $0x3,%edx
cmp    $0x18,%rsi
jae    11ae <randperms+0x6e>
movdqa 0xe59(%rip),%xmm0
xor    %esi,%esi
jmp    1279 <randperms+0x139>
and    $0xfffffffffffffffc,%rdi
movdqa 0xe46(%rip),%xmm0
xor    %esi,%esi
movdqa 0xe4b(%rip),%xmm8
movdqa 0xe52(%rip),%xmm9
movdqa 0xe59(%rip),%xmm10
movdqa 0xe61(%rip),%xmm4
movdqa 0xe69(%rip),%xmm5
movdqa 0xe71(%rip),%xmm6
movdqa 0xe79(%rip),%xmm7
movdqa 0xe81(%rip),%xmm1
nop
movdqa %xmm0,%xmm2
paddd  %xmm8,%xmm2
movdqu %xmm0,0x4(%rbx,%rsi,4)
movdqu %xmm2,0x14(%rbx,%rsi,4)
movdqa %xmm0,%xmm2
paddd  %xmm9,%xmm2
movdqa %xmm0,%xmm3
paddd  %xmm10,%xmm3
movdqu %xmm2,0x24(%rbx,%rsi,4)
movdqu %xmm3,0x34(%rbx,%rsi,4)
movdqa %xmm0,%xmm2
paddd  %xmm4,%xmm2
movdqa %xmm0,%xmm3
paddd  %xmm5,%xmm3
movdqu %xmm2,0x44(%rbx,%rsi,4)
movdqu %xmm3,0x54(%rbx,%rsi,4)
movdqa %xmm0,%xmm2
paddd  %xmm6,%xmm2
movdqa %xmm0,%xmm3
paddd  %xmm7,%xmm3
movdqu %xmm2,0x64(%rbx,%rsi,4)
movdqu %xmm3,0x74(%rbx,%rsi,4)
add    $0x20,%rsi
paddd  %xmm1,%xmm0
add    $0xfffffffffffffffc,%rdi
jne    1200 <randperms+0xc0>
test   %rdx,%rdx
je     12bd <randperms+0x17d>
movdqa 0xd8a(%rip),%xmm1
movdqa 0xd92(%rip),%xmm2
xchg   %ax,%ax
lea    0x0(,%rsi,4),%rdi
movdqa %xmm0,%xmm3
paddd  %xmm1,%xmm3
or     $0x4,%rdi
movdqu %xmm0,(%rbx,%rdi,1)
movdqu %xmm3,0x10(%rbx,%rdi,1)
add    $0x8,%rsi
paddd  %xmm2,%xmm0
add    $0xffffffffffffffff,%rdx
jne    1290 <randperms+0x150>
cmp    %rcx,%rax
je     12dc <randperms+0x19c>
or     $0x1,%rcx
add    $0x1,%rax
nopw   0x0(%rax,%rax,1)
mov    %ecx,(%rbx,%rcx,4)
add    $0x1,%rcx
cmp    %rcx,%rax
jne    12d0 <randperms+0x190>
test   %r14d,%r14d
jle    1307 <randperms+0x1c7>
lea    0x1(%r14),%r13d
mov    $0x1,%ebp
mov    %rsp,%r12
nopl   (%rax)
mov    %r12,%rdi
call   1050 <ran1@plt>
movd   %xmm0,(%r15,%rbp,4)
add    $0x1,%rbp
cmp    %rbp,%r13
jne    12f0 <randperms+0x1b0>
mov    %r14d,%edi
mov    %r15,%rsi
mov    %rbx,%rdx
call   1060 <shell_sort@plt>
mov    %r15,%rdi
mov    $0x1,%esi
mov    %r14d,%edx
call   1030 <free_vector@plt>
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @randperms(i32 %0, i32* %1, i64 %2) {
%4 = alloca i32
%5 = alloca i32*
%6 = alloca i64
%7 = alloca i32
%8 = alloca float
%9 = alloca float*
store i32 %0, i32* %4
store i32* %1, i32** %5
store i64 %2, i64* %6
%10 = load i32, i32* %4
%11 = call float* @vector(i32 1, i32 %10)
store float* %11, float** %9
store i32 1, i32* %7
br label %12
12: ; preds = %22, %3
%13 = load i32, i32* %7
%14 = load i32, i32* %4
%15 = icmp sle i32 %13, %14
br i1 %15, label %16, label %25
16: ; preds = %12
%17 = load i32, i32* %7
%18 = load i32*, i32** %5
%19 = load i32, i32* %7
%20 = sext i32 %19 to i64
%21 = getelementptr inbounds i32, i32* %18, i64 %20
store i32 %17, i32* %21
br label %22
22: ; preds = %16
%23 = load i32, i32* %7
%24 = add nsw i32 %23, 1
store i32 %24, i32* %7
br label %12
25: ; preds = %12
store i32 1, i32* %7
br label %26
26: ; preds = %37, %25
%27 = load i32, i32* %7
%28 = load i32, i32* %4
%29 = icmp sle i32 %27, %28
br i1 %29, label %30, label %40
30: ; preds = %26
%31 = call float @ran1(i64* %6)
store float %31, float* %8
%32 = load float, float* %8
%33 = load float*, float** %9
%34 = load i32, i32* %7
%35 = sext i32 %34 to i64
%36 = getelementptr inbounds float, float* %33, i64 %35
store float %32, float* %36
br label %37
37: ; preds = %30
%38 = load i32, i32* %7
%39 = add nsw i32 %38, 1
store i32 %39, i32* %7
br label %26
40: ; preds = %26
%41 = load i32, i32* %4
%42 = load float*, float** %9
%43 = load i32*, i32** %5
%44 = call i32 @shell_sort(i32 %41, float* %42, i32* %43)
%45 = load float*, float** %9
%46 = load i32, i32* %4
%47 = call i32 @free_vector(float* %45, i32 1, i32 %46)
ret void
}

LLVM IR (-O2):
define void @randperms(i32 %0, i32* %1, i64 %2) {
%4 = alloca i64
store i64 %2, i64* %4
%5 = tail call float* @vector(i32 1, i32 %0)
%6 = icmp slt i32 %0, 1
br i1 %6, label %95, label %7
7: ; preds = %3
%8 = add nuw i32 %0, 1
%9 = zext i32 %8 to i64
%10 = add nsw i64 %9, -1
%11 = icmp ult i64 %10, 8
br i1 %11, label %77, label %12
12: ; preds = %7
%13 = and i64 %10, -8
%14 = or i64 %13, 1
%15 = add nsw i64 %13, -8
%16 = lshr exact i64 %15, 3
%17 = add nuw nsw i64 %16, 1
%18 = and i64 %17, 3
%19 = icmp ult i64 %15, 24
br i1 %19, label %57, label %20
20: ; preds = %12
%21 = and i64 %17, 4611686018427387900
br label %22
22: ; preds = %22, %20
%23 = phi i64 [ 0, %20 ], [ %53, %22 ]
%24 = phi <4 x i32> [ <i32 1, i32 2, i32 3, i32 4>, %20 ], [ %54, %22 ]
%25 = phi i64 [ 0, %20 ], [ %55, %22 ]
%26 = or i64 %23, 1
%27 = add <4 x i32> %24, <i32 4, i32 4, i32 4, i32 4>
%28 = getelementptr inbounds i32, i32* %1, i64 %26
%29 = bitcast i32* %28 to <4 x i32>*
store <4 x i32> %24, <4 x i32>* %29
%30 = getelementptr inbounds i32, i32* %28, i64 4
%31 = bitcast i32* %30 to <4 x i32>*
store <4 x i32> %27, <4 x i32>* %31
%32 = add <4 x i32> %24, <i32 8, i32 8, i32 8, i32 8>
%33 = or i64 %23, 9
%34 = add <4 x i32> %24, <i32 12, i32 12, i32 12, i32 12>
%35 = getelementptr inbounds i32, i32* %1, i64 %33
%36 = bitcast i32* %35 to <4 x i32>*
store <4 x i32> %32, <4 x i32>* %36
%37 = getelementptr inbounds i32, i32* %35, i64 4
%38 = bitcast i32* %37 to <4 x i32>*
store <4 x i32> %34, <4 x i32>* %38
%39 = add <4 x i32> %24, <i32 16, i32 16, i32 16, i32 16>
%40 = or i64 %23, 17
%41 = add <4 x i32> %24, <i32 20, i32 20, i32 20, i32 20>
%42 = getelementptr inbounds i32, i32* %1, i64 %40
%43 = bitcast i32* %42 to <4 x i32>*
store <4 x i32> %39, <4 x i32>* %43
%44 = getelementptr inbounds i32, i32* %42, i64 4
%45 = bitcast i32* %44 to <4 x i32>*
store <4 x i32> %41, <4 x i32>* %45
%46 = add <4 x i32> %24, <i32 24, i32 24, i32 24, i32 24>
%47 = or i64 %23, 25
%48 = add <4 x i32> %24, <i32 28, i32 28, i32 28, i32 28>
%49 = getelementptr inbounds i32, i32* %1, i64 %47
%50 = bitcast i32* %49 to <4 x i32>*
store <4 x i32> %46, <4 x i32>* %50
%51 = getelementptr inbounds i32, i32* %49, i64 4
%52 = bitcast i32* %51 to <4 x i32>*
store <4 x i32> %48, <4 x i32>* %52
%53 = add nuw i64 %23, 32
%54 = add <4 x i32> %24, <i32 32, i32 32, i32 32, i32 32>
%55 = add i64 %25, 4
%56 = icmp eq i64 %55, %21
br i1 %56, label %57, label %22
57: ; preds = %22, %12
%58 = phi i64 [ 0, %12 ], [ %53, %22 ]
%59 = phi <4 x i32> [ <i32 1, i32 2, i32 3, i32 4>, %12 ], [ %54, %22 ]
%60 = icmp eq i64 %18, 0
br i1 %60, label %75, label %61
61: ; preds = %57, %61
%62 = phi i64 [ %71, %61 ], [ %58, %57 ]
%63 = phi <4 x i32> [ %72, %61 ], [ %59, %57 ]
%64 = phi i64 [ %73, %61 ], [ 0, %57 ]
%65 = or i64 %62, 1
%66 = add <4 x i32> %63, <i32 4, i32 4, i32 4, i32 4>
%67 = getelementptr inbounds i32, i32* %1, i64 %65
%68 = bitcast i32* %67 to <4 x i32>*
store <4 x i32> %63, <4 x i32>* %68
%69 = getelementptr inbounds i32, i32* %67, i64 4
%70 = bitcast i32* %69 to <4 x i32>*
store <4 x i32> %66, <4 x i32>* %70
%71 = add nuw i64 %62, 8
%72 = add <4 x i32> %63, <i32 8, i32 8, i32 8, i32 8>
%73 = add i64 %64, 1
%74 = icmp eq i64 %73, %18
br i1 %74, label %75, label %61
75: ; preds = %61, %57
%76 = icmp eq i64 %10, %13
br i1 %76, label %79, label %77
77: ; preds = %7, %75
%78 = phi i64 [ 1, %7 ], [ %14, %75 ]
br label %83
79: ; preds = %83, %75
br i1 %6, label %95, label %80
80: ; preds = %79
%81 = add nuw i32 %0, 1
%82 = zext i32 %81 to i64
br label %89
83: ; preds = %77, %83
%84 = phi i64 [ %87, %83 ], [ %78, %77 ]
%85 = getelementptr inbounds i32, i32* %1, i64 %84
%86 = trunc i64 %84 to i32
store i32 %86, i32* %85
%87 = add nuw nsw i64 %84, 1
%88 = icmp eq i64 %87, %9
br i1 %88, label %79, label %83
89: ; preds = %80, %89
%90 = phi i64 [ 1, %80 ], [ %93, %89 ]
%91 = call float @ran1(i64* %4)
%92 = getelementptr inbounds float, float* %5, i64 %90
store float %91, float* %92
%93 = add nuw nsw i64 %90, 1
%94 = icmp eq i64 %93, %82
br i1 %94, label %95, label %89
95: ; preds = %89, %3, %79
%96 = call i32 @shell_sort(i32 %0, float* %5, i32* %1)
%97 = call i32 @free_vector(float* %5, i32 1, i32 %0)
ret void
}