#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 */
double randum(long *);
void permute(int *perm, int n, long *seed) {
  int i, j, k;
  for (i = 0; i < n; i++) {
    k = (int)((double)(n - i) * randum(seed));
    j = perm[i];
    perm[i] = perm[i + k];
    perm[i + k] = j;
  }
}


x86 assembly (clang, -O0):
<permute>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    11ab <permute+0x9b>
mov    -0xc(%rbp),%eax
sub    -0x1c(%rbp),%eax
cvtsi2sd %eax,%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x18(%rbp),%rdi
call   1030 <randum@plt>
movaps %xmm0,%xmm1
movsd  -0x30(%rbp),%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %eax,-0x24(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x20(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x24(%rbp),%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%edx
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x20(%rbp),%edx
mov    -0x8(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x24(%rbp),%ecx
movslq %ecx,%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    112a <permute+0x1a>
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<permute>:
push   %r15
push   %r14
push   %r12
push   %rbx
push   %rax
test   %esi,%esi
jle    116d <permute+0x5d>
mov    %rdx,%r14
mov    %rdi,%r15
mov    %esi,%r12d
xor    %ebx,%ebx
nopw   0x0(%rax,%rax,1)
xorps  %xmm0,%xmm0
cvtsi2sd %r12d,%xmm0
movsd  %xmm0,(%rsp)
mov    %r14,%rdi
call   1030 <randum@plt>
mulsd  (%rsp),%xmm0
cvttsd2si %xmm0,%eax
mov    (%r15,%rbx,4),%ecx
cltq
add    %rbx,%rax
mov    (%r15,%rax,4),%edx
mov    %edx,(%r15,%rbx,4)
mov    %ecx,(%r15,%rax,4)
add    $0x1,%rbx
add    $0xffffffffffffffff,%r12
jne    1130 <permute+0x20>
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

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

LLVM IR (-O2):
define void @permute(i32* nocapture %0, i32 %1, i64* %2) {
%4 = icmp sgt i32 %1, 0
br i1 %4, label %5, label %23
5: ; preds = %3
%6 = zext i32 %1 to i64
br label %7
7: ; preds = %5, %7
%8 = phi i64 [ 0, %5 ], [ %21, %7 ]
%9 = trunc i64 %8 to i32
%10 = sub nsw i32 %1, %9
%11 = sitofp i32 %10 to double
%12 = tail call double @randum(i64* %2)
%13 = fmul double %12, %11
%14 = fptosi double %13 to i32
%15 = getelementptr inbounds i32, i32* %0, i64 %8
%16 = load i32, i32* %15
%17 = add nsw i32 %9, %14
%18 = sext i32 %17 to i64
%19 = getelementptr inbounds i32, i32* %0, i64 %18
%20 = load i32, i32* %19
store i32 %20, i32* %15
store i32 %16, i32* %19
%21 = add nuw nsw i64 %8, 1
%22 = icmp eq i64 %21, %6
br i1 %22, label %23, label %7
23: ; preds = %7, %3
ret void
}