#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*/ printf(char *, int, ...);
void eliminate_lowest_values(double **w, int k, int n) {
  int i, j;
  double mlog = 0;
  double slog = 0;
  int nc = 0;
  for (i = 1; i <= k; i++) {
    slog = 0;
    nc = 0;
    for (j = 1; j <= n; j++) {
      if (w[i][j] > 0) {
        slog += w[i][j] * w[i][j];
        nc++;
      }
    }
    if (nc == 0)
      continue;
    mlog = slog / n;
    printf("MEDIAN log %f of %d values\n", mlog, n);
    nc = 0;
    for (j = 1; j <= n; j++) {
      if (w[i][j] < mlog && w[i][j] > 0) {
        w[i][j] = 0;
        nc++;
      }
    }
    printf("%d values deleted\n", nc);
  }
}


x86 assembly (clang, -O0):
<eliminate_lowest_values>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x20(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x28(%rbp)
movl   $0x0,-0x2c(%rbp)
movl   $0x1,-0x14(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     12d3 <eliminate_lowest_values+0x1c3>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x28(%rbp)
movl   $0x0,-0x2c(%rbp)
movl   $0x1,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x10(%rbp),%eax
jg     11e8 <eliminate_lowest_values+0xd8>
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jbe    11d5 <eliminate_lowest_values+0xc5>
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x28(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    11da <eliminate_lowest_values+0xca>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1162 <eliminate_lowest_values+0x52>
cmpl   $0x0,-0x2c(%rbp)
jne    11f7 <eliminate_lowest_values+0xe7>
jmp    12c5 <eliminate_lowest_values+0x1b5>
movsd  -0x28(%rbp),%xmm0
cvtsi2sdl -0x10(%rbp),%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x20(%rbp)
cvttsd2si -0x20(%rbp),%esi
mov    -0x10(%rbp),%edx
lea    0xde7(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
movl   $0x0,-0x2c(%rbp)
movl   $0x1,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x10(%rbp),%eax
jg     12b4 <eliminate_lowest_values+0x1a4>
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movsd  -0x20(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    12a1 <eliminate_lowest_values+0x191>
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jbe    12a1 <eliminate_lowest_values+0x191>
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    12a6 <eliminate_lowest_values+0x196>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    122e <eliminate_lowest_values+0x11e>
mov    -0x2c(%rbp),%esi
lea    0xd5e(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1140 <eliminate_lowest_values+0x30>
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<eliminate_lowest_values>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
mov    %rdi,0x18(%rsp)
test   %esi,%esi
jle    1332 <eliminate_lowest_values+0x222>
mov    %edx,%r12d
mov    %esi,%r14d
cvtsi2sd %edx,%xmm0
movsd  %xmm0,0x20(%rsp)
lea    0x1(%r12),%eax
add    $0x1,%r14d
lea    -0x1(%rax),%r13
add    $0xfffffffffffffffe,%rax
mov    %rax,0x10(%rsp)
mov    %r13,%rax
mov    %r13,0x8(%rsp)
and    $0xfffffffffffffffe,%r13
neg    %r13
mov    $0x1,%r15d
xorpd  %xmm1,%xmm1
jmp    1191 <eliminate_lowest_values+0x81>
nopl   0x0(%rax)
lea    0xea5(%rip),%rdi
mov    %ebp,%esi
xor    %eax,%eax
call   1030 <printf@plt>
xorpd  %xmm1,%xmm1
add    $0x1,%r15
cmp    %r14,%r15
je     1332 <eliminate_lowest_values+0x222>
test   %r12d,%r12d
jle    1184 <eliminate_lowest_values+0x74>
mov    0x18(%rsp),%rax
mov    (%rax,%r15,8),%rcx
cmpq   $0x0,0x10(%rsp)
je     1210 <eliminate_lowest_values+0x100>
xorpd  %xmm2,%xmm2
xor    %eax,%eax
mov    $0x1,%edx
jmp    11d7 <eliminate_lowest_values+0xc7>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
mov    %bl,%sil
add    %esi,%eax
lea    (%rdx,%r13,1),%rsi
add    $0x2,%rsi
add    $0x2,%rdx
cmp    $0x1,%rsi
je     121b <eliminate_lowest_values+0x10b>
movsd  (%rcx,%rdx,8),%xmm0
xor    %esi,%esi
ucomisd %xmm1,%xmm0
seta   %bl
jbe    11ef <eliminate_lowest_values+0xdf>
mulsd  %xmm0,%xmm0
addsd  %xmm0,%xmm2
movsd  0x8(%rcx,%rdx,8),%xmm0
mov    %bl,%sil
add    %esi,%eax
xor    %esi,%esi
ucomisd %xmm1,%xmm0
seta   %bl
jbe    11c0 <eliminate_lowest_values+0xb0>
mulsd  %xmm0,%xmm0
addsd  %xmm0,%xmm2
jmp    11c0 <eliminate_lowest_values+0xb0>
nop
xor    %eax,%eax
xorpd  %xmm2,%xmm2
mov    $0x1,%edx
testb  $0x1,0x8(%rsp)
je     123e <eliminate_lowest_values+0x12e>
movsd  (%rcx,%rdx,8),%xmm0
xor    %ecx,%ecx
ucomisd %xmm1,%xmm0
seta   %dl
jbe    123a <eliminate_lowest_values+0x12a>
mulsd  %xmm0,%xmm0
addsd  %xmm0,%xmm2
mov    %dl,%cl
add    %ecx,%eax
test   %eax,%eax
je     1184 <eliminate_lowest_values+0x74>
divsd  0x20(%rsp),%xmm2
movsd  %xmm2,(%rsp)
cvttsd2si %xmm2,%esi
xor    %ebp,%ebp
lea    0xda2(%rip),%rdi
mov    %r12d,%edx
xor    %eax,%eax
call   1030 <printf@plt>
test   %r12d,%r12d
jle    1170 <eliminate_lowest_values+0x60>
mov    0x18(%rsp),%rax
mov    (%rax,%r15,8),%rax
cmpq   $0x0,0x10(%rsp)
je     12ee <eliminate_lowest_values+0x1de>
xor    %ebp,%ebp
mov    $0x1,%ecx
xorpd  %xmm1,%xmm1
movsd  (%rsp),%xmm2
jmp    12b2 <eliminate_lowest_values+0x1a2>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
lea    (%rcx,%r13,1),%rdx
add    $0x2,%rdx
add    $0x2,%rcx
cmp    $0x1,%rdx
je     12f5 <eliminate_lowest_values+0x1e5>
movsd  (%rax,%rcx,8),%xmm0
ucomisd %xmm0,%xmm2
jbe    12ce <eliminate_lowest_values+0x1be>
ucomisd %xmm1,%xmm0
jbe    12ce <eliminate_lowest_values+0x1be>
movq   $0x0,(%rax,%rcx,8)
add    $0x1,%ebp
movsd  0x8(%rax,%rcx,8),%xmm0
ucomisd %xmm0,%xmm2
jbe    12a0 <eliminate_lowest_values+0x190>
ucomisd %xmm1,%xmm0
jbe    12a0 <eliminate_lowest_values+0x190>
movq   $0x0,0x8(%rax,%rcx,8)
add    $0x1,%ebp
jmp    12a0 <eliminate_lowest_values+0x190>
xor    %ebp,%ebp
mov    $0x1,%ecx
testb  $0x1,0x8(%rsp)
je     1170 <eliminate_lowest_values+0x60>
movsd  (%rax,%rcx,8),%xmm0
movsd  (%rsp),%xmm1
ucomisd %xmm0,%xmm1
jbe    1170 <eliminate_lowest_values+0x60>
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jbe    1170 <eliminate_lowest_values+0x60>
movq   $0x0,(%rax,%rcx,8)
add    $0x1,%ebp
jmp    1170 <eliminate_lowest_values+0x60>
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [28 x i8] c"MEDIAN log %f of %d values\0A\00"
@.str.1 = [19 x i8] c"%d values deleted\0A\00"
define void @eliminate_lowest_values(double** %0, i32 %1, i32 %2) {
%4 = alloca double**
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca double
%10 = alloca double
%11 = alloca i32
store double** %0, double*** %4
store i32 %1, i32* %5
store i32 %2, i32* %6
store double 0.000000e+00, double* %9
store double 0.000000e+00, double* %10
store i32 0, i32* %11
store i32 1, i32* %7
br label %12
12: ; preds = %117, %3
%13 = load i32, i32* %7
%14 = load i32, i32* %5
%15 = icmp sle i32 %13, %14
br i1 %15, label %16, label %120
16: ; preds = %12
store double 0.000000e+00, double* %10
store i32 0, i32* %11
store i32 1, i32* %8
br label %17
17: ; preds = %56, %16
%18 = load i32, i32* %8
%19 = load i32, i32* %6
%20 = icmp sle i32 %18, %19
br i1 %20, label %21, label %59
21: ; preds = %17
%22 = load double**, double*** %4
%23 = load i32, i32* %7
%24 = sext i32 %23 to i64
%25 = getelementptr inbounds double*, double** %22, i64 %24
%26 = load double*, double** %25
%27 = load i32, i32* %8
%28 = sext i32 %27 to i64
%29 = getelementptr inbounds double, double* %26, i64 %28
%30 = load double, double* %29
%31 = fcmp ogt double %30, 0.000000e+00
br i1 %31, label %32, label %55
32: ; preds = %21
%33 = load double**, double*** %4
%34 = load i32, i32* %7
%35 = sext i32 %34 to i64
%36 = getelementptr inbounds double*, double** %33, i64 %35
%37 = load double*, double** %36
%38 = load i32, i32* %8
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds double, double* %37, i64 %39
%41 = load double, double* %40
%42 = load double**, double*** %4
%43 = load i32, i32* %7
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds double*, double** %42, i64 %44
%46 = load double*, double** %45
%47 = load i32, i32* %8
%48 = sext i32 %47 to i64
%49 = getelementptr inbounds double, double* %46, i64 %48
%50 = load double, double* %49
%51 = load double, double* %10
%52 = call double @llvm.fmuladd.f64(double %41, double %50, double %51)
store double %52, double* %10
%53 = load i32, i32* %11
%54 = add nsw i32 %53, 1
store i32 %54, i32* %11
br label %55
55: ; preds = %32, %21
br label %56
56: ; preds = %55
%57 = load i32, i32* %8
%58 = add nsw i32 %57, 1
store i32 %58, i32* %8
br label %17
59: ; preds = %17
%60 = load i32, i32* %11
%61 = icmp eq i32 %60, 0
br i1 %61, label %62, label %63
62: ; preds = %59
br label %117
63: ; preds = %59
%64 = load double, double* %10
%65 = load i32, i32* %6
%66 = sitofp i32 %65 to double
%67 = fdiv double %64, %66
store double %67, double* %9
%68 = load double, double* %9
%69 = fptosi double %68 to i32
%70 = load i32, i32* %6
%71 = call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([28 x i8], [28 x i8]* @.str, i64 0, i64 0), i32 %69, i32 %70)
store i32 0, i32* %11
store i32 1, i32* %8
br label %72
72: ; preds = %111, %63
%73 = load i32, i32* %8
%74 = load i32, i32* %6
%75 = icmp sle i32 %73, %74
br i1 %75, label %76, label %114
76: ; preds = %72
%77 = load double**, double*** %4
%78 = load i32, i32* %7
%79 = sext i32 %78 to i64
%80 = getelementptr inbounds double*, double** %77, i64 %79
%81 = load double*, double** %80
%82 = load i32, i32* %8
%83 = sext i32 %82 to i64
%84 = getelementptr inbounds double, double* %81, i64 %83
%85 = load double, double* %84
%86 = load double, double* %9
%87 = fcmp olt double %85, %86
br i1 %87, label %88, label %110
88: ; preds = %76
%89 = load double**, double*** %4
%90 = load i32, i32* %7
%91 = sext i32 %90 to i64
%92 = getelementptr inbounds double*, double** %89, i64 %91
%93 = load double*, double** %92
%94 = load i32, i32* %8
%95 = sext i32 %94 to i64
%96 = getelementptr inbounds double, double* %93, i64 %95
%97 = load double, double* %96
%98 = fcmp ogt double %97, 0.000000e+00
br i1 %98, label %99, label %110
99: ; preds = %88
%100 = load double**, double*** %4
%101 = load i32, i32* %7
%102 = sext i32 %101 to i64
%103 = getelementptr inbounds double*, double** %100, i64 %102
%104 = load double*, double** %103
%105 = load i32, i32* %8
%106 = sext i32 %105 to i64
%107 = getelementptr inbounds double, double* %104, i64 %106
store double 0.000000e+00, double* %107
%108 = load i32, i32* %11
%109 = add nsw i32 %108, 1
store i32 %109, i32* %11
br label %110
110: ; preds = %99, %88, %76
br label %111
111: ; preds = %110
%112 = load i32, i32* %8
%113 = add nsw i32 %112, 1
store i32 %113, i32* %8
br label %72
114: ; preds = %72
%115 = load i32, i32* %11
%116 = call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([19 x i8], [19 x i8]* @.str.1, i64 0, i64 0), i32 %115)
br label %117
117: ; preds = %114, %62
%118 = load i32, i32* %7
%119 = add nsw i32 %118, 1
store i32 %119, i32* %7
br label %12
120: ; preds = %12
ret void
}

LLVM IR (-O2):
@.str = [28 x i8] c"MEDIAN log %f of %d values\0A\00"
@.str.1 = [19 x i8] c"%d values deleted\0A\00"
define void @eliminate_lowest_values(double** nocapture %0, i32 %1, i32 %2) {
%4 = icmp slt i32 %1, 1
br i1 %4, label %119, label %5
5: ; preds = %3
%6 = icmp slt i32 %2, 1
%7 = sitofp i32 %2 to double
%8 = add i32 %2, 1
%9 = add nuw i32 %1, 1
%10 = zext i32 %9 to i64
%11 = zext i32 %8 to i64
%12 = add nsw i64 %11, -1
%13 = add nsw i64 %11, -2
%14 = and i64 %12, 1
%15 = icmp eq i64 %13, 0
%16 = and i64 %12, -2
%17 = icmp eq i64 %14, 0
%18 = and i64 %12, 1
%19 = icmp eq i64 %13, 0
%20 = and i64 %12, -2
%21 = icmp eq i64 %18, 0
br label %22
22: ; preds = %5, %116
%23 = phi i64 [ 1, %5 ], [ %117, %116 ]
br i1 %6, label %116, label %24
24: ; preds = %22
%25 = getelementptr inbounds double*, double** %0, i64 %23
%26 = load double*, double** %25
br i1 %15, label %50, label %27
27: ; preds = %24, %27
%28 = phi i64 [ %47, %27 ], [ 1, %24 ]
%29 = phi i32 [ %46, %27 ], [ 0, %24 ]
%30 = phi double [ %44, %27 ], [ 0.000000e+00, %24 ]
%31 = phi i64 [ %48, %27 ], [ 0, %24 ]
%32 = getelementptr inbounds double, double* %26, i64 %28
%33 = load double, double* %32
%34 = fcmp ogt double %33, 0.000000e+00
%35 = tail call double @llvm.fmuladd.f64(double %33, double %33, double %30)
%36 = select i1 %34, double %35, double %30
%37 = zext i1 %34 to i32
%38 = add nuw nsw i32 %29, %37
%39 = add nuw nsw i64 %28, 1
%40 = getelementptr inbounds double, double* %26, i64 %39
%41 = load double, double* %40
%42 = fcmp ogt double %41, 0.000000e+00
%43 = tail call double @llvm.fmuladd.f64(double %41, double %41, double %36)
%44 = select i1 %42, double %43, double %36
%45 = zext i1 %42 to i32
%46 = add nuw nsw i32 %38, %45
%47 = add nuw nsw i64 %28, 2
%48 = add i64 %31, 2
%49 = icmp eq i64 %48, %16
br i1 %49, label %50, label %27
50: ; preds = %27, %24
%51 = phi double [ undef, %24 ], [ %44, %27 ]
%52 = phi i32 [ undef, %24 ], [ %46, %27 ]
%53 = phi i64 [ 1, %24 ], [ %47, %27 ]
%54 = phi i32 [ 0, %24 ], [ %46, %27 ]
%55 = phi double [ 0.000000e+00, %24 ], [ %44, %27 ]
br i1 %17, label %64, label %56
56: ; preds = %50
%57 = getelementptr inbounds double, double* %26, i64 %53
%58 = load double, double* %57
%59 = fcmp ogt double %58, 0.000000e+00
%60 = tail call double @llvm.fmuladd.f64(double %58, double %58, double %55)
%61 = select i1 %59, double %60, double %55
%62 = zext i1 %59 to i32
%63 = add nuw nsw i32 %54, %62
br label %64
64: ; preds = %50, %56
%65 = phi double [ %51, %50 ], [ %61, %56 ]
%66 = phi i32 [ %52, %50 ], [ %63, %56 ]
%67 = icmp eq i32 %66, 0
br i1 %67, label %116, label %68
68: ; preds = %64
%69 = fdiv double %65, %7
%70 = fptosi double %69 to i32
%71 = tail call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([28 x i8], [28 x i8]* @.str, i64 0, i64 0), i32 %70, i32 %2)
br i1 %6, label %113, label %72
72: ; preds = %68
%73 = getelementptr inbounds double*, double** %0, i64 %23
%74 = load double*, double** %73
br i1 %19, label %101, label %75
75: ; preds = %72, %96
%76 = phi i64 [ %98, %96 ], [ 1, %72 ]
%77 = phi i32 [ %97, %96 ], [ 0, %72 ]
%78 = phi i64 [ %99, %96 ], [ 0, %72 ]
%79 = getelementptr inbounds double, double* %74, i64 %76
%80 = load double, double* %79
%81 = fcmp olt double %80, %69
%82 = fcmp ogt double %80, 0.000000e+00
%83 = and i1 %81, %82
br i1 %83, label %84, label %86
84: ; preds = %75
store double 0.000000e+00, double* %79
%85 = add nsw i32 %77, 1
br label %86
86: ; preds = %75, %84
%87 = phi i32 [ %85, %84 ], [ %77, %75 ]
%88 = add nuw nsw i64 %76, 1
%89 = getelementptr inbounds double, double* %74, i64 %88
%90 = load double, double* %89
%91 = fcmp olt double %90, %69
%92 = fcmp ogt double %90, 0.000000e+00
%93 = and i1 %91, %92
br i1 %93, label %94, label %96
94: ; preds = %86
store double 0.000000e+00, double* %89
%95 = add nsw i32 %87, 1
br label %96
96: ; preds = %94, %86
%97 = phi i32 [ %95, %94 ], [ %87, %86 ]
%98 = add nuw nsw i64 %76, 2
%99 = add i64 %78, 2
%100 = icmp eq i64 %99, %20
br i1 %100, label %101, label %75
101: ; preds = %96, %72
%102 = phi i32 [ undef, %72 ], [ %97, %96 ]
%103 = phi i64 [ 1, %72 ], [ %98, %96 ]
%104 = phi i32 [ 0, %72 ], [ %97, %96 ]
br i1 %21, label %113, label %105
105: ; preds = %101
%106 = getelementptr inbounds double, double* %74, i64 %103
%107 = load double, double* %106
%108 = fcmp olt double %107, %69
%109 = fcmp ogt double %107, 0.000000e+00
%110 = and i1 %108, %109
br i1 %110, label %111, label %113
111: ; preds = %105
store double 0.000000e+00, double* %106
%112 = add nsw i32 %104, 1
br label %113
113: ; preds = %101, %111, %105, %68
%114 = phi i32 [ 0, %68 ], [ %102, %101 ], [ %112, %111 ], [ %104, %105 ]
%115 = tail call i32 (i8*, i32, ...) @printf(i8* getelementptr inbounds ([19 x i8], [19 x i8]* @.str.1, i64 0, i64 0), i32 %114)
br label %116
116: ; preds = %22, %64, %113
%117 = add nuw nsw i64 %23, 1
%118 = icmp eq i64 %117, %10
br i1 %118, label %119, label %22
119: ; preds = %116, %3
ret void
}