#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 *);
void perform_move(int dim, int n, int k, double *X, int *cluster_assignment,
                  double *cluster_centroid, int *cluster_member_count,
                  int move_point, int move_target_cluster) {
  int cluster_old = cluster_assignment[move_point];
  int cluster_new = move_target_cluster;
  cluster_assignment[move_point] = cluster_new;
  cluster_member_count[cluster_old]--;
  cluster_member_count[cluster_new]++;
  if (cluster_member_count[cluster_old] <= 1)
    printf("WARNING: Can't handle single-member clusters! \n");
  for (int ii = 0; ii < dim; ii++) {
    cluster_centroid[cluster_old * dim + ii] -=
        (X[move_point * dim + ii] - cluster_centroid[cluster_old * dim + ii]) /
        cluster_member_count[cluster_old];
    cluster_centroid[cluster_new * dim + ii] +=
        (X[move_point * dim + ii] - cluster_centroid[cluster_new * dim + ii]) /
        cluster_member_count[cluster_new];
  }
}


x86 assembly (clang, -O0):
<perform_move>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    0x20(%rbp),%eax
mov    0x18(%rbp),%eax
mov    0x10(%rbp),%rax
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    %rcx,-0x18(%rbp)
mov    %r8,-0x20(%rbp)
mov    %r9,-0x28(%rbp)
mov    -0x20(%rbp),%rax
movslq 0x18(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x2c(%rbp)
mov    0x20(%rbp),%eax
mov    %eax,-0x30(%rbp)
mov    -0x30(%rbp),%edx
mov    -0x20(%rbp),%rax
movslq 0x18(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,4),%edx
add    $0xffffffff,%edx
mov    %edx,(%rax,%rcx,4)
mov    0x10(%rbp),%rax
movslq -0x30(%rbp),%rcx
mov    (%rax,%rcx,4),%edx
add    $0x1,%edx
mov    %edx,(%rax,%rcx,4)
mov    0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
cmpl   $0x1,(%rax,%rcx,4)
jg     1199 <perform_move+0x89>
lea    0xe6c(%rip),%rdi
call   1030 <printf@plt>
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    126e <perform_move+0x15e>
mov    -0x18(%rbp),%rax
mov    0x18(%rbp),%ecx
imul   -0x4(%rbp),%ecx
add    -0x34(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm1
mov    -0x28(%rbp),%rax
mov    -0x2c(%rbp),%ecx
imul   -0x4(%rbp),%ecx
add    -0x34(%rbp),%ecx
movslq %ecx,%rcx
subsd  (%rax,%rcx,8),%xmm1
mov    0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
cvtsi2sdl (%rax,%rcx,4),%xmm0
divsd  %xmm0,%xmm1
mov    -0x28(%rbp),%rax
mov    -0x2c(%rbp),%ecx
imul   -0x4(%rbp),%ecx
add    -0x34(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
subsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x18(%rbp),%rax
mov    0x18(%rbp),%ecx
imul   -0x4(%rbp),%ecx
add    -0x34(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x30(%rbp),%ecx
imul   -0x4(%rbp),%ecx
add    -0x34(%rbp),%ecx
movslq %ecx,%rcx
subsd  (%rax,%rcx,8),%xmm0
mov    0x10(%rbp),%rax
movslq -0x30(%rbp),%rcx
cvtsi2sdl (%rax,%rcx,4),%xmm1
divsd  %xmm1,%xmm0
mov    -0x28(%rbp),%rax
mov    -0x30(%rbp),%ecx
imul   -0x4(%rbp),%ecx
add    -0x34(%rbp),%ecx
movslq %ecx,%rcx
addsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    11a0 <perform_move+0x90>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<perform_move>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
movslq 0x58(%rsp),%rbx
mov    0x60(%rsp),%eax
mov    0x50(%rsp),%r12
movslq (%r8,%rbx,4),%r14
mov    %eax,(%r8,%rbx,4)
addl   $0xffffffff,(%r12,%r14,4)
movslq %eax,%r13
addl   $0x1,(%r12,%r13,4)
mov    %edi,%ebp
cmpl   $0x1,(%r12,%r14,4)
jg     1166 <perform_move+0x56>
lea    0xeaf(%rip),%rdi
mov    %r9,0x8(%rsp)
mov    %rcx,%r15
call   1030 <puts@plt>
mov    %r15,%rcx
mov    0x8(%rsp),%r9
test   %ebp,%ebp
jle    12d1 <perform_move+0x1c1>
imul   %ebp,%ebx
movslq %ebp,%r8
cvtsi2sdl (%r12,%r14,4),%xmm0
imul   %r14,%r8
mov    %r13d,%eax
imul   %ebp,%eax
cvtsi2sdl (%r12,%r13,4),%xmm1
movslq %ebx,%r15
movslq %eax,%r10
mov    %ebp,%eax
cmp    $0x1,%ebp
jne    119e <perform_move+0x8e>
xor    %esi,%esi
jmp    1282 <perform_move+0x172>
lea    (%r9,%r8,8),%rbp
lea    (%r8,%rax,1),%rdx
lea    (%r9,%rdx,8),%rsi
lea    (%r9,%r10,8),%rdx
mov    %r10,0x10(%rsp)
lea    (%r10,%rax,1),%rdi
lea    (%r9,%rdi,8),%r14
lea    (%rcx,%r15,8),%rdi
lea    (%r15,%rax,1),%rbx
mov    %rcx,0x8(%rsp)
lea    (%rcx,%rbx,8),%rcx
cmp    %r14,%rbp
setb   %r13b
cmp    %rsi,%rdx
setb   %bl
cmp    %rcx,%rbp
setb   %r12b
cmp    %rsi,%rdi
setb   %r11b
cmp    %rcx,%rdx
setb   %r10b
cmp    %r14,%rdi
setb   %r14b
xor    %esi,%esi
test   %bl,%r13b
jne    1278 <perform_move+0x168>
and    %r11b,%r12b
jne    1278 <perform_move+0x168>
and    %r14b,%r10b
mov    0x8(%rsp),%rcx
mov    0x10(%rsp),%r10
jne    1282 <perform_move+0x172>
mov    %eax,%esi
and    $0xfffffffe,%esi
movapd %xmm0,%xmm2
unpcklpd %xmm0,%xmm2
movapd %xmm1,%xmm3
unpcklpd %xmm1,%xmm3
xor    %ebx,%ebx
nopw   0x0(%rax,%rax,1)
movupd (%rdi,%rbx,8),%xmm4
movupd 0x0(%rbp,%rbx,8),%xmm5
subpd  %xmm5,%xmm4
divpd  %xmm2,%xmm4
subpd  %xmm4,%xmm5
movupd %xmm5,0x0(%rbp,%rbx,8)
movupd (%rdi,%rbx,8),%xmm4
movupd (%rdx,%rbx,8),%xmm5
subpd  %xmm5,%xmm4
divpd  %xmm3,%xmm4
addpd  %xmm5,%xmm4
movupd %xmm4,(%rdx,%rbx,8)
add    $0x2,%rbx
cmp    %rbx,%rsi
jne    1230 <perform_move+0x120>
cmp    %rax,%rsi
jne    1282 <perform_move+0x172>
jmp    12d1 <perform_move+0x1c1>
mov    0x8(%rsp),%rcx
mov    0x10(%rsp),%r10
lea    (%r9,%r10,8),%rdx
lea    (%r9,%r8,8),%rbp
lea    (%rcx,%r15,8),%rdi
xchg   %ax,%ax
movsd  (%rdi,%rsi,8),%xmm2
movsd  0x0(%rbp,%rsi,8),%xmm3
subsd  %xmm3,%xmm2
divsd  %xmm0,%xmm2
subsd  %xmm2,%xmm3
movsd  %xmm3,0x0(%rbp,%rsi,8)
movsd  (%rdi,%rsi,8),%xmm2
movsd  (%rdx,%rsi,8),%xmm3
subsd  %xmm3,%xmm2
divsd  %xmm1,%xmm2
addsd  %xmm3,%xmm2
movsd  %xmm2,(%rdx,%rsi,8)
add    $0x1,%rsi
cmp    %rsi,%rax
jne    1290 <perform_move+0x180>
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@str = [47 x i8] c"WARNING: Can't handle single-member clusters! \00"
define void @perform_move(i32 %0, i32 %1, i32 %2, double* nocapture %3, i32* nocapture %4, double* nocapture %5, i32* nocapture %6, i32 %7, i32 %8) {
%10 = sext i32 %7 to i64
%11 = getelementptr inbounds i32, i32* %4, i64 %10
%12 = load i32, i32* %11
store i32 %8, i32* %11
%13 = sext i32 %12 to i64
%14 = getelementptr inbounds i32, i32* %6, i64 %13
%15 = load i32, i32* %14
%16 = add nsw i32 %15, -1
store i32 %16, i32* %14
%17 = sext i32 %8 to i64
%18 = getelementptr inbounds i32, i32* %6, i64 %17
%19 = load i32, i32* %18
%20 = add nsw i32 %19, 1
store i32 %20, i32* %18
%21 = load i32, i32* %14
%22 = icmp slt i32 %21, 2
br i1 %22, label %23, label %25
23: ; preds = %9
%24 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([47 x i8], [47 x i8]* @str, i64 0, i64 0))
br label %25
25: ; preds = %23, %9
%26 = icmp sgt i32 %0, 0
br i1 %26, label %27, label %97
27: ; preds = %25
%28 = mul nsw i32 %7, %0
%29 = mul nsw i32 %12, %0
%30 = load i32, i32* %14
%31 = sitofp i32 %30 to double
%32 = mul nsw i32 %8, %0
%33 = load i32, i32* %18
%34 = sitofp i32 %33 to double
%35 = sext i32 %28 to i64
%36 = sext i32 %29 to i64
%37 = sext i32 %32 to i64
%38 = zext i32 %0 to i64
%39 = icmp eq i32 %0, 1
br i1 %39, label %95, label %40
40: ; preds = %27
%41 = getelementptr double, double* %5, i64 %36
%42 = add nsw i64 %36, %38
%43 = getelementptr double, double* %5, i64 %42
%44 = getelementptr double, double* %5, i64 %37
%45 = add nsw i64 %37, %38
%46 = getelementptr double, double* %5, i64 %45
%47 = getelementptr double, double* %3, i64 %35
%48 = add nsw i64 %35, %38
%49 = getelementptr double, double* %3, i64 %48
%50 = icmp ult double* %41, %46
%51 = icmp ult double* %44, %43
%52 = and i1 %50, %51
%53 = icmp ult double* %41, %49
%54 = icmp ult double* %47, %43
%55 = and i1 %53, %54
%56 = or i1 %52, %55
%57 = icmp ult double* %44, %49
%58 = icmp ult double* %47, %46
%59 = and i1 %57, %58
%60 = or i1 %56, %59
br i1 %60, label %95, label %61
61: ; preds = %40
%62 = and i64 %38, 4294967294
%63 = insertelement <2 x double> poison, double %31, i64 0
%64 = shufflevector <2 x double> %63, <2 x double> poison, <2 x i32> zeroinitializer
%65 = insertelement <2 x double> poison, double %34, i64 0
%66 = shufflevector <2 x double> %65, <2 x double> poison, <2 x i32> zeroinitializer
br label %67
67: ; preds = %67, %61
%68 = phi i64 [ 0, %61 ], [ %91, %67 ]
%69 = add nsw i64 %68, %35
%70 = getelementptr inbounds double, double* %3, i64 %69
%71 = bitcast double* %70 to <2 x double>*
%72 = load <2 x double>, <2 x double>* %71
%73 = add nsw i64 %68, %36
%74 = getelementptr inbounds double, double* %5, i64 %73
%75 = bitcast double* %74 to <2 x double>*
%76 = load <2 x double>, <2 x double>* %75
%77 = fsub <2 x double> %72, %76
%78 = fdiv <2 x double> %77, %64
%79 = fsub <2 x double> %76, %78
%80 = bitcast double* %74 to <2 x double>*
store <2 x double> %79, <2 x double>* %80
%81 = bitcast double* %70 to <2 x double>*
%82 = load <2 x double>, <2 x double>* %81
%83 = add nsw i64 %68, %37
%84 = getelementptr inbounds double, double* %5, i64 %83
%85 = bitcast double* %84 to <2 x double>*
%86 = load <2 x double>, <2 x double>* %85
%87 = fsub <2 x double> %82, %86
%88 = fdiv <2 x double> %87, %66
%89 = fadd <2 x double> %86, %88
%90 = bitcast double* %84 to <2 x double>*
store <2 x double> %89, <2 x double>* %90
%91 = add nuw i64 %68, 2
%92 = icmp eq i64 %91, %62
br i1 %92, label %93, label %67
93: ; preds = %67
%94 = icmp eq i64 %62, %38
br i1 %94, label %97, label %95
95: ; preds = %40, %27, %93
%96 = phi i64 [ 0, %40 ], [ 0, %27 ], [ %62, %93 ]
br label %98
97: ; preds = %98, %93, %25
ret void
98: ; preds = %95, %98
%99 = phi i64 [ %116, %98 ], [ %96, %95 ]
%100 = add nsw i64 %99, %35
%101 = getelementptr inbounds double, double* %3, i64 %100
%102 = load double, double* %101
%103 = add nsw i64 %99, %36
%104 = getelementptr inbounds double, double* %5, i64 %103
%105 = load double, double* %104
%106 = fsub double %102, %105
%107 = fdiv double %106, %31
%108 = fsub double %105, %107
store double %108, double* %104
%109 = load double, double* %101
%110 = add nsw i64 %99, %37
%111 = getelementptr inbounds double, double* %5, i64 %110
%112 = load double, double* %111
%113 = fsub double %109, %112
%114 = fdiv double %113, %34
%115 = fadd double %112, %114
store double %115, double* %111
%116 = add nuw nsw i64 %99, 1
%117 = icmp eq i64 %116, %38
br i1 %117, label %97, label %98
}