int steep(vfs, ffs, nfs, nstep, toler)
int nfs, (*vfs[])(), (*ffs[])();
int nstep;
float toler;
{
  int i, j, ifs;
  float vb, vt, vto;
  float a_max_f(), lam;
  for (i = 0; i < nstep; i++) {
    vb = 0.;
    for (ifs = 0; ifs < nfs; ifs++)
      (*vfs[ifs])(&vb, 0.);
    a_f_zero();
    for (ifs = 0; ifs < nfs; ifs++)
      (*ffs[ifs])(0.);
    lam = a_max_f();
    if (lam <= toler)
      return 1;
    if (lam <= 1.) {
      a_ftodx(1., 0.);
    } else {
      a_ftodx(1. / sqrt(lam), 0.);
    }
    vto = vb;
    lam = 0.;
    for (j = 0; j < 200; j++) {
      vt = 0.;
      lam = lam + .01 * j;
      for (ifs = 0; ifs < nfs; ifs++)
        (*vfs[ifs])(&vt, lam);
      if (vt > vto && j == 0) {
        a_ftodx(0., .1);
      } else if (vt > vto) {
        lam = lam - .01 * j;
        break;
      }
      vto = vt;
    }
    a_inc_d(lam);
  }
  return 0;
}


x86 assembly (clang, -O0):
<steep>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
cvtsd2ss %xmm0,%xmm0
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    %ecx,-0x20(%rbp)
movss  %xmm0,-0x24(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x20(%rbp),%eax
jge    13b4 <steep+0x264>
xorps  %xmm0,%xmm0
movss  %xmm0,-0x34(%rbp)
movl   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    11bf <steep+0x6f>
mov    -0x10(%rbp),%rcx
movslq -0x30(%rbp),%rdx
lea    -0x34(%rbp),%rdi
xorps  %xmm0,%xmm0
mov    $0x1,%al
call   *(%rcx,%rdx,8)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    1191 <steep+0x41>
mov    $0x0,%al
call   1060 <a_f_zero@plt>
movl   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    11f7 <steep+0xa7>
mov    -0x18(%rbp),%rcx
movslq -0x30(%rbp),%rdx
xorps  %xmm0,%xmm0
mov    $0x1,%al
call   *(%rcx,%rdx,8)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    11cd <steep+0x7d>
mov    $0x0,%al
call   1030 <a_max_f@plt>
movss  %xmm0,-0x40(%rbp)
movss  -0x40(%rbp),%xmm1
movss  -0x24(%rbp),%xmm0
ucomiss %xmm1,%xmm0
jb     1222 <steep+0xd2>
movl   $0x1,-0x4(%rbp)
jmp    13bb <steep+0x26b>
movss  -0x40(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xdcd(%rip),%xmm0
ucomisd %xmm1,%xmm0
jb     1254 <steep+0x104>
movsd  0xdbb(%rip),%xmm0
xorps  %xmm1,%xmm1
mov    $0x2,%al
call   1040 <a_ftodx@plt>
jmp    127b <steep+0x12b>
movss  -0x40(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
call   1050 <sqrt@plt>
movaps %xmm0,%xmm1
movsd  0xd93(%rip),%xmm0
divsd  %xmm1,%xmm0
xorps  %xmm1,%xmm1
mov    $0x2,%al
call   1040 <a_ftodx@plt>
movss  -0x34(%rbp),%xmm0
movss  %xmm0,-0x3c(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x40(%rbp)
movl   $0x0,-0x2c(%rbp)
cmpl   $0xc8,-0x2c(%rbp)
jge    1396 <steep+0x246>
xorps  %xmm0,%xmm0
movss  %xmm0,-0x38(%rbp)
movss  -0x40(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
cvtsi2sdl -0x2c(%rbp),%xmm0
movsd  0xd49(%rip),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x40(%rbp)
movl   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    130e <steep+0x1be>
mov    -0x10(%rbp),%rax
movslq -0x30(%rbp),%rcx
mov    (%rax,%rcx,8),%rcx
movss  -0x40(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    -0x38(%rbp),%rdi
mov    $0x1,%al
call   *%rcx
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    12d7 <steep+0x187>
movss  -0x38(%rbp),%xmm0
ucomiss -0x3c(%rbp),%xmm0
jbe    133e <steep+0x1ee>
cmpl   $0x0,-0x2c(%rbp)
jne    133e <steep+0x1ee>
xorps  %xmm0,%xmm0
movsd  0xce6(%rip),%xmm1
mov    $0x2,%al
call   1040 <a_ftodx@plt>
jmp    137e <steep+0x22e>
movss  -0x38(%rbp),%xmm0
ucomiss -0x3c(%rbp),%xmm0
jbe    1379 <steep+0x229>
movss  -0x40(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
cvtsi2sdl -0x2c(%rbp),%xmm0
movsd  0xcad(%rip),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x40(%rbp)
jmp    1396 <steep+0x246>
jmp    137e <steep+0x22e>
movss  -0x38(%rbp),%xmm0
movss  %xmm0,-0x3c(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1294 <steep+0x144>
movss  -0x40(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
mov    $0x1,%al
call   1070 <a_inc_d@plt>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1176 <steep+0x26>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<steep>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %ecx,0x14(%rsp)
test   %ecx,%ecx
jle    13a8 <steep+0x258>
mov    %rsi,%r12
mov    %rdi,%rbx
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,0x10(%rsp)
mov    %edx,0x4(%rsp)
mov    %edx,%r14d
mov    %rsp,%r13
lea    0xc(%rsp),%r15
xor    %eax,%eax
mov    %rsi,0x20(%rsp)
jmp    11e4 <steep+0x94>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
xorps  %xmm0,%xmm0
cvtss2sd %xmm1,%xmm0
movsd  0x28(%rsp),%xmm1
mulsd  0xe5b(%rip),%xmm1
addsd  %xmm0,%xmm1
cvtsd2ss %xmm1,%xmm1
xorps  %xmm0,%xmm0
cvtss2sd %xmm1,%xmm0
mov    $0x1,%al
call   1070 <a_inc_d@plt>
mov    0x18(%rsp),%eax
add    $0x1,%eax
cmp    0x14(%rsp),%eax
mov    0x20(%rsp),%r12
mov    %rsp,%r13
je     13a8 <steep+0x258>
mov    %eax,0x18(%rsp)
movl   $0x0,(%rsp)
cmpl   $0x0,0x4(%rsp)
jle    1240 <steep+0xf0>
xor    %ebp,%ebp
nopl   0x0(%rax,%rax,1)
xorps  %xmm0,%xmm0
mov    %r13,%rdi
mov    $0x1,%al
call   *(%rbx,%rbp,8)
add    $0x1,%rbp
cmp    %rbp,%r14
jne    1200 <steep+0xb0>
xor    %eax,%eax
call   1060 <a_f_zero@plt>
xor    %ebp,%ebp
nopl   (%rax)
xorps  %xmm0,%xmm0
mov    $0x1,%al
call   *(%r12,%rbp,8)
add    $0x1,%rbp
cmp    %rbp,%r14
jne    1220 <steep+0xd0>
jmp    1247 <steep+0xf7>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
xor    %eax,%eax
call   1060 <a_f_zero@plt>
xor    %eax,%eax
call   1030 <a_max_f@plt>
movaps %xmm0,%xmm1
movss  0x10(%rsp),%xmm0
ucomiss %xmm1,%xmm0
mov    0x4(%rsp),%r13d
jae    13ac <steep+0x25c>
movss  0xdbb(%rip),%xmm0
ucomiss %xmm1,%xmm0
movsd  0xd88(%rip),%xmm0
jae    12b5 <steep+0x165>
xorps  %xmm0,%xmm0
cvtss2sd %xmm1,%xmm0
ucomisd 0xd97(%rip),%xmm0
jb     12a0 <steep+0x150>
xorps  %xmm1,%xmm1
sqrtsd %xmm0,%xmm1
jmp    12a9 <steep+0x159>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
call   1050 <sqrt@plt>
movapd %xmm0,%xmm1
movsd  0xd4f(%rip),%xmm0
divsd  %xmm1,%xmm0
xorps  %xmm1,%xmm1
mov    $0x2,%al
call   1040 <a_ftodx@plt>
xor    %r12d,%r12d
xorps  %xmm1,%xmm1
mov    %rsp,%rax
jmp    12ed <steep+0x19d>
nopw   0x0(%rax,%rax,1)
ucomiss %xmm2,%xmm0
ja     11a0 <steep+0x50>
add    $0x1,%r12d
mov    %r15,%rax
cmp    $0xc8,%r12d
je     11bd <steep+0x6d>
movss  (%rax),%xmm2
movl   $0x0,0xc(%rsp)
xorps  %xmm0,%xmm0
cvtss2sd %xmm1,%xmm0
xorps  %xmm1,%xmm1
cvtsi2sd %r12d,%xmm1
movsd  %xmm1,0x28(%rsp)
mulsd  0xcf2(%rip),%xmm1
addsd  %xmm0,%xmm1
cvtsd2ss %xmm1,%xmm1
xorps  %xmm0,%xmm0
test   %r13d,%r13d
movss  %xmm1,0x8(%rsp)
jle    1379 <steep+0x229>
movss  %xmm2,0x1c(%rsp)
xorps  %xmm0,%xmm0
cvtss2sd %xmm1,%xmm0
movsd  %xmm0,0x30(%rsp)
xor    %ebp,%ebp
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    %r15,%rdi
movsd  0x30(%rsp),%xmm0
mov    $0x1,%al
call   *(%rbx,%rbp,8)
add    $0x1,%rbp
cmp    %rbp,%r14
jne    1350 <steep+0x200>
movss  0xc(%rsp),%xmm0
movss  0x8(%rsp),%xmm1
movss  0x1c(%rsp),%xmm2
ucomiss %xmm2,%xmm0
jbe    12d0 <steep+0x180>
test   %r12d,%r12d
jne    12d0 <steep+0x180>
xorps  %xmm0,%xmm0
movsd  0xc82(%rip),%xmm1
mov    $0x2,%al
call   1040 <a_ftodx@plt>
movss  0x8(%rsp),%xmm1
jmp    12d9 <steep+0x189>
xor    %eax,%eax
jmp    13b1 <steep+0x261>
mov    $0x1,%eax
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @steep(i32 (...)** nocapture %0, i32 (...)** nocapture %1, i32 %2, i32 %3, double %4) {
%6 = alloca float
%7 = alloca float
%8 = fptrunc double %4 to float
%9 = bitcast float* %6 to i8*
%10 = bitcast float* %7 to i8*
%11 = icmp sgt i32 %3, 0
br i1 %11, label %12, label %91
12: ; preds = %5
%13 = icmp sgt i32 %2, 0
%14 = zext i32 %2 to i64
br label %15
15: ; preds = %12, %85
%16 = phi i32 [ 0, %12 ], [ %89, %85 ]
store float 0.000000e+00, float* %6
br i1 %13, label %19, label %17
17: ; preds = %15
%18 = call i32 (...) @a_f_zero()
br label %37
19: ; preds = %15, %19
%20 = phi i64 [ %25, %19 ], [ 0, %15 ]
%21 = getelementptr inbounds i32 (...)*, i32 (...)** %0, i64 %20
%22 = bitcast i32 (...)** %21 to i32 (float*, double, ...)**
%23 = load i32 (float*, double, ...)*, i32 (float*, double, ...)** %22
%24 = call i32 (float*, double, ...) %23(float* %6, double 0.000000e+00)
%25 = add nuw nsw i64 %20, 1
%26 = icmp eq i64 %25, %14
br i1 %26, label %27, label %19
27: ; preds = %19
%28 = call i32 (...) @a_f_zero()
br label %29
29: ; preds = %27, %29
%30 = phi i64 [ %35, %29 ], [ 0, %27 ]
%31 = getelementptr inbounds i32 (...)*, i32 (...)** %1, i64 %30
%32 = bitcast i32 (...)** %31 to i32 (double, ...)**
%33 = load i32 (double, ...)*, i32 (double, ...)** %32
%34 = call i32 (double, ...) %33(double 0.000000e+00)
%35 = add nuw nsw i64 %30, 1
%36 = icmp eq i64 %35, %14
br i1 %36, label %37, label %29
37: ; preds = %29, %17
%38 = call float (...) @a_max_f()
%39 = fcmp ugt float %38, %8
br i1 %39, label %40, label %91
40: ; preds = %37
%41 = fcmp ugt float %38, 1.000000e+00
br i1 %41, label %42, label %46
42: ; preds = %40
%43 = fpext float %38 to double
%44 = call double @sqrt(double %43)
%45 = fdiv double 1.000000e+00, %44
br label %46
46: ; preds = %40, %42
%47 = phi double [ %45, %42 ], [ 1.000000e+00, %40 ]
%48 = call i32 (double, double, ...) bitcast (i32 (...)* @a_ftodx to i32 (double, double, ...)*)(double %47, double 0.000000e+00)
br label %49
49: ; preds = %46, %82
%50 = phi float* [ %6, %46 ], [ %7, %82 ]
%51 = phi float [ 0.000000e+00, %46 ], [ %57, %82 ]
%52 = phi i32 [ 0, %46 ], [ %83, %82 ]
%53 = load float, float* %50
store float 0.000000e+00, float* %7
%54 = fpext float %51 to double
%55 = sitofp i32 %52 to double
%56 = call double @llvm.fmuladd.f64(double %55, double 1.000000e-02, double %54)
%57 = fptrunc double %56 to float
br i1 %13, label %58, label %70
58: ; preds = %49
%59 = fpext float %57 to double
br label %60
60: ; preds = %58, %60
%61 = phi i64 [ 0, %58 ], [ %66, %60 ]
%62 = getelementptr inbounds i32 (...)*, i32 (...)** %0, i64 %61
%63 = bitcast i32 (...)** %62 to i32 (float*, double, ...)**
%64 = load i32 (float*, double, ...)*, i32 (float*, double, ...)** %63
%65 = call i32 (float*, double, ...) %64(float* %7, double %59)
%66 = add nuw nsw i64 %61, 1
%67 = icmp eq i64 %66, %14
br i1 %67, label %68, label %60
68: ; preds = %60
%69 = load float, float* %7
br label %70
70: ; preds = %68, %49
%71 = phi float [ %69, %68 ], [ 0.000000e+00, %49 ]
%72 = fcmp ogt float %71, %53
%73 = icmp eq i32 %52, 0
%74 = select i1 %72, i1 %73, i1 false
br i1 %74, label %75, label %77
75: ; preds = %70
%76 = call i32 (double, double, ...) bitcast (i32 (...)* @a_ftodx to i32 (double, double, ...)*)(double 0.000000e+00, double 1.000000e-01)
br label %82
77: ; preds = %70
br i1 %72, label %78, label %82
78: ; preds = %77
%79 = fpext float %57 to double
%80 = call double @llvm.fmuladd.f64(double %55, double -1.000000e-02, double %79)
%81 = fptrunc double %80 to float
br label %85
82: ; preds = %77, %75
%83 = add nuw nsw i32 %52, 1
%84 = icmp eq i32 %83, 200
br i1 %84, label %85, label %49
85: ; preds = %82, %78
%86 = phi float [ %81, %78 ], [ %57, %82 ]
%87 = fpext float %86 to double
%88 = call i32 (double, ...) bitcast (i32 (...)* @a_inc_d to i32 (double, ...)*)(double %87)
%89 = add nuw nsw i32 %16, 1
%90 = icmp eq i32 %89, %3
br i1 %90, label %91, label %15
91: ; preds = %37, %85, %5
%92 = phi i32 [ 0, %5 ], [ 1, %37 ], [ 0, %85 ]
ret i32 %92
}