#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 */
typedef size_t int64_t;

/* Variables and functions */
int64_t stdlib_ndarray_singleton_dimensions(int64_t ndims, int64_t *shape) {
  int64_t n;
  int64_t i;
  n = 0;
  for (i = 0; i < ndims; i++) {
    if (shape[i] == 1) {
      n += 1;
    }
  }
  return n;
}


x86 assembly (clang, -O0):
<stdlib_ndarray_singleton_dimensions>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movq   $0x0,-0x18(%rbp)
movq   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmp    -0x8(%rbp),%rax
jae    115f <stdlib_ndarray_singleton_dimensions+0x5f>
mov    -0x10(%rbp),%rax
mov    -0x20(%rbp),%rcx
cmpq   $0x1,(%rax,%rcx,8)
jne    1149 <stdlib_ndarray_singleton_dimensions+0x49>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    114e <stdlib_ndarray_singleton_dimensions+0x4e>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    111c <stdlib_ndarray_singleton_dimensions+0x1c>
mov    -0x18(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<stdlib_ndarray_singleton_dimensions>:
test   %rdi,%rdi
je     111c <stdlib_ndarray_singleton_dimensions+0x1c>
lea    -0x1(%rdi),%rax
mov    %edi,%r8d
and    $0x3,%r8d
cmp    $0x3,%rax
jae    111f <stdlib_ndarray_singleton_dimensions+0x1f>
xor    %edx,%edx
xor    %eax,%eax
jmp    1170 <stdlib_ndarray_singleton_dimensions+0x70>
xor    %eax,%eax
ret
and    $0xfffffffffffffffc,%rdi
xor    %edx,%edx
xor    %eax,%eax
nopw   0x0(%rax,%rax,1)
xor    %ecx,%ecx
cmpq   $0x1,(%rsi,%rdx,8)
sete   %cl
add    %rax,%rcx
xor    %eax,%eax
cmpq   $0x1,0x8(%rsi,%rdx,8)
sete   %al
add    %rcx,%rax
xor    %ecx,%ecx
cmpq   $0x1,0x10(%rsi,%rdx,8)
sete   %cl
add    %rax,%rcx
xor    %eax,%eax
cmpq   $0x1,0x18(%rsi,%rdx,8)
sete   %al
add    %rcx,%rax
add    $0x4,%rdx
cmp    %rdx,%rdi
jne    1130 <stdlib_ndarray_singleton_dimensions+0x30>
test   %r8,%r8
je     1196 <stdlib_ndarray_singleton_dimensions+0x96>
lea    (%rsi,%rdx,8),%rdx
xor    %esi,%esi
nopl   0x0(%rax,%rax,1)
xor    %ecx,%ecx
cmpq   $0x1,(%rdx,%rsi,8)
sete   %cl
add    %rcx,%rax
add    $0x1,%rsi
cmp    %rsi,%r8
jne    1180 <stdlib_ndarray_singleton_dimensions+0x80>
ret

LLVM IR (-O0):
define i64 @stdlib_ndarray_singleton_dimensions(i64 %0, i64* %1) {
%3 = alloca i64
%4 = alloca i64*
%5 = alloca i64
%6 = alloca i64
store i64 %0, i64* %3
store i64* %1, i64** %4
store i64 0, i64* %5
store i64 0, i64* %6
br label %7
7: ; preds = %21, %2
%8 = load i64, i64* %6
%9 = load i64, i64* %3
%10 = icmp ult i64 %8, %9
br i1 %10, label %11, label %24
11: ; preds = %7
%12 = load i64*, i64** %4
%13 = load i64, i64* %6
%14 = getelementptr inbounds i64, i64* %12, i64 %13
%15 = load i64, i64* %14
%16 = icmp eq i64 %15, 1
br i1 %16, label %17, label %20
17: ; preds = %11
%18 = load i64, i64* %5
%19 = add i64 %18, 1
store i64 %19, i64* %5
br label %20
20: ; preds = %17, %11
br label %21
21: ; preds = %20
%22 = load i64, i64* %6
%23 = add i64 %22, 1
store i64 %23, i64* %6
br label %7
24: ; preds = %7
%25 = load i64, i64* %5
ret i64 %25
}

LLVM IR (-O2):
define i64 @stdlib_ndarray_singleton_dimensions(i64 %0, i64* nocapture %1) {
%3 = icmp eq i64 %0, 0
br i1 %3, label %57, label %4
4: ; preds = %2
%5 = add i64 %0, -1
%6 = and i64 %0, 3
%7 = icmp ult i64 %5, 3
br i1 %7, label %40, label %8
8: ; preds = %4
%9 = and i64 %0, -4
br label %10
10: ; preds = %10, %8
%11 = phi i64 [ 0, %8 ], [ %37, %10 ]
%12 = phi i64 [ 0, %8 ], [ %36, %10 ]
%13 = phi i64 [ 0, %8 ], [ %38, %10 ]
%14 = getelementptr inbounds i64, i64* %1, i64 %11
%15 = load i64, i64* %14
%16 = icmp eq i64 %15, 1
%17 = zext i1 %16 to i64
%18 = add i64 %12, %17
%19 = or i64 %11, 1
%20 = getelementptr inbounds i64, i64* %1, i64 %19
%21 = load i64, i64* %20
%22 = icmp eq i64 %21, 1
%23 = zext i1 %22 to i64
%24 = add i64 %18, %23
%25 = or i64 %11, 2
%26 = getelementptr inbounds i64, i64* %1, i64 %25
%27 = load i64, i64* %26
%28 = icmp eq i64 %27, 1
%29 = zext i1 %28 to i64
%30 = add i64 %24, %29
%31 = or i64 %11, 3
%32 = getelementptr inbounds i64, i64* %1, i64 %31
%33 = load i64, i64* %32
%34 = icmp eq i64 %33, 1
%35 = zext i1 %34 to i64
%36 = add i64 %30, %35
%37 = add nuw i64 %11, 4
%38 = add i64 %13, 4
%39 = icmp eq i64 %38, %9
br i1 %39, label %40, label %10
40: ; preds = %10, %4
%41 = phi i64 [ undef, %4 ], [ %36, %10 ]
%42 = phi i64 [ 0, %4 ], [ %37, %10 ]
%43 = phi i64 [ 0, %4 ], [ %36, %10 ]
%44 = icmp eq i64 %6, 0
br i1 %44, label %57, label %45
45: ; preds = %40, %45
%46 = phi i64 [ %54, %45 ], [ %42, %40 ]
%47 = phi i64 [ %53, %45 ], [ %43, %40 ]
%48 = phi i64 [ %55, %45 ], [ 0, %40 ]
%49 = getelementptr inbounds i64, i64* %1, i64 %46
%50 = load i64, i64* %49
%51 = icmp eq i64 %50, 1
%52 = zext i1 %51 to i64
%53 = add i64 %47, %52
%54 = add nuw i64 %46, 1
%55 = add i64 %48, 1
%56 = icmp eq i64 %55, %6
br i1 %56, label %57, label %45
57: ; preds = %40, %45, %2
%58 = phi i64 [ 0, %2 ], [ %41, %40 ], [ %53, %45 ]
ret i64 %58
}