#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*/ mark_one_cluster(int **, int **, int **, int, int, int *,
                                    char);
double get_cluster_size(int **site_marks, int **vbonds, int **hbonds, int M,
                        int N, int A1[2]) {
  int i, j;
  int cluster_size = 0;
  mark_one_cluster(site_marks, vbonds, hbonds, M, N, A1, '@');
  for (i = 0; i < M; i++)
    for (j = 0; j < N; j++)
      if (site_marks[i][j] == '@')
        cluster_size++;
  return cluster_size;
}


x86 assembly (clang, -O0):
<get_cluster_size>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    %r8d,-0x20(%rbp)
mov    %r9,-0x28(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x8(%rbp),%rdi
mov    -0x10(%rbp),%rsi
mov    -0x18(%rbp),%rdx
mov    -0x1c(%rbp),%ecx
mov    -0x20(%rbp),%r8d
mov    -0x28(%rbp),%r9
movl   $0x40,(%rsp)
call   1030 <mark_one_cluster@plt>
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    11c8 <get_cluster_size+0xb8>
movl   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x20(%rbp),%eax
jge    11b5 <get_cluster_size+0xa5>
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
cmpl   $0x40,(%rax,%rcx,4)
jne    11a2 <get_cluster_size+0x92>
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    11a7 <get_cluster_size+0x97>
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    1173 <get_cluster_size+0x63>
jmp    11ba <get_cluster_size+0xaa>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1160 <get_cluster_size+0x50>
cvtsi2sdl -0x34(%rbp),%xmm0
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<get_cluster_size>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    %r8d,%ebx
mov    %ecx,%ebp
mov    %rdi,%r14
movl   $0x40,(%rsp)
call   1030 <mark_one_cluster@plt>
test   %ebp,%ebp
jle    1273 <get_cluster_size+0x163>
mov    %ebp,%r15d
mov    %ebx,%ecx
mov    %ecx,%r11d
and    $0xfffffff8,%r11d
lea    -0x8(%r11),%r9
mov    %r9,%r10
shr    $0x3,%r10
add    $0x1,%r10
mov    %r10,%r8
and    $0xfffffffffffffffe,%r8
xor    %ebp,%ebp
movdqa 0xea1(%rip),%xmm0
xor    %edi,%edi
jmp    117d <get_cluster_size+0x6d>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    $0x1,%rbp
cmp    %r15,%rbp
je     1275 <get_cluster_size+0x165>
test   %ebx,%ebx
jle    1170 <get_cluster_size+0x60>
mov    (%r14,%rbp,8),%rsi
cmp    $0x8,%ebx
jae    11a0 <get_cluster_size+0x90>
xor    %edx,%edx
jmp    1250 <get_cluster_size+0x140>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movd   %edi,%xmm1
pxor   %xmm2,%xmm2
test   %r9,%r9
je     1269 <get_cluster_size+0x159>
mov    %r8,%rdx
xor    %edi,%edi
cs nopw 0x0(%rax,%rax,1)
movdqu (%rsi,%rdi,4),%xmm3
movdqu 0x10(%rsi,%rdi,4),%xmm4
movdqu 0x20(%rsi,%rdi,4),%xmm5
movdqu 0x30(%rsi,%rdi,4),%xmm6
pcmpeqd %xmm0,%xmm3
psubd  %xmm3,%xmm1
pcmpeqd %xmm0,%xmm4
psubd  %xmm4,%xmm2
pcmpeqd %xmm0,%xmm5
psubd  %xmm5,%xmm1
pcmpeqd %xmm0,%xmm6
psubd  %xmm6,%xmm2
add    $0x10,%rdi
add    $0xfffffffffffffffe,%rdx
jne    11c0 <get_cluster_size+0xb0>
test   $0x1,%r10b
je     1222 <get_cluster_size+0x112>
movdqu (%rsi,%rdi,4),%xmm3
movdqu 0x10(%rsi,%rdi,4),%xmm4
pcmpeqd %xmm0,%xmm3
psubd  %xmm3,%xmm1
pcmpeqd %xmm0,%xmm4
psubd  %xmm4,%xmm2
paddd  %xmm2,%xmm1
pshufd $0xee,%xmm1,%xmm2
paddd  %xmm1,%xmm2
pshufd $0x55,%xmm2,%xmm1
paddd  %xmm2,%xmm1
movd   %xmm1,%edi
mov    %r11,%rdx
cmp    %rcx,%r11
je     1170 <get_cluster_size+0x60>
nopl   0x0(%rax,%rax,1)
xor    %eax,%eax
cmpl   $0x40,(%rsi,%rdx,4)
sete   %al
add    %eax,%edi
add    $0x1,%rdx
cmp    %rdx,%rcx
jne    1250 <get_cluster_size+0x140>
jmp    1170 <get_cluster_size+0x60>
xor    %edi,%edi
test   $0x1,%r10b
jne    1207 <get_cluster_size+0xf7>
jmp    1222 <get_cluster_size+0x112>
xor    %edi,%edi
xorps  %xmm0,%xmm0
cvtsi2sd %edi,%xmm0
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

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

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