#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 */
int DBL_MIN;
int /*<<< orphan*/ exit(int);
double const fabs(double);
int /*<<< orphan*/ fprintf(int /*<<< orphan*/, char *, char const *);
int /*<<< orphan*/ stderr;
double beta_help(double a, double b, double x, const char *prompt) {
  int m, m2;
  double aa, c, d, del, h, qab, qam, qap;
  double const very_small = 1000 * DBL_MIN;
  static const double eps = 3e-07;
  qab = a + b;
  qap = a + 1;
  qam = a - 1;
  c = 1;
  d = 1 - qab * x / qap;
  if (fabs(d) < very_small)
    d = very_small;
  d = 1 / d;
  h = d;
  for (m = 1; m <= 100; m++) {
    m2 = 2 * m;
    aa = m * (b - m) * x / ((qam + m2) * (a + m2));
    d = 1 + aa * d;
    if (fabs(d) < very_small)
      d = very_small;
    c = 1 + aa / c;
    if (fabs(c) < very_small)
      c = very_small;
    d = 1 / d;
    h *= d * c;
    aa = -(a + m) * (qab + m) * x / ((a + m2) * (qap + m2));
    d = 1 + aa * d;
    if (fabs(d) < very_small)
      d = very_small;
    c = 1 + aa / c;
    if (fabs(c) < very_small)
      c = very_small;
    d = 1 / d;
    del = d * c;
    h *= del;
    if (fabs(del - 1.0) < eps)
      return h;
  }
  fprintf(stderr, "%s: ERROR! Too many iterations in routine \"beta_help\"!\n",
          prompt);
  exit(1);
  return -1;
}


