long ncctop(double cptop, long nlev, long nlevp1, double *vct_a,
            double *vct_b) {
  long nctop = 0;
  long jk;
  double za, zb, zph[nlevp1], zp[nlev];
  for (jk = 0; jk < nlevp1; ++jk) {
    za = vct_a[jk];
    zb = vct_b[jk];
    zph[jk] = za + zb * 101320.;
  }
  for (jk = 0; jk < nlev; ++jk)
    zp[jk] = (zph[jk] + zph[jk + 1]) * 0.5;
  for (jk = 0; jk < nlev; ++jk) {
    nctop = jk;
    if (zp[jk] >= cptop)
      break;
  }
  return (nctop);
}


x86 assembly (clang, -O0):
<ncctop>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
movsd  %xmm0,-0x8(%rbp)
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    %rcx,-0x28(%rbp)
movq   $0x0,-0x30(%rbp)
mov    -0x18(%rbp),%rax
mov    %rsp,%rcx
mov    %rcx,-0x50(%rbp)
lea    0xf(,%rax,8),%rdx
and    $0xfffffffffffffff0,%rdx
mov    %rsp,%rcx
sub    %rdx,%rcx
mov    %rcx,-0x70(%rbp)
mov    %rcx,%rsp
mov    %rax,-0x58(%rbp)
mov    -0x10(%rbp),%rax
lea    0xf(,%rax,8),%rdx
and    $0xfffffffffffffff0,%rdx
mov    %rsp,%rcx
sub    %rdx,%rcx
mov    %rcx,-0x68(%rbp)
mov    %rcx,%rsp
mov    %rax,-0x60(%rbp)
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x18(%rbp),%rax
jge    11e0 <ncctop+0xe0>
mov    -0x70(%rbp),%rax
mov    -0x20(%rbp),%rcx
mov    -0x38(%rbp),%rdx
movsd  (%rcx,%rdx,8),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x28(%rbp),%rcx
mov    -0x38(%rbp),%rdx
movsd  (%rcx,%rdx,8),%xmm0
movsd  %xmm0,-0x48(%rbp)
movsd  -0x40(%rbp),%xmm1
movsd  -0x48(%rbp),%xmm0
movsd  0xe4a(%rip),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x38(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    1176 <ncctop+0x76>
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    1237 <ncctop+0x137>
mov    -0x68(%rbp),%rax
mov    -0x70(%rbp),%rcx
mov    -0x38(%rbp),%rdx
movsd  (%rcx,%rdx,8),%xmm0
mov    -0x38(%rbp),%rdx
addsd  0x8(%rcx,%rdx,8),%xmm0
movsd  0xde7(%rip),%xmm1
mulsd  %xmm1,%xmm0
mov    -0x38(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    11e8 <ncctop+0xe8>
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    1288 <ncctop+0x188>
mov    -0x68(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %rcx,-0x30(%rbp)
mov    -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd -0x8(%rbp),%xmm0
jb     1272 <ncctop+0x172>
jmp    1288 <ncctop+0x188>
jmp    1277 <ncctop+0x177>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    123f <ncctop+0x13f>
mov    -0x30(%rbp),%rax
mov    -0x50(%rbp),%rcx
mov    %rcx,%rsp
mov    %rbp,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ncctop>:
push   %rbp
mov    %rsp,%rbp
push   %rbx
push   %rax
mov    %rsp,%r9
lea    0xf(,%rsi,8),%rax
and    $0xfffffffffffffff0,%rax
sub    %rax,%r9
mov    %r9,%rsp
mov    %rsp,%r8
lea    0xf(,%rdi,8),%rax
and    $0xfffffffffffffff0,%rax
sub    %rax,%r8
mov    %r8,%rsp
test   %rsi,%rsi
jle    126f <ncctop+0x16f>
cmp    $0x4,%rsi
jae    1147 <ncctop+0x47>
xor    %r10d,%r10d
jmp    1239 <ncctop+0x139>
mov    %rsi,%r10
and    $0xfffffffffffffffc,%r10
lea    -0x4(%r10),%rax
mov    %rax,%r11
shr    $0x2,%r11
add    $0x1,%r11
test   %rax,%rax
je     13f8 <ncctop+0x2f8>
mov    %r11,%rbx
and    $0xfffffffffffffffe,%rbx
xor    %eax,%eax
movapd 0xe89(%rip),%xmm1
nopw   0x0(%rax,%rax,1)
movupd (%rdx,%rax,8),%xmm2
movupd 0x10(%rdx,%rax,8),%xmm3
movupd (%rcx,%rax,8),%xmm4
movupd 0x10(%rcx,%rax,8),%xmm5
mulpd  %xmm1,%xmm4
addpd  %xmm2,%xmm4
mulpd  %xmm1,%xmm5
addpd  %xmm3,%xmm5
movapd %xmm4,(%r9,%rax,8)
movapd %xmm5,0x10(%r9,%rax,8)
movupd 0x20(%rdx,%rax,8),%xmm2
movupd 0x30(%rdx,%rax,8),%xmm3
movupd 0x20(%rcx,%rax,8),%xmm4
movupd 0x30(%rcx,%rax,8),%xmm5
mulpd  %xmm1,%xmm4
addpd  %xmm2,%xmm4
mulpd  %xmm1,%xmm5
addpd  %xmm3,%xmm5
movapd %xmm4,0x20(%r9,%rax,8)
movapd %xmm5,0x30(%r9,%rax,8)
add    $0x8,%rax
add    $0xfffffffffffffffe,%rbx
jne    1180 <ncctop+0x80>
test   $0x1,%r11b
je     1234 <ncctop+0x134>
movupd (%rdx,%rax,8),%xmm1
movupd 0x10(%rdx,%rax,8),%xmm2
movupd (%rcx,%rax,8),%xmm3
movupd 0x10(%rcx,%rax,8),%xmm4
movapd 0xde9(%rip),%xmm5
mulpd  %xmm5,%xmm3
addpd  %xmm1,%xmm3
mulpd  %xmm5,%xmm4
addpd  %xmm2,%xmm4
movapd %xmm3,(%r9,%rax,8)
movapd %xmm4,0x10(%r9,%rax,8)
cmp    %rsi,%r10
je     126f <ncctop+0x16f>
movsd  0xddf(%rip),%xmm1
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  (%rcx,%r10,8),%xmm2
mulsd  %xmm1,%xmm2
addsd  (%rdx,%r10,8),%xmm2
movsd  %xmm2,(%r9,%r10,8)
add    $0x1,%r10
cmp    %r10,%rsi
jne    1250 <ncctop+0x150>
test   %rdi,%rdi
jle    13ef <ncctop+0x2ef>
movsd  (%r9),%xmm1
cmp    $0x4,%rdi
jae    128a <ncctop+0x18a>
xor    %ecx,%ecx
jmp    138f <ncctop+0x28f>
mov    %rdi,%rcx
and    $0xfffffffffffffffc,%rcx
unpcklpd %xmm1,%xmm1
lea    -0x4(%rcx),%rax
mov    %rax,%rdx
shr    $0x2,%rdx
add    $0x1,%rdx
test   %rax,%rax
je     1409 <ncctop+0x309>
mov    %rdx,%rsi
and    $0xfffffffffffffffe,%rsi
xor    %eax,%eax
movapd 0xd52(%rip),%xmm2
xchg   %ax,%ax
movupd 0x8(%r9,%rax,8),%xmm3
movupd 0x18(%r9,%rax,8),%xmm4
shufpd $0x1,%xmm3,%xmm1
addpd  %xmm3,%xmm1
shufpd $0x1,%xmm4,%xmm3
addpd  %xmm4,%xmm3
mulpd  %xmm2,%xmm1
mulpd  %xmm2,%xmm3
movapd %xmm1,(%r8,%rax,8)
movapd %xmm3,0x10(%r8,%rax,8)
movupd 0x28(%r9,%rax,8),%xmm3
movupd 0x38(%r9,%rax,8),%xmm1
shufpd $0x1,%xmm3,%xmm4
addpd  %xmm3,%xmm4
shufpd $0x1,%xmm1,%xmm3
addpd  %xmm1,%xmm3
mulpd  %xmm2,%xmm4
mulpd  %xmm2,%xmm3
movapd %xmm4,0x20(%r8,%rax,8)
movapd %xmm3,0x30(%r8,%rax,8)
add    $0x8,%rax
add    $0xfffffffffffffffe,%rsi
jne    12c0 <ncctop+0x1c0>
test   $0x1,%dl
je     1386 <ncctop+0x286>
lea    0x0(,%rax,8),%rdx
or     $0x8,%rdx
movupd (%r9,%rdx,1),%xmm2
movupd 0x10(%r9,%rdx,1),%xmm3
shufpd $0x1,%xmm2,%xmm1
addpd  %xmm2,%xmm1
shufpd $0x1,%xmm3,%xmm2
addpd  %xmm3,%xmm2
movapd 0xca3(%rip),%xmm4
mulpd  %xmm4,%xmm1
mulpd  %xmm4,%xmm2
movapd %xmm1,(%r8,%rax,8)
movapd %xmm2,0x10(%r8,%rax,8)
movapd %xmm3,%xmm1
cmp    %rdi,%rcx
je     13c5 <ncctop+0x2c5>
unpckhpd %xmm1,%xmm1
movsd  0xc91(%rip),%xmm2
nopw   0x0(%rax,%rax,1)
movsd  0x8(%r9,%rcx,8),%xmm3
addsd  %xmm3,%xmm1
mulsd  %xmm2,%xmm1
movsd  %xmm1,(%r8,%rcx,8)
lea    0x1(%rcx),%rax
movapd %xmm3,%xmm1
mov    %rax,%rcx
cmp    %rax,%rdi
jne    13a0 <ncctop+0x2a0>
test   %rdi,%rdi
jle    13ef <ncctop+0x2ef>
mov    $0x1,%ecx
nop
movsd  -0x8(%r8,%rcx,8),%xmm1
lea    0x1(%rcx),%rax
ucomisd %xmm0,%xmm1
jae    13e9 <ncctop+0x2e9>
cmp    %rdi,%rcx
mov    %rax,%rcx
jl     13d0 <ncctop+0x2d0>
add    $0xfffffffffffffffe,%rax
jmp    13f1 <ncctop+0x2f1>
xor    %eax,%eax
lea    -0x8(%rbp),%rsp
pop    %rbx
pop    %rbp
ret
xor    %eax,%eax
test   $0x1,%r11b
jne    11f9 <ncctop+0xf9>
jmp    1234 <ncctop+0x134>
xor    %eax,%eax
test   $0x1,%dl
jne    133a <ncctop+0x23a>
jmp    1386 <ncctop+0x286>

LLVM IR (-O0):
define i64 @ncctop(double %0, i64 %1, i64 %2, double* %3, double* %4) {
%6 = alloca double
%7 = alloca i64
%8 = alloca i64
%9 = alloca double*
%10 = alloca double*
%11 = alloca i64
%12 = alloca i64
%13 = alloca double
%14 = alloca double
%15 = alloca i8*
%16 = alloca i64
%17 = alloca i64
store double %0, double* %6
store i64 %1, i64* %7
store i64 %2, i64* %8
store double* %3, double** %9
store double* %4, double** %10
store i64 0, i64* %11
%18 = load i64, i64* %8
%19 = call i8* @llvm.stacksave()
store i8* %19, i8** %15
%20 = alloca double, i64 %18
store i64 %18, i64* %16
%21 = load i64, i64* %7
%22 = alloca double, i64 %21
store i64 %21, i64* %17
store i64 0, i64* %12
br label %23
23: ; preds = %41, %5
%24 = load i64, i64* %12
%25 = load i64, i64* %8
%26 = icmp slt i64 %24, %25
br i1 %26, label %27, label %44
27: ; preds = %23
%28 = load double*, double** %9
%29 = load i64, i64* %12
%30 = getelementptr inbounds double, double* %28, i64 %29
%31 = load double, double* %30
store double %31, double* %13
%32 = load double*, double** %10
%33 = load i64, i64* %12
%34 = getelementptr inbounds double, double* %32, i64 %33
%35 = load double, double* %34
store double %35, double* %14
%36 = load double, double* %13
%37 = load double, double* %14
%38 = call double @llvm.fmuladd.f64(double %37, double 1.013200e+05, double %36)
%39 = load i64, i64* %12
%40 = getelementptr inbounds double, double* %20, i64 %39
store double %38, double* %40
br label %41
41: ; preds = %27
%42 = load i64, i64* %12
%43 = add nsw i64 %42, 1
store i64 %43, i64* %12
br label %23
44: ; preds = %23
store i64 0, i64* %12
br label %45
45: ; preds = %61, %44
%46 = load i64, i64* %12
%47 = load i64, i64* %7
%48 = icmp slt i64 %46, %47
br i1 %48, label %49, label %64
49: ; preds = %45
%50 = load i64, i64* %12
%51 = getelementptr inbounds double, double* %20, i64 %50
%52 = load double, double* %51
%53 = load i64, i64* %12
%54 = add nsw i64 %53, 1
%55 = getelementptr inbounds double, double* %20, i64 %54
%56 = load double, double* %55
%57 = fadd double %52, %56
%58 = fmul double %57, 5.000000e-01
%59 = load i64, i64* %12
%60 = getelementptr inbounds double, double* %22, i64 %59
store double %58, double* %60
br label %61
61: ; preds = %49
%62 = load i64, i64* %12
%63 = add nsw i64 %62, 1
store i64 %63, i64* %12
br label %45
64: ; preds = %45
store i64 0, i64* %12
br label %65
65: ; preds = %78, %64
%66 = load i64, i64* %12
%67 = load i64, i64* %7
%68 = icmp slt i64 %66, %67
br i1 %68, label %69, label %81
69: ; preds = %65
%70 = load i64, i64* %12
store i64 %70, i64* %11
%71 = load i64, i64* %12
%72 = getelementptr inbounds double, double* %22, i64 %71
%73 = load double, double* %72
%74 = load double, double* %6
%75 = fcmp oge double %73, %74
br i1 %75, label %76, label %77
76: ; preds = %69
br label %81
77: ; preds = %69
br label %78
78: ; preds = %77
%79 = load i64, i64* %12
%80 = add nsw i64 %79, 1
store i64 %80, i64* %12
br label %65
81: ; preds = %76, %65
%82 = load i64, i64* %11
%83 = load i8*, i8** %15
ret i64 %82
}

LLVM IR (-O2):
define i64 @ncctop(double %0, i64 %1, i64 %2, double* nocapture %3, double* nocapture %4) {
%6 = alloca double, i64 %2
%7 = alloca double, i64 %1
%8 = icmp sgt i64 %2, 0
br i1 %8, label %9, label %89
9: ; preds = %5
%10 = icmp ult i64 %2, 4
br i1 %10, label %87, label %11
11: ; preds = %9
%12 = and i64 %2, -4
%13 = add i64 %12, -4
%14 = lshr exact i64 %13, 2
%15 = add nuw nsw i64 %14, 1
%16 = and i64 %15, 1
%17 = icmp eq i64 %13, 0
br i1 %17, label %63, label %18
18: ; preds = %11
%19 = and i64 %15, 9223372036854775806
br label %20
20: ; preds = %20, %18
%21 = phi i64 [ 0, %18 ], [ %60, %20 ]
%22 = phi i64 [ 0, %18 ], [ %61, %20 ]
%23 = getelementptr inbounds double, double* %3, i64 %21
%24 = bitcast double* %23 to <2 x double>*
%25 = load <2 x double>, <2 x double>* %24
%26 = getelementptr inbounds double, double* %23, i64 2
%27 = bitcast double* %26 to <2 x double>*
%28 = load <2 x double>, <2 x double>* %27
%29 = getelementptr inbounds double, double* %4, i64 %21
%30 = bitcast double* %29 to <2 x double>*
%31 = load <2 x double>, <2 x double>* %30
%32 = getelementptr inbounds double, double* %29, i64 2
%33 = bitcast double* %32 to <2 x double>*
%34 = load <2 x double>, <2 x double>* %33
%35 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %31, <2 x double> <double 1.013200e+05, double 1.013200e+05>, <2 x double> %25)
%36 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %34, <2 x double> <double 1.013200e+05, double 1.013200e+05>, <2 x double> %28)
%37 = getelementptr inbounds double, double* %6, i64 %21
%38 = bitcast double* %37 to <2 x double>*
store <2 x double> %35, <2 x double>* %38
%39 = getelementptr inbounds double, double* %37, i64 2
%40 = bitcast double* %39 to <2 x double>*
store <2 x double> %36, <2 x double>* %40
%41 = or i64 %21, 4
%42 = getelementptr inbounds double, double* %3, i64 %41
%43 = bitcast double* %42 to <2 x double>*
%44 = load <2 x double>, <2 x double>* %43
%45 = getelementptr inbounds double, double* %42, i64 2
%46 = bitcast double* %45 to <2 x double>*
%47 = load <2 x double>, <2 x double>* %46
%48 = getelementptr inbounds double, double* %4, i64 %41
%49 = bitcast double* %48 to <2 x double>*
%50 = load <2 x double>, <2 x double>* %49
%51 = getelementptr inbounds double, double* %48, i64 2
%52 = bitcast double* %51 to <2 x double>*
%53 = load <2 x double>, <2 x double>* %52
%54 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %50, <2 x double> <double 1.013200e+05, double 1.013200e+05>, <2 x double> %44)
%55 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %53, <2 x double> <double 1.013200e+05, double 1.013200e+05>, <2 x double> %47)
%56 = getelementptr inbounds double, double* %6, i64 %41
%57 = bitcast double* %56 to <2 x double>*
store <2 x double> %54, <2 x double>* %57
%58 = getelementptr inbounds double, double* %56, i64 2
%59 = bitcast double* %58 to <2 x double>*
store <2 x double> %55, <2 x double>* %59
%60 = add nuw i64 %21, 8
%61 = add i64 %22, 2
%62 = icmp eq i64 %61, %19
br i1 %62, label %63, label %20
63: ; preds = %20, %11
%64 = phi i64 [ 0, %11 ], [ %60, %20 ]
%65 = icmp eq i64 %16, 0
br i1 %65, label %85, label %66
66: ; preds = %63
%67 = getelementptr inbounds double, double* %3, i64 %64
%68 = bitcast double* %67 to <2 x double>*
%69 = load <2 x double>, <2 x double>* %68
%70 = getelementptr inbounds double, double* %67, i64 2
%71 = bitcast double* %70 to <2 x double>*
%72 = load <2 x double>, <2 x double>* %71
%73 = getelementptr inbounds double, double* %4, i64 %64
%74 = bitcast double* %73 to <2 x double>*
%75 = load <2 x double>, <2 x double>* %74
%76 = getelementptr inbounds double, double* %73, i64 2
%77 = bitcast double* %76 to <2 x double>*
%78 = load <2 x double>, <2 x double>* %77
%79 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %75, <2 x double> <double 1.013200e+05, double 1.013200e+05>, <2 x double> %69)
%80 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %78, <2 x double> <double 1.013200e+05, double 1.013200e+05>, <2 x double> %72)
%81 = getelementptr inbounds double, double* %6, i64 %64
%82 = bitcast double* %81 to <2 x double>*
store <2 x double> %79, <2 x double>* %82
%83 = getelementptr inbounds double, double* %81, i64 2
%84 = bitcast double* %83 to <2 x double>*
store <2 x double> %80, <2 x double>* %84
br label %85
85: ; preds = %63, %66
%86 = icmp eq i64 %12, %2
br i1 %86, label %89, label %87
87: ; preds = %9, %85
%88 = phi i64 [ 0, %9 ], [ %12, %85 ]
br label %176
89: ; preds = %176, %85, %5
%90 = icmp sgt i64 %1, 0
br i1 %90, label %91, label %205
91: ; preds = %89
%92 = load double, double* %6
%93 = icmp ult i64 %1, 4
br i1 %93, label %173, label %94
94: ; preds = %91
%95 = and i64 %1, -4
%96 = insertelement <2 x double> poison, double %92, i64 1
%97 = add i64 %95, -4
%98 = lshr exact i64 %97, 2
%99 = add nuw nsw i64 %98, 1
%100 = and i64 %99, 1
%101 = icmp eq i64 %97, 0
br i1 %101, label %146, label %102
102: ; preds = %94
%103 = and i64 %99, 9223372036854775806
br label %104
104: ; preds = %104, %102
%105 = phi i64 [ 0, %102 ], [ %143, %104 ]
%106 = phi <2 x double> [ %96, %102 ], [ %132, %104 ]
%107 = phi i64 [ 0, %102 ], [ %144, %104 ]
%108 = or i64 %105, 1
%109 = getelementptr inbounds double, double* %6, i64 %108
%110 = bitcast double* %109 to <2 x double>*
%111 = load <2 x double>, <2 x double>* %110
%112 = getelementptr inbounds double, double* %109, i64 2
%113 = bitcast double* %112 to <2 x double>*
%114 = load <2 x double>, <2 x double>* %113
%115 = shufflevector <2 x double> %106, <2 x double> %111, <2 x i32> <i32 1, i32 2>
%116 = shufflevector <2 x double> %111, <2 x double> %114, <2 x i32> <i32 1, i32 2>
%117 = fadd <2 x double> %115, %111
%118 = fadd <2 x double> %116, %114
%119 = fmul <2 x double> %117, <double 5.000000e-01, double 5.000000e-01>
%120 = fmul <2 x double> %118, <double 5.000000e-01, double 5.000000e-01>
%121 = getelementptr inbounds double, double* %7, i64 %105
%122 = bitcast double* %121 to <2 x double>*
store <2 x double> %119, <2 x double>* %122
%123 = getelementptr inbounds double, double* %121, i64 2
%124 = bitcast double* %123 to <2 x double>*
store <2 x double> %120, <2 x double>* %124
%125 = or i64 %105, 4
%126 = or i64 %105, 5
%127 = getelementptr inbounds double, double* %6, i64 %126
%128 = bitcast double* %127 to <2 x double>*
%129 = load <2 x double>, <2 x double>* %128
%130 = getelementptr inbounds double, double* %127, i64 2
%131 = bitcast double* %130 to <2 x double>*
%132 = load <2 x double>, <2 x double>* %131
%133 = shufflevector <2 x double> %114, <2 x double> %129, <2 x i32> <i32 1, i32 2>
%134 = shufflevector <2 x double> %129, <2 x double> %132, <2 x i32> <i32 1, i32 2>
%135 = fadd <2 x double> %133, %129
%136 = fadd <2 x double> %134, %132
%137 = fmul <2 x double> %135, <double 5.000000e-01, double 5.000000e-01>
%138 = fmul <2 x double> %136, <double 5.000000e-01, double 5.000000e-01>
%139 = getelementptr inbounds double, double* %7, i64 %125
%140 = bitcast double* %139 to <2 x double>*
store <2 x double> %137, <2 x double>* %140
%141 = getelementptr inbounds double, double* %139, i64 2
%142 = bitcast double* %141 to <2 x double>*
store <2 x double> %138, <2 x double>* %142
%143 = add nuw i64 %105, 8
%144 = add i64 %107, 2
%145 = icmp eq i64 %144, %103
br i1 %145, label %146, label %104
146: ; preds = %104, %94
%147 = phi <2 x double> [ undef, %94 ], [ %132, %104 ]
%148 = phi i64 [ 0, %94 ], [ %143, %104 ]
%149 = phi <2 x double> [ %96, %94 ], [ %132, %104 ]
%150 = icmp eq i64 %100, 0
br i1 %150, label %169, label %151
151: ; preds = %146
%152 = or i64 %148, 1
%153 = getelementptr inbounds double, double* %6, i64 %152
%154 = bitcast double* %153 to <2 x double>*
%155 = load <2 x double>, <2 x double>* %154
%156 = getelementptr inbounds double, double* %153, i64 2
%157 = bitcast double* %156 to <2 x double>*
%158 = load <2 x double>, <2 x double>* %157
%159 = shufflevector <2 x double> %149, <2 x double> %155, <2 x i32> <i32 1, i32 2>
%160 = shufflevector <2 x double> %155, <2 x double> %158, <2 x i32> <i32 1, i32 2>
%161 = fadd <2 x double> %159, %155
%162 = fadd <2 x double> %160, %158
%163 = fmul <2 x double> %161, <double 5.000000e-01, double 5.000000e-01>
%164 = fmul <2 x double> %162, <double 5.000000e-01, double 5.000000e-01>
%165 = getelementptr inbounds double, double* %7, i64 %148
%166 = bitcast double* %165 to <2 x double>*
store <2 x double> %163, <2 x double>* %166
%167 = getelementptr inbounds double, double* %165, i64 2
%168 = bitcast double* %167 to <2 x double>*
store <2 x double> %164, <2 x double>* %168
br label %169
169: ; preds = %146, %151
%170 = phi <2 x double> [ %147, %146 ], [ %158, %151 ]
%171 = icmp eq i64 %95, %1
%172 = extractelement <2 x double> %170, i64 1
br i1 %171, label %186, label %173
173: ; preds = %91, %169
%174 = phi double [ %172, %169 ], [ %92, %91 ]
%175 = phi i64 [ %95, %169 ], [ 0, %91 ]
br label %187
176: ; preds = %87, %176
%177 = phi i64 [ %184, %176 ], [ %88, %87 ]
%178 = getelementptr inbounds double, double* %3, i64 %177
%179 = load double, double* %178
%180 = getelementptr inbounds double, double* %4, i64 %177
%181 = load double, double* %180
%182 = tail call double @llvm.fmuladd.f64(double %181, double 1.013200e+05, double %179)
%183 = getelementptr inbounds double, double* %6, i64 %177
store double %182, double* %183
%184 = add nuw nsw i64 %177, 1
%185 = icmp eq i64 %184, %2
br i1 %185, label %89, label %176
186: ; preds = %187, %169
br i1 %90, label %197, label %205
187: ; preds = %173, %187
%188 = phi double [ %192, %187 ], [ %174, %173 ]
%189 = phi i64 [ %190, %187 ], [ %175, %173 ]
%190 = add nuw nsw i64 %189, 1
%191 = getelementptr inbounds double, double* %6, i64 %190
%192 = load double, double* %191
%193 = fadd double %188, %192
%194 = fmul double %193, 5.000000e-01
%195 = getelementptr inbounds double, double* %7, i64 %189
store double %194, double* %195
%196 = icmp eq i64 %190, %1
br i1 %196, label %186, label %187
197: ; preds = %186, %197
%198 = phi i64 [ %202, %197 ], [ 0, %186 ]
%199 = getelementptr inbounds double, double* %7, i64 %198
%200 = load double, double* %199
%201 = fcmp ult double %200, %0
%202 = add nuw nsw i64 %198, 1
%203 = icmp slt i64 %202, %1
%204 = select i1 %201, i1 %203, i1 false
br i1 %204, label %197, label %205
205: ; preds = %197, %89, %186
%206 = phi i64 [ 0, %186 ], [ 0, %89 ], [ %198, %197 ]
ret i64 %206
}