#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 */
scalar_t__ fabs(double);
void sortev(double **a, double *e, double **v, int n) {
  int i, j, k;
  double w;
  for (i = 0; i < n - 1; ++i) {
    k = i;
    for (j = i + 1; j < n; ++j)
      if (fabs(e[j]) > fabs(e[k]))
        k = j;
    if (k != i) {
      {
        w = e[i];
        e[i] = e[k];
        e[k] = w;
      };
      for (j = 0; j < n; ++j) {
        w = (*((double *)v + j * n + i));
        (*((double *)v + j * n + i)) = (*((double *)v + j * n + k));
        (*((double *)v + j * n + k)) = w;
      };
    }
  }
}


x86 assembly (clang, -O0):
<sortev>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
mov    -0x1c(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    12b0 <sortev+0x1a0>
mov    -0x20(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    11ab <sortev+0x9b>
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
call   1030 <fabs@plt>
mov    %rax,-0x38(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
call   1030 <fabs@plt>
mov    %rax,%rcx
mov    -0x38(%rbp),%rax
cmp    %rcx,%rax
jle    1198 <sortev+0x88>
mov    -0x24(%rbp),%eax
mov    %eax,-0x28(%rbp)
jmp    119d <sortev+0x8d>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    114e <sortev+0x3e>
mov    -0x28(%rbp),%eax
cmp    -0x20(%rbp),%eax
je     129d <sortev+0x18d>
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x30(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1298 <sortev+0x188>
mov    -0x18(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x30(%rbp),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
movslq -0x28(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    11fc <sortev+0xec>
jmp    129d <sortev+0x18d>
jmp    12a2 <sortev+0x192>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    112e <sortev+0x1e>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<sortev>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x78,%rsp
mov    %rdx,0x8(%rsp)
cmp    $0x2,%ecx
jl     1384 <sortev+0x274>
mov    %rsi,%r12
mov    %rcx,%rax
mov    %eax,%ecx
add    $0xffffffff,%eax
mov    %rax,0x48(%rsp)
lea    -0x1(%rcx),%rax
mov    %rax,0x28(%rsp)
mov    %ecx,%eax
and    $0x3,%eax
mov    %rax,0x10(%rsp)
mov    %ecx,%eax
and    $0xfffffffc,%eax
mov    %rax,0x40(%rsp)
mov    %rcx,%r13
shl    $0x4,%r13
mov    %rcx,%rax
shl    $0x5,%rax
mov    %rax,0x38(%rsp)
mov    %rcx,(%rsp)
lea    0x0(,%rcx,8),%rax
mov    %rax,0x30(%rsp)
lea    (%rax,%rax,2),%rcx
mov    $0x1,%ebp
xor    %r14d,%r14d
mov    %rcx,0x18(%rsp)
mov    %rcx,%r11
mov    %rax,%r15
mov    %r13,0x20(%rsp)
xor    %eax,%eax
jmp    11c9 <sortev+0xb9>
nopl   (%rax)
mov    0x70(%rsp),%rbp
add    $0x1,%rbp
add    $0x8,%r13
add    $0x8,%r15
add    $0x8,%r11
add    $0x8,%r14
mov    0x58(%rsp),%rax
cmp    0x48(%rsp),%rax
je     1384 <sortev+0x274>
mov    %rax,%rcx
add    $0x1,%rax
cmp    (%rsp),%rax
mov    %rbp,0x70(%rsp)
mov    %r11,0x68(%rsp)
mov    %r15,0x60(%rsp)
mov    %rax,0x58(%rsp)
mov    %rcx,0x50(%rsp)
jae    1240 <sortev+0x130>
mov    %ecx,%r15d
jmp    120d <sortev+0xfd>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    $0x1,%rbp
mov    %ecx,%r15d
cmp    %rbp,(%rsp)
je     1240 <sortev+0x130>
movsd  (%r12,%rbp,8),%xmm0
call   1030 <fabs@plt>
mov    %rax,%rbx
movslq %r15d,%rax
movsd  (%r12,%rax,8),%xmm0
call   1030 <fabs@plt>
mov    %ebp,%ecx
cmp    %rax,%rbx
jg     1200 <sortev+0xf0>
mov    %r15d,%ecx
jmp    1200 <sortev+0xf0>
cs nopw 0x0(%rax,%rax,1)
nop
mov    %ecx,%eax
mov    0x50(%rsp),%rdx
cmp    %rax,%rdx
mov    0x40(%rsp),%r8
mov    0x38(%rsp),%r9
mov    0x30(%rsp),%r10
mov    0x68(%rsp),%r11
mov    0x60(%rsp),%r15
je     11a0 <sortev+0x90>
movsd  (%r12,%rdx,8),%xmm0
movslq %ecx,%rax
movsd  (%r12,%rax,8),%xmm1
movsd  %xmm1,(%r12,%rdx,8)
movsd  %xmm0,(%r12,%rax,8)
cmpq   $0x3,0x28(%rsp)
jae    12a0 <sortev+0x190>
xor    %ecx,%ecx
jmp    1334 <sortev+0x224>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
lea    0x0(,%rax,8),%rdx
mov    0x20(%rsp),%rcx
lea    (%rcx,%rax,8),%rsi
lea    (%r10,%rax,8),%rdi
mov    0x18(%rsp),%rcx
lea    (%rcx,%rax,8),%rbp
mov    0x8(%rsp),%rbx
xor    %ecx,%ecx
cs nopw 0x0(%rax,%rax,1)
nop
movsd  (%rbx,%r14,1),%xmm0
movsd  (%rbx,%rdx,1),%xmm1
movsd  %xmm1,(%rbx,%r14,1)
movsd  %xmm0,(%rbx,%rdx,1)
movsd  (%rbx,%r15,1),%xmm0
movsd  (%rbx,%rdi,1),%xmm1
movsd  %xmm1,(%rbx,%r15,1)
movsd  %xmm0,(%rbx,%rdi,1)
movsd  (%rbx,%r13,1),%xmm0
movsd  (%rbx,%rsi,1),%xmm1
movsd  %xmm1,(%rbx,%r13,1)
movsd  %xmm0,(%rbx,%rsi,1)
movsd  (%rbx,%r11,1),%xmm0
movsd  (%rbx,%rbp,1),%xmm1
movsd  %xmm1,(%rbx,%r11,1)
movsd  %xmm0,(%rbx,%rbp,1)
add    $0x4,%rcx
add    %r9,%rbx
cmp    %rcx,%r8
jne    12d0 <sortev+0x1c0>
cmpq   $0x0,0x10(%rsp)
je     11a0 <sortev+0x90>
imul   (%rsp),%rcx
mov    0x8(%rsp),%rdx
lea    (%rdx,%rcx,8),%rcx
mov    0x10(%rsp),%rdx
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movsd  (%rcx,%r14,1),%xmm0
movsd  (%rcx,%rax,8),%xmm1
movsd  %xmm1,(%rcx,%r14,1)
movsd  %xmm0,(%rcx,%rax,8)
add    %r10,%rcx
add    $0xffffffffffffffff,%rdx
jne    1360 <sortev+0x250>
jmp    11a0 <sortev+0x90>
add    $0x78,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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