double ReadBearing(input)
char *input;
{
  char string[20];
  double bearing = 0.0, seconds;
  int a, b, length, degrees, minutes;
  string[0] = 0;
  length = strlen(input);
  for (a = 0, b = 0; a < length && a < 18; a++) {
    if ((input[a] != 32 && input[a] != '\n') ||
        (input[a] == 32 && input[a + 1] != 32 && b != 0)) {
      string[b] = input[a];
      b++;
    }
  }
  string[b] = 0;
  length = strlen(string);
  for (a = 0, b = 0; a < length; a++)
    if (string[a] == 32)
      b++;
  if (b == 0)
    sscanf(string, "%lf", &bearing);
  if (b == 2) {
    sscanf(string, "%d %d %lf", &degrees, &minutes, &seconds);
    if (degrees < 0.0) {
      minutes = -minutes;
      seconds = -seconds;
    }
    bearing = (double)degrees + ((double)minutes / 60) + (seconds / 3600);
  }
  if (bearing > 360.0 || bearing < -360.0)
    bearing = 0.0;
  return bearing;
}


x86 assembly (clang, -O0):
<ReadBearing>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x8(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x28(%rbp)
movb   $0x0,-0x20(%rbp)
mov    -0x8(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x3c(%rbp)
movl   $0x0,-0x34(%rbp)
movl   $0x0,-0x38(%rbp)
mov    -0x34(%rbp),%ecx
xor    %eax,%eax
cmp    -0x3c(%rbp),%ecx
mov    %al,-0x45(%rbp)
jge    116d <ReadBearing+0x4d>
cmpl   $0x12,-0x34(%rbp)
setl   %al
mov    %al,-0x45(%rbp)
mov    -0x45(%rbp),%al
test   $0x1,%al
jne    117d <ReadBearing+0x5d>
jmp    120f <ReadBearing+0xef>
mov    -0x8(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x20,%eax
je     11a7 <ReadBearing+0x87>
mov    -0x8(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0xa,%eax
jne    11e0 <ReadBearing+0xc0>
mov    -0x8(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x20,%eax
jne    11fc <ReadBearing+0xdc>
mov    -0x8(%rbp),%rax
mov    -0x34(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x20,%eax
je     11fc <ReadBearing+0xdc>
cmpl   $0x0,-0x38(%rbp)
je     11fc <ReadBearing+0xdc>
mov    -0x8(%rbp),%rax
movslq -0x34(%rbp),%rcx
mov    (%rax,%rcx,1),%cl
movslq -0x38(%rbp),%rax
mov    %cl,-0x20(%rbp,%rax,1)
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    1201 <ReadBearing+0xe1>
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    1152 <ReadBearing+0x32>
movslq -0x38(%rbp),%rax
movb   $0x0,-0x20(%rbp,%rax,1)
lea    -0x20(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x3c(%rbp)
movl   $0x0,-0x34(%rbp)
movl   $0x0,-0x38(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x3c(%rbp),%eax
jge    126c <ReadBearing+0x14c>
movslq -0x34(%rbp),%rax
movsbl -0x20(%rbp,%rax,1),%eax
cmp    $0x20,%eax
jne    1259 <ReadBearing+0x139>
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    125e <ReadBearing+0x13e>
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    1232 <ReadBearing+0x112>
cmpl   $0x0,-0x38(%rbp)
jne    128c <ReadBearing+0x16c>
lea    -0x20(%rbp),%rdi
lea    0xda5(%rip),%rsi
lea    -0x28(%rbp),%rdx
mov    $0x0,%al
call   1040 <sscanf@plt>
cmpl   $0x2,-0x38(%rbp)
jne    1323 <ReadBearing+0x203>
lea    -0x20(%rbp),%rdi
lea    0xd7f(%rip),%rsi
lea    -0x40(%rbp),%rdx
lea    -0x44(%rbp),%rcx
lea    -0x30(%rbp),%r8
mov    $0x0,%al
call   1040 <sscanf@plt>
cvtsi2sdl -0x40(%rbp),%xmm1
xorps  %xmm0,%xmm0
ucomisd %xmm1,%xmm0
jbe    12ef <ReadBearing+0x1cf>
xor    %eax,%eax
sub    -0x44(%rbp),%eax
mov    %eax,-0x44(%rbp)
movsd  -0x30(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x30(%rbp)
cvtsi2sdl -0x40(%rbp),%xmm0
cvtsi2sdl -0x44(%rbp),%xmm1
movsd  0xd07(%rip),%xmm2
divsd  %xmm2,%xmm1
addsd  %xmm1,%xmm0
movsd  -0x30(%rbp),%xmm1
movsd  0xcea(%rip),%xmm2
divsd  %xmm2,%xmm1
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x28(%rbp),%xmm0
movsd  0xce0(%rip),%xmm1
ucomisd %xmm1,%xmm0
ja     134d <ReadBearing+0x22d>
movsd  0xcd6(%rip),%xmm0
ucomisd -0x28(%rbp),%xmm0
jbe    1355 <ReadBearing+0x235>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x28(%rbp),%xmm0
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ReadBearing>:
push   %rbx
sub    $0x40,%rsp
mov    %rdi,%rbx
movq   $0x0,0x38(%rsp)
movb   $0x0,0x20(%rsp)
call   1030 <strlen@plt>
test   %eax,%eax
jle    118e <ReadBearing+0x6e>
add    $0xffffffff,%eax
cmp    $0x11,%eax
mov    $0x11,%esi
cmovb  %eax,%esi
add    $0x1,%esi
xor    %edx,%edx
xor    %eax,%eax
jmp    1173 <ReadBearing+0x53>
cs nopw 0x0(%rax,%rax,1)
movslq %eax,%rdi
mov    %cl,0x20(%rsp,%rdi,1)
add    $0x1,%eax
add    $0x1,%rdx
cmp    %rdx,%rsi
je     1190 <ReadBearing+0x70>
movzbl (%rbx,%rdx,1),%ecx
cmp    $0xa,%cl
je     116a <ReadBearing+0x4a>
cmp    $0x20,%cl
jne    1160 <ReadBearing+0x40>
cmpb   $0x20,0x1(%rbx,%rdx,1)
je     116a <ReadBearing+0x4a>
test   %eax,%eax
jne    1160 <ReadBearing+0x40>
jmp    116a <ReadBearing+0x4a>
xor    %eax,%eax
cltq
movb   $0x0,0x20(%rsp,%rax,1)
lea    0x20(%rsp),%rdi
call   1030 <strlen@plt>
test   %eax,%eax
jle    1266 <ReadBearing+0x146>
mov    %eax,%ecx
cmp    $0x8,%rcx
jae    11ba <ReadBearing+0x9a>
xor    %edx,%edx
xor    %esi,%esi
jmp    1240 <ReadBearing+0x120>
and    $0x7,%eax
mov    %rcx,%rdx
sub    %rax,%rdx
pxor   %xmm0,%xmm0
xor    %esi,%esi
movdqa 0xe2f(%rip),%xmm2
movdqa 0xe37(%rip),%xmm3
pxor   %xmm1,%xmm1
nopl   (%rax)
movq   0x20(%rsp,%rsi,1),%xmm4
movd   0x24(%rsp,%rsi,1),%xmm5
pcmpeqb %xmm2,%xmm4
punpcklbw %xmm4,%xmm4
punpcklwd %xmm4,%xmm4
pand   %xmm3,%xmm4
paddd  %xmm4,%xmm0
pcmpeqb %xmm2,%xmm5
punpcklbw %xmm5,%xmm5
punpcklwd %xmm5,%xmm5
pand   %xmm3,%xmm5
paddd  %xmm5,%xmm1
add    $0x8,%rsi
cmp    %rsi,%rdx
jne    11e0 <ReadBearing+0xc0>
paddd  %xmm0,%xmm1
pshufd $0xee,%xmm1,%xmm0
paddd  %xmm1,%xmm0
pshufd $0x55,%xmm0,%xmm1
paddd  %xmm0,%xmm1
movd   %xmm1,%esi
test   %rax,%rax
je     1255 <ReadBearing+0x135>
nopl   0x0(%rax)
xor    %eax,%eax
cmpb   $0x20,0x20(%rsp,%rdx,1)
sete   %al
add    %eax,%esi
add    $0x1,%rdx
cmp    %rdx,%rcx
jne    1240 <ReadBearing+0x120>
cmp    $0x2,%esi
je     1286 <ReadBearing+0x166>
pxor   %xmm1,%xmm1
test   %esi,%esi
jne    1300 <ReadBearing+0x1e0>
lea    0xde9(%rip),%rsi
lea    0x20(%rsp),%rdi
lea    0x38(%rsp),%rdx
xor    %eax,%eax
call   1040 <sscanf@plt>
movq   0x38(%rsp),%xmm1
jmp    1300 <ReadBearing+0x1e0>
lea    0xdc3(%rip),%rsi
lea    0x20(%rsp),%rdi
lea    0x1c(%rsp),%rdx
lea    0xc(%rsp),%rcx
lea    0x10(%rsp),%r8
xor    %eax,%eax
call   1040 <sscanf@plt>
mov    0x1c(%rsp),%eax
mov    0xc(%rsp),%ecx
test   %eax,%eax
js     12bc <ReadBearing+0x19c>
movsd  0x10(%rsp),%xmm0
jmp    12d6 <ReadBearing+0x1b6>
neg    %ecx
mov    %ecx,0xc(%rsp)
movsd  0x10(%rsp),%xmm0
xorpd  0xd50(%rip),%xmm0
movlpd %xmm0,0x10(%rsp)
xorps  %xmm2,%xmm2
cvtsi2sd %eax,%xmm2
xorps  %xmm1,%xmm1
cvtsi2sd %ecx,%xmm1
unpcklpd %xmm1,%xmm0
divpd  0xd40(%rip),%xmm0
movapd %xmm0,%xmm1
unpckhpd %xmm0,%xmm1
addsd  %xmm2,%xmm1
addsd  %xmm0,%xmm1
movsd  0xd38(%rip),%xmm0
cmpltsd %xmm1,%xmm0
movapd %xmm1,%xmm2
cmpltsd 0xd2e(%rip),%xmm2
andnpd %xmm1,%xmm2
andnpd %xmm2,%xmm0
add    $0x40,%rsp
pop    %rbx
ret

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

LLVM IR (-O2):
@.str = [4 x i8] c"%lf\00"
@.str.1 = [10 x i8] c"%d %d %lf\00"
define double @ReadBearing(i8* nocapture %0) {
%2 = alloca [20 x i8]
%3 = alloca double
%4 = alloca double
%5 = alloca i32
%6 = alloca i32
%7 = getelementptr inbounds [20 x i8], [20 x i8]* %2, i64 0, i64 0
%8 = bitcast double* %3 to i8*
store double 0.000000e+00, double* %3
%9 = bitcast double* %4 to i8*
%10 = bitcast i32* %5 to i8*
%11 = bitcast i32* %6 to i8*
store i8 0, i8* %7
%12 = tail call i64 @strlen(i8* dereferenceable(1) %0)
%13 = trunc i64 %12 to i32
%14 = icmp sgt i32 %13, 0
br i1 %14, label %15, label %40
15: ; preds = %1
%16 = add nsw i32 %13, -1
%17 = call i32 @llvm.umin.i32(i32 %16, i32 17)
%18 = add nuw nsw i32 %17, 1
%19 = zext i32 %18 to i64
br label %20
20: ; preds = %15, %36
%21 = phi i64 [ 0, %15 ], [ %38, %36 ]
%22 = phi i32 [ 0, %15 ], [ %37, %36 ]
%23 = getelementptr inbounds i8, i8* %0, i64 %21
%24 = load i8, i8* %23
switch i8 %24, label %32 [
i8 32, label %25
i8 10, label %36
]
25: ; preds = %20
%26 = add nuw nsw i64 %21, 1
%27 = getelementptr inbounds i8, i8* %0, i64 %26
%28 = load i8, i8* %27
%29 = icmp ne i8 %28, 32
%30 = icmp ne i32 %22, 0
%31 = select i1 %29, i1 %30, i1 false
br i1 %31, label %32, label %36
32: ; preds = %20, %25
%33 = sext i32 %22 to i64
%34 = getelementptr inbounds [20 x i8], [20 x i8]* %2, i64 0, i64 %33
store i8 %24, i8* %34
%35 = add nsw i32 %22, 1
br label %36
36: ; preds = %20, %25, %32
%37 = phi i32 [ %35, %32 ], [ %22, %25 ], [ %22, %20 ]
%38 = add nuw nsw i64 %21, 1
%39 = icmp eq i64 %38, %19
br i1 %39, label %40, label %20
40: ; preds = %36, %1
%41 = phi i32 [ 0, %1 ], [ %37, %36 ]
%42 = sext i32 %41 to i64
%43 = getelementptr inbounds [20 x i8], [20 x i8]* %2, i64 0, i64 %42
store i8 0, i8* %43
%44 = call i64 @strlen(i8* %7)
%45 = trunc i64 %44 to i32
%46 = icmp sgt i32 %45, 0
br i1 %46, label %47, label %90
47: ; preds = %40
%48 = and i64 %44, 4294967295
%49 = icmp ult i64 %48, 8
br i1 %49, label %75, label %50
50: ; preds = %47
%51 = and i64 %44, 7
%52 = sub nsw i64 %48, %51
br label %53
53: ; preds = %53, %50
%54 = phi i64 [ 0, %50 ], [ %69, %53 ]
%55 = phi <4 x i32> [ zeroinitializer, %50 ], [ %67, %53 ]
%56 = phi <4 x i32> [ zeroinitializer, %50 ], [ %68, %53 ]
%57 = getelementptr inbounds [20 x i8], [20 x i8]* %2, i64 0, i64 %54
%58 = bitcast i8* %57 to <4 x i8>*
%59 = load <4 x i8>, <4 x i8>* %58
%60 = getelementptr inbounds i8, i8* %57, i64 4
%61 = bitcast i8* %60 to <4 x i8>*
%62 = load <4 x i8>, <4 x i8>* %61
%63 = icmp eq <4 x i8> %59, <i8 32, i8 32, i8 32, i8 32>
%64 = icmp eq <4 x i8> %62, <i8 32, i8 32, i8 32, i8 32>
%65 = zext <4 x i1> %63 to <4 x i32>
%66 = zext <4 x i1> %64 to <4 x i32>
%67 = add <4 x i32> %55, %65
%68 = add <4 x i32> %56, %66
%69 = add nuw i64 %54, 8
%70 = icmp eq i64 %69, %52
br i1 %70, label %71, label %53
71: ; preds = %53
%72 = add <4 x i32> %68, %67
%73 = call i32 @llvm.vector.reduce.add.v4i32(<4 x i32> %72)
%74 = icmp eq i64 %51, 0
br i1 %74, label %88, label %75
75: ; preds = %47, %71
%76 = phi i64 [ 0, %47 ], [ %52, %71 ]
%77 = phi i32 [ 0, %47 ], [ %73, %71 ]
br label %78
78: ; preds = %75, %78
%79 = phi i64 [ %86, %78 ], [ %76, %75 ]
%80 = phi i32 [ %85, %78 ], [ %77, %75 ]
%81 = getelementptr inbounds [20 x i8], [20 x i8]* %2, i64 0, i64 %79
%82 = load i8, i8* %81
%83 = icmp eq i8 %82, 32
%84 = zext i1 %83 to i32
%85 = add nuw nsw i32 %80, %84
%86 = add nuw nsw i64 %79, 1
%87 = icmp eq i64 %86, %48
br i1 %87, label %88, label %78
88: ; preds = %78, %71
%89 = phi i32 [ %73, %71 ], [ %85, %78 ]
switch i32 %89, label %116 [
i32 0, label %90
i32 2, label %93
]
90: ; preds = %40, %88
%91 = call i32 (i8*, i8*, ...) @sscanf(i8* %7, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0), double* %3)
%92 = load double, double* %3
br label %116
93: ; preds = %88
%94 = call i32 (i8*, i8*, ...) @sscanf(i8* %7, i8* getelementptr inbounds ([10 x i8], [10 x i8]* @.str.1, i64 0, i64 0), i32* %5, i32* %6, double* %4)
%95 = load i32, i32* %5
%96 = icmp slt i32 %95, 0
%97 = load i32, i32* %6
br i1 %96, label %100, label %98
98: ; preds = %93
%99 = load double, double* %4
br label %104
100: ; preds = %93
%101 = sub nsw i32 0, %97
store i32 %101, i32* %6
%102 = load double, double* %4
%103 = fneg double %102
store double %103, double* %4
br label %104
104: ; preds = %98, %100
%105 = phi double [ %99, %98 ], [ %103, %100 ]
%106 = phi i32 [ %97, %98 ], [ %101, %100 ]
%107 = sitofp i32 %95 to double
%108 = sitofp i32 %106 to double
%109 = insertelement <2 x double> poison, double %105, i64 0
%110 = insertelement <2 x double> %109, double %108, i64 1
%111 = fdiv <2 x double> %110, <double 3.600000e+03, double 6.000000e+01>
%112 = extractelement <2 x double> %111, i64 1
%113 = fadd double %112, %107
%114 = extractelement <2 x double> %111, i64 0
%115 = fadd double %114, %113
br label %116
116: ; preds = %90, %88, %104
%117 = phi double [ %92, %90 ], [ 0.000000e+00, %88 ], [ %115, %104 ]
%118 = fcmp ogt double %117, 3.600000e+02
%119 = fcmp olt double %117, -3.600000e+02
%120 = or i1 %118, %119
%121 = select i1 %120, double 0.000000e+00, double %117
ret double %121
}