#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__ isspace(char const);
int sscanf(char *, char *, double *);
char *strchr(char const *, char const);
int strlen(char const *);
int /*<<< orphan*/ strncpy(char *, char const *, int);
char *strpbrk(char const *, char const *);
int strspn(char const *, char *);
char toupper(char const);
int lat_lon_decode(const char *readln, const char *designators, double *value) {
  const char *end, *pos;
  char hemi, number[80];
  int len;
  end = strchr(readln, '\n');
  if (NULL == end)
    end = readln + strlen(readln);
  pos = strpbrk(readln, designators);
  if (NULL == pos || pos > end)
    return 0;
  hemi = toupper(*pos);
  while (pos > readln && isspace(*--pos))
    ;
  while (pos > readln && NULL != strchr("0123456789.+-", *--pos))
    ;
  if (NULL == strchr("0123456789.+-", *pos))
    ++pos;
  len = strspn(pos, "0123456789.+-");
  if (len <= 0)
    return 0;
  strncpy(number, pos, len);
  number[len] = '\0';
  if (sscanf(number, "%lf", value) != 1)
    return 0;
  if ('W' == hemi || 'S' == hemi)
    *value = -(*value);
  return 1;
}


x86 assembly (clang, -O0):
<lat_lon_decode>:
push   %rbp
mov    %rsp,%rbp
sub    $0xb0,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    -0x10(%rbp),%rdi
mov    $0xa,%esi
call   1060 <strchr@plt>
mov    %rax,-0x28(%rbp)
xor    %eax,%eax
cmp    -0x28(%rbp),%rax
jne    11dc <lat_lon_decode+0x5c>
mov    -0x10(%rbp),%rax
mov    %rax,-0xa0(%rbp)
mov    -0x10(%rbp),%rdi
call   1050 <strlen@plt>
mov    %eax,%ecx
mov    -0xa0(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x28(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x18(%rbp),%rsi
call   10a0 <strpbrk@plt>
mov    %rax,-0x30(%rbp)
xor    %eax,%eax
cmp    -0x30(%rbp),%rax
je     1207 <lat_lon_decode+0x87>
mov    -0x30(%rbp),%rax
cmp    -0x28(%rbp),%rax
jbe    1213 <lat_lon_decode+0x93>
movl   $0x0,-0x4(%rbp)
jmp    13d5 <lat_lon_decode+0x255>
mov    -0x30(%rbp),%rax
movsbl (%rax),%edi
call   1040 <toupper@plt>
mov    %al,-0x31(%rbp)
mov    -0x30(%rbp),%rcx
xor    %eax,%eax
cmp    -0x10(%rbp),%rcx
mov    %al,-0xa1(%rbp)
jbe    125d <lat_lon_decode+0xdd>
mov    -0x30(%rbp),%rax
mov    %rax,%rcx
add    $0xffffffffffffffff,%rcx
mov    %rcx,-0x30(%rbp)
movsbl -0x1(%rax),%edi
call   1080 <isspace@plt>
cmp    $0x0,%rax
setne  %al
mov    %al,-0xa1(%rbp)
mov    -0xa1(%rbp),%al
test   $0x1,%al
jne    1270 <lat_lon_decode+0xf0>
jmp    1275 <lat_lon_decode+0xf5>
jmp    1222 <lat_lon_decode+0xa2>
jmp    127a <lat_lon_decode+0xfa>
mov    -0x30(%rbp),%rcx
xor    %eax,%eax
cmp    -0x10(%rbp),%rcx
mov    %al,-0xa2(%rbp)
jbe    12c0 <lat_lon_decode+0x140>
mov    -0x30(%rbp),%rax
mov    %rax,%rcx
add    $0xffffffffffffffff,%rcx
mov    %rcx,-0x30(%rbp)
lea    0xd5a(%rip),%rdi
movsbl -0x1(%rax),%esi
call   1060 <strchr@plt>
mov    %rax,%rcx
xor    %eax,%eax
cmp    %rcx,%rax
setne  %al
mov    %al,-0xa2(%rbp)
mov    -0xa2(%rbp),%al
test   $0x1,%al
jne    12d3 <lat_lon_decode+0x153>
jmp    12d8 <lat_lon_decode+0x158>
jmp    127a <lat_lon_decode+0xfa>
mov    -0x30(%rbp),%rax
lea    0xd1d(%rip),%rdi
movsbl (%rax),%esi
call   1060 <strchr@plt>
mov    %rax,%rcx
xor    %eax,%eax
cmp    %rcx,%rax
jne    1305 <lat_lon_decode+0x185>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rdi
lea    0xcf0(%rip),%rsi
call   1070 <strspn@plt>
mov    %eax,-0x94(%rbp)
cmpl   $0x0,-0x94(%rbp)
jg     1334 <lat_lon_decode+0x1b4>
movl   $0x0,-0x4(%rbp)
jmp    13d5 <lat_lon_decode+0x255>
lea    -0x90(%rbp),%rdi
mov    -0x30(%rbp),%rsi
mov    -0x94(%rbp),%edx
call   1030 <strncpy@plt>
movslq -0x94(%rbp),%rax
movb   $0x0,-0x90(%rbp,%rax,1)
lea    -0x90(%rbp),%rdi
mov    -0x20(%rbp),%rdx
lea    0xca3(%rip),%rsi
call   1090 <sscanf@plt>
cmp    $0x1,%eax
je     1385 <lat_lon_decode+0x205>
movl   $0x0,-0x4(%rbp)
jmp    13d5 <lat_lon_decode+0x255>
movsbl -0x31(%rbp),%ecx
mov    $0x57,%eax
cmp    %ecx,%eax
je     13a7 <lat_lon_decode+0x227>
movsbl -0x31(%rbp),%ecx
mov    $0x53,%eax
cmp    %ecx,%eax
jne    13ce <lat_lon_decode+0x24e>
mov    -0x20(%rbp),%rax
movsd  (%rax),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mov    -0x20(%rbp),%rax
movsd  %xmm0,(%rax)
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0xb0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<lat_lon_decode>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x68,%rsp
mov    %rdx,%r15
mov    %rsi,%rbx
mov    %rdi,%rbp
mov    $0xa,%esi
call   1060 <strchr@plt>
mov    %rax,%r14
test   %rax,%rax
jne    11b7 <lat_lon_decode+0x37>
mov    %rbp,%rdi
call   1050 <strlen@plt>
movslq %eax,%r14
add    %rbp,%r14
mov    %rbp,%rdi
mov    %rbx,%rsi
call   10a0 <strpbrk@plt>
xor    %r12d,%r12d
test   %rax,%rax
je     12b0 <lat_lon_decode+0x130>
mov    %rax,%rbx
cmp    %r14,%rax
ja     12b0 <lat_lon_decode+0x130>
movsbl (%rbx),%edi
call   1040 <toupper@plt>
mov    %al,0xf(%rsp)
cs nopw 0x0(%rax,%rax,1)
cmp    %rbp,%rbx
jbe    1207 <lat_lon_decode+0x87>
movsbl -0x1(%rbx),%edi
add    $0xffffffffffffffff,%rbx
call   1080 <isspace@plt>
test   %rax,%rax
jne    11f0 <lat_lon_decode+0x70>
lea    0xe02(%rip),%r13
xchg   %ax,%ax
cmp    %rbp,%rbx
jbe    1231 <lat_lon_decode+0xb1>
movzbl -0x1(%rbx),%r14d
add    $0xffffffffffffffff,%rbx
movsbl %r14b,%esi
mov    %r13,%rdi
call   1060 <strchr@plt>
test   %rax,%rax
jne    1210 <lat_lon_decode+0x90>
jmp    1234 <lat_lon_decode+0xb4>
mov    (%rbx),%r14b
movsbl %r14b,%esi
lea    0xdd1(%rip),%rbp
mov    %rbp,%rdi
call   1060 <strchr@plt>
cmp    $0x1,%rax
adc    $0x0,%rbx
mov    %rbx,%rdi
mov    %rbp,%rsi
call   1070 <strspn@plt>
test   %eax,%eax
jle    12b0 <lat_lon_decode+0x130>
mov    %eax,%ebp
lea    0x10(%rsp),%r13
mov    %r13,%rdi
mov    %rbx,%rsi
mov    %eax,%edx
call   1030 <strncpy@plt>
mov    %ebp,%eax
movb   $0x0,0x10(%rsp,%rax,1)
lea    0xd9e(%rip),%rsi
mov    %r13,%rdi
mov    %r15,%rdx
call   1090 <sscanf@plt>
cmp    $0x1,%eax
jne    12b0 <lat_lon_decode+0x130>
mov    0xf(%rsp),%al
and    $0xfb,%al
mov    $0x1,%r12d
cmp    $0x53,%al
jne    12b0 <lat_lon_decode+0x130>
movsd  (%r15),%xmm0
xorps  0xd54(%rip),%xmm0
movlps %xmm0,(%r15)
mov    %r12d,%eax
add    $0x68,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [14 x i8] c"0123456789.+-\00"
@.str.1 = [4 x i8] c"%lf\00"
define i32 @lat_lon_decode(i8* %0, i8* %1, double* %2) {
%4 = alloca i32
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca double*
%8 = alloca i8*
%9 = alloca i8*
%10 = alloca i8
%11 = alloca [80 x i8]
%12 = alloca i32
store i8* %0, i8** %5
store i8* %1, i8** %6
store double* %2, double** %7
%13 = load i8*, i8** %5
%14 = call i8* @strchr(i8* %13, i8 signext 10)
store i8* %14, i8** %8
%15 = load i8*, i8** %8
%16 = icmp eq i8* null, %15
br i1 %16, label %17, label %23
17: ; preds = %3
%18 = load i8*, i8** %5
%19 = load i8*, i8** %5
%20 = call i32 @strlen(i8* %19)
%21 = sext i32 %20 to i64
%22 = getelementptr inbounds i8, i8* %18, i64 %21
store i8* %22, i8** %8
br label %23
23: ; preds = %17, %3
%24 = load i8*, i8** %5
%25 = load i8*, i8** %6
%26 = call i8* @strpbrk(i8* %24, i8* %25)
store i8* %26, i8** %9
%27 = load i8*, i8** %9
%28 = icmp eq i8* null, %27
br i1 %28, label %33, label %29
29: ; preds = %23
%30 = load i8*, i8** %9
%31 = load i8*, i8** %8
%32 = icmp ugt i8* %30, %31
br i1 %32, label %33, label %34
33: ; preds = %29, %23
store i32 0, i32* %4
br label %106
34: ; preds = %29
%35 = load i8*, i8** %9
%36 = load i8, i8* %35
%37 = call signext i8 @toupper(i8 signext %36)
store i8 %37, i8* %10
br label %38
38: ; preds = %50, %34
%39 = load i8*, i8** %9
%40 = load i8*, i8** %5
%41 = icmp ugt i8* %39, %40
br i1 %41, label %42, label %48
42: ; preds = %38
%43 = load i8*, i8** %9
%44 = getelementptr inbounds i8, i8* %43, i32 -1
store i8* %44, i8** %9
%45 = load i8, i8* %44
%46 = call i64 @isspace(i8 signext %45)
%47 = icmp ne i64 %46, 0
br label %48
48: ; preds = %42, %38
%49 = phi i1 [ false, %38 ], [ %47, %42 ]
br i1 %49, label %50, label %51
50: ; preds = %48
br label %38
51: ; preds = %48
br label %52
52: ; preds = %64, %51
%53 = load i8*, i8** %9
%54 = load i8*, i8** %5
%55 = icmp ugt i8* %53, %54
br i1 %55, label %56, label %62
56: ; preds = %52
%57 = load i8*, i8** %9
%58 = getelementptr inbounds i8, i8* %57, i32 -1
store i8* %58, i8** %9
%59 = load i8, i8* %58
%60 = call i8* @strchr(i8* getelementptr inbounds ([14 x i8], [14 x i8]* @.str, i64 0, i64 0), i8 signext %59)
%61 = icmp ne i8* null, %60
br label %62
62: ; preds = %56, %52
%63 = phi i1 [ false, %52 ], [ %61, %56 ]
br i1 %63, label %64, label %65
64: ; preds = %62
br label %52
65: ; preds = %62
%66 = load i8*, i8** %9
%67 = load i8, i8* %66
%68 = call i8* @strchr(i8* getelementptr inbounds ([14 x i8], [14 x i8]* @.str, i64 0, i64 0), i8 signext %67)
%69 = icmp eq i8* null, %68
br i1 %69, label %70, label %73
70: ; preds = %65
%71 = load i8*, i8** %9
%72 = getelementptr inbounds i8, i8* %71, i32 1
store i8* %72, i8** %9
br label %73
73: ; preds = %70, %65
%74 = load i8*, i8** %9
%75 = call i32 @strspn(i8* %74, i8* getelementptr inbounds ([14 x i8], [14 x i8]* @.str, i64 0, i64 0))
store i32 %75, i32* %12
%76 = load i32, i32* %12
%77 = icmp sle i32 %76, 0
br i1 %77, label %78, label %79
78: ; preds = %73
store i32 0, i32* %4
br label %106
79: ; preds = %73
%80 = getelementptr inbounds [80 x i8], [80 x i8]* %11, i64 0, i64 0
%81 = load i8*, i8** %9
%82 = load i32, i32* %12
%83 = call i32 @strncpy(i8* %80, i8* %81, i32 %82)
%84 = load i32, i32* %12
%85 = sext i32 %84 to i64
%86 = getelementptr inbounds [80 x i8], [80 x i8]* %11, i64 0, i64 %85
store i8 0, i8* %86
%87 = getelementptr inbounds [80 x i8], [80 x i8]* %11, i64 0, i64 0
%88 = load double*, double** %7
%89 = call i32 @sscanf(i8* %87, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.1, i64 0, i64 0), double* %88)
%90 = icmp ne i32 %89, 1
br i1 %90, label %91, label %92
91: ; preds = %79
store i32 0, i32* %4
br label %106
92: ; preds = %79
%93 = load i8, i8* %10
%94 = sext i8 %93 to i32
%95 = icmp eq i32 87, %94
br i1 %95, label %100, label %96
96: ; preds = %92
%97 = load i8, i8* %10
%98 = sext i8 %97 to i32
%99 = icmp eq i32 83, %98
br i1 %99, label %100, label %105
100: ; preds = %96, %92
%101 = load double*, double** %7
%102 = load double, double* %101
%103 = fneg double %102
%104 = load double*, double** %7
store double %103, double* %104
br label %105
105: ; preds = %100, %96
store i32 1, i32* %4
br label %106
106: ; preds = %105, %91, %78, %33
%107 = load i32, i32* %4
ret i32 %107
}

LLVM IR (-O2):
@.str = [14 x i8] c"0123456789.+-\00"
@.str.1 = [4 x i8] c"%lf\00"
define i32 @lat_lon_decode(i8* %0, i8* nocapture %1, double* %2) {
%4 = alloca [80 x i8]
%5 = getelementptr inbounds [80 x i8], [80 x i8]* %4, i64 0, i64 0
%6 = tail call i8* @strchr(i8* dereferenceable(1) %0, i8 signext 10)
%7 = icmp eq i8* %6, null
br i1 %7, label %8, label %12
8: ; preds = %3
%9 = tail call i32 @strlen(i8* %0)
%10 = sext i32 %9 to i64
%11 = getelementptr inbounds i8, i8* %0, i64 %10
br label %12
12: ; preds = %8, %3
%13 = phi i8* [ %11, %8 ], [ %6, %3 ]
%14 = tail call i8* @strpbrk(i8* %0, i8* %1)
%15 = icmp eq i8* %14, null
%16 = icmp ugt i8* %14, %13
%17 = select i1 %15, i1 true, i1 %16
br i1 %17, label %62, label %18
18: ; preds = %12
%19 = load i8, i8* %14
%20 = tail call signext i8 @toupper(i8 signext %19)
br label %21
21: ; preds = %24, %18
%22 = phi i8* [ %14, %18 ], [ %25, %24 ]
%23 = icmp ugt i8* %22, %0
br i1 %23, label %24, label %29
24: ; preds = %21
%25 = getelementptr inbounds i8, i8* %22, i64 -1
%26 = load i8, i8* %25
%27 = tail call i64 @isspace(i8 signext %26)
%28 = icmp eq i64 %27, 0
br i1 %28, label %29, label %21
29: ; preds = %21, %24
%30 = phi i8* [ %22, %21 ], [ %25, %24 ]
br label %31
31: ; preds = %29, %36
%32 = phi i8* [ %37, %36 ], [ %30, %29 ]
%33 = icmp ugt i8* %32, %0
br i1 %33, label %36, label %34
34: ; preds = %31
%35 = load i8, i8* %32
br label %41
36: ; preds = %31
%37 = getelementptr inbounds i8, i8* %32, i64 -1
%38 = load i8, i8* %37
%39 = tail call i8* @strchr(i8* dereferenceable(14) getelementptr inbounds ([14 x i8], [14 x i8]* @.str, i64 0, i64 0), i8 signext %38)
%40 = icmp eq i8* %39, null
br i1 %40, label %41, label %31
41: ; preds = %36, %34
%42 = phi i8 [ %35, %34 ], [ %38, %36 ]
%43 = phi i8* [ %32, %34 ], [ %37, %36 ]
%44 = tail call i8* @strchr(i8* dereferenceable(14) getelementptr inbounds ([14 x i8], [14 x i8]* @.str, i64 0, i64 0), i8 signext %42)
%45 = icmp eq i8* %44, null
%46 = zext i1 %45 to i64
%47 = getelementptr i8, i8* %43, i64 %46
%48 = tail call i32 @strspn(i8* %47, i8* getelementptr inbounds ([14 x i8], [14 x i8]* @.str, i64 0, i64 0))
%49 = icmp slt i32 %48, 1
br i1 %49, label %62, label %50
50: ; preds = %41
%51 = call i32 @strncpy(i8* %5, i8* %47, i32 %48)
%52 = zext i32 %48 to i64
%53 = getelementptr inbounds [80 x i8], [80 x i8]* %4, i64 0, i64 %52
store i8 0, i8* %53
%54 = call i32 @sscanf(i8* %5, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.1, i64 0, i64 0), double* %2)
%55 = icmp eq i32 %54, 1
br i1 %55, label %56, label %62
56: ; preds = %50
%57 = and i8 %20, -5
%58 = icmp eq i8 %57, 83
br i1 %58, label %59, label %62
59: ; preds = %56
%60 = load double, double* %2
%61 = fneg double %60
store double %61, double* %2
br label %62
62: ; preds = %59, %56, %50, %41, %12
%63 = phi i32 [ 0, %12 ], [ 0, %41 ], [ 0, %50 ], [ 1, %56 ], [ 1, %59 ]
ret i32 %63
}