#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__ is_alpha(unsigned int const, unsigned int);
int in_alpha(const unsigned int jisdata[], const size_t length,
             const unsigned int posn, unsigned int *p_end, unsigned int *p_cost,
             unsigned int *p_pcent, unsigned int gs1) {
  int two_alphas;
  if (posn < *p_end) {
    if (gs1 && *p_pcent) {
      two_alphas = posn < length - 1 && is_alpha(jisdata[posn + 1], gs1);
      *p_cost = two_alphas ? 33 : 36;
      *p_pcent = 0;
    }
    return 1;
  }
  if (!is_alpha(jisdata[posn], gs1)) {
    *p_end = 0;
    *p_pcent = 0;
    return 0;
  }
  if (gs1 && jisdata[posn] == '%') {
    *p_end = posn + 1;
    *p_cost = 66;
    *p_pcent = 0;
    return 1;
  }
  two_alphas = posn < length - 1 && is_alpha(jisdata[posn + 1], gs1);
  *p_end = two_alphas ? posn + 2 : posn + 1;
  *p_cost = two_alphas ? 33 : 36;
  *p_pcent = two_alphas && gs1 && jisdata[posn + 1] == '%';
  return 1;
}


x86 assembly (clang, -O0):
<in_alpha>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    0x10(%rbp),%eax
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    %rcx,-0x28(%rbp)
mov    %r8,-0x30(%rbp)
mov    %r9,-0x38(%rbp)
mov    -0x1c(%rbp),%eax
mov    -0x28(%rbp),%rcx
cmp    (%rcx),%eax
jae    11ce <in_alpha+0xbe>
cmpl   $0x0,0x10(%rbp)
je     11c2 <in_alpha+0xb2>
mov    -0x38(%rbp),%rax
cmpl   $0x0,(%rax)
je     11c2 <in_alpha+0xb2>
mov    -0x1c(%rbp),%eax
mov    %eax,%ecx
mov    -0x18(%rbp),%rdx
sub    $0x1,%rdx
xor    %eax,%eax
cmp    %rdx,%rcx
mov    %al,-0x3d(%rbp)
jae    1194 <in_alpha+0x84>
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
mov    (%rax,%rcx,4),%edi
mov    0x10(%rbp),%esi
call   1030 <is_alpha@plt>
cmp    $0x0,%rax
setne  %al
mov    %al,-0x3d(%rbp)
mov    -0x3d(%rbp),%al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x3c(%rbp)
mov    -0x3c(%rbp),%edx
mov    $0x24,%ecx
mov    $0x21,%eax
cmp    $0x0,%edx
cmovne %eax,%ecx
mov    -0x30(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x38(%rbp),%rax
movl   $0x0,(%rax)
movl   $0x1,-0x4(%rbp)
jmp    1324 <in_alpha+0x214>
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
mov    (%rax,%rcx,4),%edi
mov    0x10(%rbp),%esi
call   1030 <is_alpha@plt>
cmp    $0x0,%rax
jne    120a <in_alpha+0xfa>
mov    -0x28(%rbp),%rax
movl   $0x0,(%rax)
mov    -0x38(%rbp),%rax
movl   $0x0,(%rax)
movl   $0x0,-0x4(%rbp)
jmp    1324 <in_alpha+0x214>
cmpl   $0x0,0x10(%rbp)
je     1251 <in_alpha+0x141>
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
cmpl   $0x25,(%rax,%rcx,4)
jne    1251 <in_alpha+0x141>
mov    -0x1c(%rbp),%ecx
add    $0x1,%ecx
mov    -0x28(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x30(%rbp),%rax
movl   $0x42,(%rax)
mov    -0x38(%rbp),%rax
movl   $0x0,(%rax)
movl   $0x1,-0x4(%rbp)
jmp    1324 <in_alpha+0x214>
mov    -0x1c(%rbp),%eax
mov    %eax,%ecx
mov    -0x18(%rbp),%rdx
sub    $0x1,%rdx
xor    %eax,%eax
cmp    %rdx,%rcx
mov    %al,-0x3e(%rbp)
jae    128d <in_alpha+0x17d>
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
mov    (%rax,%rcx,4),%edi
mov    0x10(%rbp),%esi
call   1030 <is_alpha@plt>
cmp    $0x0,%rax
setne  %al
mov    %al,-0x3e(%rbp)
mov    -0x3e(%rbp),%al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x3c(%rbp)
cmpl   $0x0,-0x3c(%rbp)
je     12b0 <in_alpha+0x1a0>
mov    -0x1c(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x44(%rbp)
jmp    12b9 <in_alpha+0x1a9>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x44(%rbp)
mov    -0x44(%rbp),%ecx
mov    -0x28(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x3c(%rbp),%edx
mov    $0x24,%ecx
mov    $0x21,%eax
cmp    $0x0,%edx
cmovne %eax,%ecx
mov    -0x30(%rbp),%rax
mov    %ecx,(%rax)
xor    %eax,%eax
cmpl   $0x0,-0x3c(%rbp)
mov    %al,-0x45(%rbp)
je     130f <in_alpha+0x1ff>
xor    %eax,%eax
cmpl   $0x0,0x10(%rbp)
mov    %al,-0x45(%rbp)
je     130f <in_alpha+0x1ff>
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
cmpl   $0x25,(%rax,%rcx,4)
sete   %al
mov    %al,-0x45(%rbp)
mov    -0x45(%rbp),%al
and    $0x1,%al
movzbl %al,%ecx
mov    -0x38(%rbp),%rax
mov    %ecx,(%rax)
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<in_alpha>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %r9,%rbx
mov    %r8,%r15
mov    %edx,%ebp
mov    %rsi,%r14
mov    0x50(%rsp),%r13d
cmp    %edx,(%rcx)
jbe    1182 <in_alpha+0x72>
mov    $0x1,%eax
test   %r13d,%r13d
je     1245 <in_alpha+0x135>
cmpl   $0x0,(%rbx)
je     1245 <in_alpha+0x135>
mov    %ebp,%eax
add    $0xffffffffffffffff,%r14
mov    $0x24,%ecx
cmp    %rax,%r14
jbe    1173 <in_alpha+0x63>
mov    0x4(%rdi,%rax,4),%edi
mov    %r13d,%esi
call   1030 <is_alpha@plt>
xor    %ecx,%ecx
test   %rax,%rax
sete   %cl
lea    (%rcx,%rcx,2),%ecx
add    $0x21,%ecx
mov    %ecx,(%r15)
mov    $0x1,%eax
xor    %ecx,%ecx
jmp    1243 <in_alpha+0x133>
mov    %rcx,%r12
mov    %r15,0x10(%rsp)
mov    %rbx,0x8(%rsp)
mov    %ebp,%r15d
mov    %rdi,%rbx
mov    (%rdi,%r15,4),%edi
mov    %r13d,%esi
call   1030 <is_alpha@plt>
test   %rax,%rax
je     121a <in_alpha+0x10a>
test   %r13d,%r13d
je     11c9 <in_alpha+0xb9>
mov    %rbx,%rax
cmpl   $0x25,(%rbx,%r15,4)
jne    11c9 <in_alpha+0xb9>
add    $0x1,%ebp
mov    %ebp,(%r12)
mov    0x10(%rsp),%rax
movl   $0x42,(%rax)
jmp    1237 <in_alpha+0x127>
add    $0xffffffffffffffff,%r14
lea    0x1(%rbp),%eax
cmp    %r15,%r14
jbe    1228 <in_alpha+0x118>
mov    %eax,%r14d
mov    (%rbx,%r14,4),%edi
mov    %r13d,%r15d
mov    %r13d,%esi
mov    %eax,%r13d
call   1030 <is_alpha@plt>
test   %rax,%rax
mov    %r13d,%eax
je     1228 <in_alpha+0x118>
add    $0x2,%ebp
mov    %ebp,(%r12)
mov    0x10(%rsp),%rax
movl   $0x21,(%rax)
mov    $0x1,%eax
test   %r15d,%r15d
je     123c <in_alpha+0x12c>
xor    %ecx,%ecx
cmpl   $0x25,(%rbx,%r14,4)
sete   %cl
jmp    123e <in_alpha+0x12e>
movl   $0x0,(%r12)
xor    %ecx,%ecx
xor    %eax,%eax
jmp    123e <in_alpha+0x12e>
mov    %eax,(%r12)
mov    0x10(%rsp),%rax
movl   $0x24,(%rax)
mov    $0x1,%eax
xor    %ecx,%ecx
mov    0x8(%rsp),%rbx
mov    %ecx,(%rbx)
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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