int number_lat(int gbdata[], int length, int position) {
  int sp;
  int numb = 0, nonum = 0, done;
  int tally = 0;
  sp = position;
  do {
    done = 0;
    if ((gbdata[sp] >= '0') && (gbdata[sp] <= '9')) {
      numb++;
      done = 1;
    }
    switch (gbdata[sp]) {
    case ' ':
    case '+':
    case '-':
    case '.':
    case ',':
      nonum++;
      done = 1;
    }
    if ((sp + 1) < length) {
      if ((gbdata[sp] == 0x13) && (gbdata[sp + 1] == 0x10)) {
        nonum++;
        done = 1;
        sp++;
      }
    }
    if (done == 0) {
      tally += 80;
    } else {
      if (numb == 3) {
        if (nonum == 0) {
          tally += 10;
        }
        if (nonum == 1) {
          tally += 20;
        }
        if (nonum > 1) {
          tally += 80;
        }
        numb = 0;
        nonum = 0;
      }
    }
    sp++;
  } while ((sp < length) && (sp <= (position + 8)));
  if (numb == 0) {
    tally += 80;
  }
  if (numb > 1) {
    if (nonum == 0) {
      tally += 10;
    }
    if (nonum == 1) {
      tally += 20;
    }
    if (nonum > 1) {
      tally += 80;
    }
  }
  return tally;
}


x86 assembly (clang, -O0):
<number_lat>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
movl   $0x0,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x10(%rbp),%eax
mov    %eax,-0x14(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
cmpl   $0x30,(%rax,%rcx,4)
jl     1164 <number_lat+0x64>
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
cmpl   $0x39,(%rax,%rcx,4)
jg     1164 <number_lat+0x64>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
movl   $0x1,-0x20(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x28(%rbp)
sub    $0x20,%eax
je     1194 <number_lat+0x94>
jmp    1180 <number_lat+0x80>
mov    -0x28(%rbp),%eax
add    $0xffffffd5,%eax
sub    $0x3,%eax
ja     11a4 <number_lat+0xa4>
jmp    1194 <number_lat+0x94>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
movl   $0x1,-0x20(%rbp)
mov    -0x14(%rbp),%eax
add    $0x1,%eax
cmp    -0xc(%rbp),%eax
jge    11fa <number_lat+0xfa>
mov    -0x8(%rbp),%rax
movslq -0x14(%rbp),%rcx
cmpl   $0x13,(%rax,%rcx,4)
jne    11f5 <number_lat+0xf5>
mov    -0x8(%rbp),%rax
mov    -0x14(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
cmpl   $0x10,(%rax,%rcx,4)
jne    11f5 <number_lat+0xf5>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
movl   $0x1,-0x20(%rbp)
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    11fa <number_lat+0xfa>
cmpl   $0x0,-0x20(%rbp)
jne    1212 <number_lat+0x112>
mov    -0x24(%rbp),%eax
add    $0x50,%eax
mov    %eax,-0x24(%rbp)
jmp    1268 <number_lat+0x168>
cmpl   $0x3,-0x18(%rbp)
jne    1263 <number_lat+0x163>
cmpl   $0x0,-0x1c(%rbp)
jne    122f <number_lat+0x12f>
mov    -0x24(%rbp),%eax
add    $0xa,%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x1,-0x1c(%rbp)
jne    1242 <number_lat+0x142>
mov    -0x24(%rbp),%eax
add    $0x14,%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x1,-0x1c(%rbp)
jle    1255 <number_lat+0x155>
mov    -0x24(%rbp),%eax
add    $0x50,%eax
mov    %eax,-0x24(%rbp)
movl   $0x0,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
jmp    1268 <number_lat+0x168>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x14(%rbp),%ecx
xor    %eax,%eax
cmp    -0xc(%rbp),%ecx
mov    %al,-0x29(%rbp)
jge    1293 <number_lat+0x193>
mov    -0x14(%rbp),%eax
mov    -0x10(%rbp),%ecx
add    $0x8,%ecx
cmp    %ecx,%eax
setle  %al
mov    %al,-0x29(%rbp)
mov    -0x29(%rbp),%al
test   $0x1,%al
jne    1129 <number_lat+0x29>
cmpl   $0x0,-0x18(%rbp)
jne    12b1 <number_lat+0x1b1>
mov    -0x24(%rbp),%eax
add    $0x50,%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x1,-0x18(%rbp)
jle    12f9 <number_lat+0x1f9>
cmpl   $0x0,-0x1c(%rbp)
jne    12ce <number_lat+0x1ce>
mov    -0x24(%rbp),%eax
add    $0xa,%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x1,-0x1c(%rbp)
jne    12e1 <number_lat+0x1e1>
mov    -0x24(%rbp),%eax
add    $0x14,%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x1,-0x1c(%rbp)
jle    12f4 <number_lat+0x1f4>
mov    -0x24(%rbp),%eax
add    $0x50,%eax
mov    %eax,-0x24(%rbp)
jmp    12f9 <number_lat+0x1f9>
mov    -0x24(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<number_lat>:
push   %rbx
lea    0x8(%rdx),%r10d
xor    %r11d,%r11d
xor    %r9d,%r9d
xor    %r8d,%r8d
xchg   %ax,%ax
movslq %edx,%rax
mov    (%rdi,%rax,4),%ecx
lea    -0x30(%rcx),%eax
cmp    $0xa,%eax
adc    $0x0,%r11d
lea    -0x2b(%rcx),%ebx
cmp    $0x4,%ebx
jae    1160 <number_lat+0x60>
add    $0x1,%r9d
cmp    $0x3,%r11d
jne    1190 <number_lat+0x90>
lea    0xa(%r8),%eax
test   %r9d,%r9d
cmovne %r8d,%eax
lea    0x14(%rax),%ecx
cmp    $0x1,%r9d
cmovne %eax,%ecx
lea    0x50(%rcx),%r8d
cmp    $0x2,%r9d
cmovl  %ecx,%r8d
xor    %r11d,%r11d
mov    %edx,%eax
xor    %r9d,%r9d
jmp    1192 <number_lat+0x92>
nopl   (%rax)
cmp    $0x20,%ecx
je     1128 <number_lat+0x28>
lea    0x1(%rdx),%ebx
cmp    %esi,%ebx
jge    1182 <number_lat+0x82>
cmp    $0x13,%ecx
jne    1182 <number_lat+0x82>
movslq %ebx,%rcx
cmpl   $0x10,(%rdi,%rcx,4)
jne    1182 <number_lat+0x82>
add    $0x1,%r9d
mov    %ebx,%edx
jmp    112c <number_lat+0x2c>
cmp    $0xa,%eax
jb     112c <number_lat+0x2c>
add    $0x50,%r8d
nopl   0x0(%rax,%rax,1)
mov    %edx,%eax
lea    0x1(%rax),%edx
cmp    %esi,%edx
jge    11a2 <number_lat+0xa2>
cmp    %r10d,%eax
jl     1110 <number_lat+0x10>
lea    0x50(%r8),%eax
test   %r11d,%r11d
cmovne %r8d,%eax
cmp    $0x2,%r11d
jl     11d0 <number_lat+0xd0>
lea    0xa(%rax),%ecx
test   %r9d,%r9d
cmovne %eax,%ecx
lea    0x14(%rcx),%edx
cmp    $0x1,%r9d
cmovne %ecx,%edx
lea    0x50(%rdx),%eax
cmp    $0x2,%r9d
cmovl  %edx,%eax
pop    %rbx
ret

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

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