x86 assembly (clang, -O0):
<beta_help>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
movsd  %xmm0,-0x8(%rbp)
movsd  %xmm1,-0x10(%rbp)
movsd  %xmm2,-0x18(%rbp)
mov    %rdi,-0x20(%rbp)
mov    0x2e86(%rip),%rax
imul   $0x3e8,(%rax),%eax
cvtsi2sd %eax,%xmm0
movsd  %xmm0,-0x70(%rbp)
movsd  -0x8(%rbp),%xmm0
addsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  0xe88(%rip),%xmm0
addsd  -0x8(%rbp),%xmm0
movsd  %xmm0,-0x68(%rbp)
movsd  -0x8(%rbp),%xmm0
movsd  0xe71(%rip),%xmm1
subsd  %xmm1,%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  0xe60(%rip),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x58(%rbp),%xmm1
mulsd  -0x18(%rbp),%xmm1
divsd  -0x68(%rbp),%xmm1
movsd  0xe44(%rip),%xmm0
subsd  %xmm1,%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x40(%rbp),%xmm0
call   1030 <fabs@plt>
movaps %xmm0,%xmm1
movsd  -0x70(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    11eb <beta_help+0xbb>
movsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  0xe0d(%rip),%xmm0
divsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
movl   $0x1,-0x24(%rbp)
cmpl   $0x64,-0x24(%rbp)
jg     1476 <beta_help+0x346>
mov    -0x24(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x28(%rbp)
cvtsi2sdl -0x24(%rbp),%xmm0
movsd  -0x10(%rbp),%xmm1
cvtsi2sdl -0x24(%rbp),%xmm2
subsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
mulsd  -0x18(%rbp),%xmm0
movsd  -0x60(%rbp),%xmm1
cvtsi2sdl -0x28(%rbp),%xmm2
addsd  %xmm2,%xmm1
movsd  -0x8(%rbp),%xmm2
cvtsi2sdl -0x28(%rbp),%xmm3
addsd  %xmm3,%xmm2
mulsd  %xmm2,%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x30(%rbp),%xmm0
movsd  -0x40(%rbp),%xmm1
mulsd  %xmm1,%xmm0
movsd  0xd84(%rip),%xmm1
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x40(%rbp),%xmm0
call   1030 <fabs@plt>
movaps %xmm0,%xmm1
movsd  -0x70(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    12ab <beta_help+0x17b>
movsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x30(%rbp),%xmm1
divsd  -0x38(%rbp),%xmm1
movsd  0xd43(%rip),%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x38(%rbp),%xmm0
call   1030 <fabs@plt>
movaps %xmm0,%xmm1
movsd  -0x70(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    12ec <beta_help+0x1bc>
movsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  0xd0c(%rip),%xmm0
divsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x40(%rbp),%xmm0
mulsd  -0x38(%rbp),%xmm0
mulsd  -0x50(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  -0x8(%rbp),%xmm0
cvtsi2sdl -0x24(%rbp),%xmm1
addsd  %xmm1,%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  -0x58(%rbp),%xmm1
cvtsi2sdl -0x24(%rbp),%xmm2
addsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
mulsd  -0x18(%rbp),%xmm0
movsd  -0x8(%rbp),%xmm1
cvtsi2sdl -0x28(%rbp),%xmm2
addsd  %xmm2,%xmm1
movsd  -0x68(%rbp),%xmm2
cvtsi2sdl -0x28(%rbp),%xmm3
addsd  %xmm3,%xmm2
mulsd  %xmm2,%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x30(%rbp),%xmm0
movsd  -0x40(%rbp),%xmm1
mulsd  %xmm1,%xmm0
movsd  0xc73(%rip),%xmm1
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x40(%rbp),%xmm0
call   1030 <fabs@plt>
movaps %xmm0,%xmm1
movsd  -0x70(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    13bc <beta_help+0x28c>
movsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x30(%rbp),%xmm1
divsd  -0x38(%rbp),%xmm1
movsd  0xc32(%rip),%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x38(%rbp),%xmm0
call   1030 <fabs@plt>
movaps %xmm0,%xmm1
movsd  -0x70(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jbe    13fd <beta_help+0x2cd>
movsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  0xbfb(%rip),%xmm0
divsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x40(%rbp),%xmm0
mulsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
movsd  -0x48(%rbp),%xmm0
mulsd  -0x50(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  -0x48(%rbp),%xmm0
movsd  0xbc6(%rip),%xmm1
subsd  %xmm1,%xmm0
call   1030 <fabs@plt>
movaps %xmm0,%xmm1
movsd  0xbba(%rip),%xmm0
ucomisd %xmm1,%xmm0
jbe    1463 <beta_help+0x333>
movsd  -0x50(%rbp),%xmm0
add    $0x70,%rsp
pop    %rbp
ret
jmp    1468 <beta_help+0x338>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    120e <beta_help+0xde>
mov    0x2b63(%rip),%rax
mov    (%rax),%edi
mov    -0x20(%rbp),%rdx
lea    0xb8e(%rip),%rsi
call   1040 <fprintf@plt>
mov    $0x1,%edi
call   1050 <exit@plt>

x86 assembly (clang, -O2):
<beta_help>:
sub    $0x18,%rsp
mov    0x2ead(%rip),%rax
imul   $0x3e8,(%rax),%eax
mov    %rdi,%rdx
movapd %xmm0,%xmm9
cvtsi2sd %eax,%xmm12
movsd  %xmm1,0x10(%rsp)
addsd  %xmm1,%xmm0
movsd  0xeaf(%rip),%xmm15
movapd %xmm9,%xmm13
addsd  %xmm15,%xmm13
movsd  0xea5(%rip),%xmm1
addsd  %xmm9,%xmm1
movsd  %xmm1,(%rsp)
movsd  %xmm0,0x8(%rsp)
movapd %xmm0,%xmm1
mulsd  %xmm2,%xmm1
divsd  %xmm13,%xmm1
movapd %xmm15,%xmm3
subsd  %xmm1,%xmm3
movapd 0xe8f(%rip),%xmm1
andpd  %xmm3,%xmm1
cmpltsd %xmm12,%xmm1
movapd %xmm1,%xmm5
andnpd %xmm3,%xmm5
andpd  %xmm12,%xmm1
orpd   %xmm5,%xmm1
movapd %xmm15,%xmm6
divsd  %xmm1,%xmm6
mov    $0x1,%eax
mov    $0x2,%ecx
movapd 0xe58(%rip),%xmm14
movapd %xmm15,%xmm7
movapd %xmm6,%xmm0
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
xorps  %xmm5,%xmm5
cvtsi2sd %eax,%xmm5
movsd  0x10(%rsp),%xmm1
subsd  %xmm5,%xmm1
mulsd  %xmm5,%xmm1
mulsd  %xmm2,%xmm1
xorps  %xmm10,%xmm10
cvtsi2sd %ecx,%xmm10
movsd  (%rsp),%xmm8
addsd  %xmm10,%xmm8
movapd %xmm10,%xmm11
addsd  %xmm9,%xmm11
mulsd  %xmm11,%xmm8
divsd  %xmm8,%xmm1
mulsd  %xmm1,%xmm6
addsd  %xmm15,%xmm6
movapd %xmm6,%xmm4
andpd  %xmm14,%xmm4
cmpltsd %xmm12,%xmm4
movapd %xmm4,%xmm3
andnpd %xmm6,%xmm3
andpd  %xmm12,%xmm4
orpd   %xmm3,%xmm4
divsd  %xmm7,%xmm1
addsd  %xmm15,%xmm1
movapd %xmm1,%xmm6
andpd  %xmm14,%xmm6
cmpltsd %xmm12,%xmm6
movapd %xmm6,%xmm3
andnpd %xmm1,%xmm3
andpd  %xmm12,%xmm6
orpd   %xmm3,%xmm6
movapd %xmm15,%xmm1
divsd  %xmm4,%xmm1
movapd %xmm1,%xmm3
mulsd  %xmm6,%xmm3
mulsd  %xmm3,%xmm0
movsd  0x8(%rsp),%xmm3
addsd  %xmm5,%xmm3
addsd  %xmm9,%xmm5
xorpd  0xd91(%rip),%xmm5
mulsd  %xmm3,%xmm5
mulsd  %xmm2,%xmm5
addsd  %xmm13,%xmm10
mulsd  %xmm11,%xmm10
divsd  %xmm10,%xmm5
mulsd  %xmm5,%xmm1
addsd  %xmm15,%xmm1
movapd %xmm1,%xmm3
andpd  %xmm14,%xmm3
cmpltsd %xmm12,%xmm3
movapd %xmm3,%xmm4
andnpd %xmm1,%xmm4
andpd  %xmm12,%xmm3
orpd   %xmm4,%xmm3
divsd  %xmm6,%xmm5
addsd  %xmm15,%xmm5
movapd %xmm5,%xmm7
andpd  %xmm14,%xmm7
cmpltsd %xmm12,%xmm7
movapd %xmm7,%xmm1
andnpd %xmm5,%xmm1
andpd  %xmm12,%xmm7
orpd   %xmm1,%xmm7
movapd %xmm15,%xmm6
divsd  %xmm3,%xmm6
movapd %xmm6,%xmm1
mulsd  %xmm7,%xmm1
mulsd  %xmm1,%xmm0
addsd  0xce3(%rip),%xmm1
andpd  %xmm14,%xmm1
movsd  0xcde(%rip),%xmm3
ucomisd %xmm1,%xmm3
ja     1369 <beta_help+0x249>
add    $0x1,%eax
add    $0x2,%ecx
cmp    $0xca,%ecx
jne    11e0 <beta_help+0xc0>
mov    0x2c8f(%rip),%rax
mov    (%rax),%edi
lea    0xce6(%rip),%rsi
call   1030 <fprintf@plt>
mov    $0x1,%edi
call   1040 <exit@plt>
add    $0x18,%rsp
ret

LLVM IR (-O0):
@DBL_MIN = global i32 0
@beta_help.eps = internal constant double 3.000000e-07
@stderr = global i32 0
@.str = [56 x i8] c"%s: ERROR! Too many iterations in routine \22beta_help\22!\0A\00"
define double @beta_help(double %0, double %1, double %2, i8* %3) {
%5 = alloca double
%6 = alloca double
%7 = alloca double
%8 = alloca i8*
%9 = alloca i32
%10 = alloca i32
%11 = alloca double
%12 = alloca double
%13 = alloca double
%14 = alloca double
%15 = alloca double
%16 = alloca double
%17 = alloca double
%18 = alloca double
%19 = alloca double
store double %0, double* %5
store double %1, double* %6
store double %2, double* %7
store i8* %3, i8** %8
%20 = load i32, i32* @DBL_MIN
%21 = mul nsw i32 1000, %20
%22 = sitofp i32 %21 to double
store double %22, double* %19
%23 = load double, double* %5
%24 = load double, double* %6
%25 = fadd double %23, %24
store double %25, double* %16
%26 = load double, double* %5
%27 = fadd double %26, 1.000000e+00
store double %27, double* %18
%28 = load double, double* %5
%29 = fsub double %28, 1.000000e+00
store double %29, double* %17
store double 1.000000e+00, double* %12
%30 = load double, double* %16
%31 = load double, double* %7
%32 = fmul double %30, %31
%33 = load double, double* %18
%34 = fdiv double %32, %33
%35 = fsub double 1.000000e+00, %34
store double %35, double* %13
%36 = load double, double* %13
%37 = call double @fabs(double %36)
%38 = load double, double* %19
%39 = fcmp olt double %37, %38
br i1 %39, label %40, label %42
40: ; preds = %4
%41 = load double, double* %19
store double %41, double* %13
br label %42
42: ; preds = %40, %4
%43 = load double, double* %13
%44 = fdiv double 1.000000e+00, %43
store double %44, double* %13
%45 = load double, double* %13
store double %45, double* %15
store i32 1, i32* %9
br label %46
46: ; preds = %157, %42
%47 = load i32, i32* %9
%48 = icmp sle i32 %47, 100
br i1 %48, label %49, label %160
49: ; preds = %46
%50 = load i32, i32* %9
%51 = mul nsw i32 2, %50
store i32 %51, i32* %10
%52 = load i32, i32* %9
%53 = sitofp i32 %52 to double
%54 = load double, double* %6
%55 = load i32, i32* %9
%56 = sitofp i32 %55 to double
%57 = fsub double %54, %56
%58 = fmul double %53, %57
%59 = load double, double* %7
%60 = fmul double %58, %59
%61 = load double, double* %17
%62 = load i32, i32* %10
%63 = sitofp i32 %62 to double
%64 = fadd double %61, %63
%65 = load double, double* %5
%66 = load i32, i32* %10
%67 = sitofp i32 %66 to double
%68 = fadd double %65, %67
%69 = fmul double %64, %68
%70 = fdiv double %60, %69
store double %70, double* %11
%71 = load double, double* %11
%72 = load double, double* %13
%73 = call double @llvm.fmuladd.f64(double %71, double %72, double 1.000000e+00)
store double %73, double* %13
%74 = load double, double* %13
%75 = call double @fabs(double %74)
%76 = load double, double* %19
%77 = fcmp olt double %75, %76
br i1 %77, label %78, label %80
78: ; preds = %49
%79 = load double, double* %19
store double %79, double* %13
br label %80
80: ; preds = %78, %49
%81 = load double, double* %11
%82 = load double, double* %12
%83 = fdiv double %81, %82
%84 = fadd double 1.000000e+00, %83
store double %84, double* %12
%85 = load double, double* %12
%86 = call double @fabs(double %85)
%87 = load double, double* %19
%88 = fcmp olt double %86, %87
br i1 %88, label %89, label %91
89: ; preds = %80
%90 = load double, double* %19
store double %90, double* %12
br label %91
91: ; preds = %89, %80
%92 = load double, double* %13
%93 = fdiv double 1.000000e+00, %92
store double %93, double* %13
%94 = load double, double* %13
%95 = load double, double* %12
%96 = fmul double %94, %95
%97 = load double, double* %15
%98 = fmul double %97, %96
store double %98, double* %15
%99 = load double, double* %5
%100 = load i32, i32* %9
%101 = sitofp i32 %100 to double
%102 = fadd double %99, %101
%103 = fneg double %102
%104 = load double, double* %16
%105 = load i32, i32* %9
%106 = sitofp i32 %105 to double
%107 = fadd double %104, %106
%108 = fmul double %103, %107
%109 = load double, double* %7
%110 = fmul double %108, %109
%111 = load double, double* %5
%112 = load i32, i32* %10
%113 = sitofp i32 %112 to double
%114 = fadd double %111, %113
%115 = load double, double* %18
%116 = load i32, i32* %10
%117 = sitofp i32 %116 to double
%118 = fadd double %115, %117
%119 = fmul double %114, %118
%120 = fdiv double %110, %119
store double %120, double* %11
%121 = load double, double* %11
%122 = load double, double* %13
%123 = call double @llvm.fmuladd.f64(double %121, double %122, double 1.000000e+00)
store double %123, double* %13
%124 = load double, double* %13
%125 = call double @fabs(double %124)
%126 = load double, double* %19
%127 = fcmp olt double %125, %126
br i1 %127, label %128, label %130
128: ; preds = %91
%129 = load double, double* %19
store double %129, double* %13
br label %130
130: ; preds = %128, %91
%131 = load double, double* %11
%132 = load double, double* %12
%133 = fdiv double %131, %132
%134 = fadd double 1.000000e+00, %133
store double %134, double* %12
%135 = load double, double* %12
%136 = call double @fabs(double %135)
%137 = load double, double* %19
%138 = fcmp olt double %136, %137
br i1 %138, label %139, label %141
139: ; preds = %130
%140 = load double, double* %19
store double %140, double* %12
br label %141
141: ; preds = %139, %130
%142 = load double, double* %13
%143 = fdiv double 1.000000e+00, %142
store double %143, double* %13
%144 = load double, double* %13
%145 = load double, double* %12
%146 = fmul double %144, %145
store double %146, double* %14
%147 = load double, double* %14
%148 = load double, double* %15
%149 = fmul double %148, %147
store double %149, double* %15
%150 = load double, double* %14
%151 = fsub double %150, 1.000000e+00
%152 = call double @fabs(double %151)
%153 = fcmp olt double %152, 3.000000e-07
br i1 %153, label %154, label %156
154: ; preds = %141
%155 = load double, double* %15
ret double %155
156: ; preds = %141
br label %157
157: ; preds = %156
%158 = load i32, i32* %9
%159 = add nsw i32 %158, 1
store i32 %159, i32* %9
br label %46
160: ; preds = %46
%161 = load i32, i32* @stderr
%162 = load i8*, i8** %8
%163 = call i32 @fprintf(i32 %161, i8* getelementptr inbounds ([56 x i8], [56 x i8]* @.str, i64 0, i64 0), i8* %162)
%164 = call i32 @exit(i32 1)
unreachable
}

LLVM IR (-O2):
@DBL_MIN = global i32 0
@stderr = global i32 0
@.str = [56 x i8] c"%s: ERROR! Too many iterations in routine \22beta_help\22!\0A\00"
define double @beta_help(double %0, double %1, double %2, i8* %3) {
%5 = load i32, i32* @DBL_MIN
%6 = mul nsw i32 %5, 1000
%7 = sitofp i32 %6 to double
%8 = fadd double %0, %1
%9 = fadd double %0, 1.000000e+00
%10 = fadd double %0, -1.000000e+00
%11 = fmul double %8, %2
%12 = fdiv double %11, %9
%13 = fsub double 1.000000e+00, %12
%14 = tail call double @llvm.fabs.f64(double %13)
%15 = fcmp olt double %14, %7
%16 = select i1 %15, double %7, double %13
%17 = fdiv double 1.000000e+00, %16
br label %21
18: ; preds = %21
%19 = add nuw nsw i32 %22, 1
%20 = icmp eq i32 %19, 101
br i1 %20, label %72, label %21
21: ; preds = %4, %18
%22 = phi i32 [ 1, %4 ], [ %19, %18 ]
%23 = phi double [ 1.000000e+00, %4 ], [ %64, %18 ]
%24 = phi double [ %17, %4 ], [ %65, %18 ]
%25 = phi double [ %17, %4 ], [ %67, %18 ]
%26 = shl nuw nsw i32 %22, 1
%27 = sitofp i32 %22 to double
%28 = fsub double %1, %27
%29 = fmul double %28, %27
%30 = fmul double %29, %2
%31 = sitofp i32 %26 to double
%32 = fadd double %10, %31
%33 = fadd double %31, %0
%34 = fmul double %32, %33
%35 = fdiv double %30, %34
%36 = tail call double @llvm.fmuladd.f64(double %35, double %24, double 1.000000e+00)
%37 = tail call double @llvm.fabs.f64(double %36)
%38 = fcmp olt double %37, %7
%39 = select i1 %38, double %7, double %36
%40 = fdiv double %35, %23
%41 = fadd double %40, 1.000000e+00
%42 = tail call double @llvm.fabs.f64(double %41)
%43 = fcmp olt double %42, %7
%44 = select i1 %43, double %7, double %41
%45 = fdiv double 1.000000e+00, %39
%46 = fmul double %45, %44
%47 = fmul double %25, %46
%48 = fadd double %27, %0
%49 = fneg double %48
%50 = fadd double %8, %27
%51 = fmul double %50, %49
%52 = fmul double %51, %2
%53 = fadd double %9, %31
%54 = fmul double %33, %53
%55 = fdiv double %52, %54
%56 = tail call double @llvm.fmuladd.f64(double %55, double %45, double 1.000000e+00)
%57 = tail call double @llvm.fabs.f64(double %56)
%58 = fcmp olt double %57, %7
%59 = select i1 %58, double %7, double %56
%60 = fdiv double %55, %44
%61 = fadd double %60, 1.000000e+00
%62 = tail call double @llvm.fabs.f64(double %61)
%63 = fcmp olt double %62, %7
%64 = select i1 %63, double %7, double %61
%65 = fdiv double 1.000000e+00, %59
%66 = fmul double %65, %64
%67 = fmul double %47, %66
%68 = fadd double %66, -1.000000e+00
%69 = tail call double @llvm.fabs.f64(double %68)
%70 = fcmp olt double %69, 3.000000e-07
br i1 %70, label %71, label %18
71: ; preds = %21
ret double %67
72: ; preds = %18
%73 = load i32, i32* @stderr
%74 = tail call i32 @fprintf(i32 %73, i8* getelementptr inbounds ([56 x i8], [56 x i8]* @.str, i64 0, i64 0), i8* %3)
%75 = tail call i32 @exit(i32 1)
unreachable
}