void uplo(x, n, lpf, m, y) double x[], lpf[], y[];
int n, m;
{
  int meven, modd, i, h, j, mmax;
  double s;
  meven = (m + 1) / 2;
  modd = m / 2;
  for (i = meven; i < n; i++) {
    s = 0.;
    for (h = 0; h < meven; h++)
      s += lpf[2 * h] * x[i - h];
    y[2 * i] = s;
    s = 0.;
    for (h = 0; h < modd; h++)
      s += lpf[2 * h + 1] * x[i - h];
    y[2 * i + 1] = s;
  }
  mmax = meven;
  if (mmax > n)
    mmax = n;
  for (i = 0; i < mmax; i++) {
    s = 0.;
    j = i;
    for (h = 0; h < meven; h++) {
      if (j < 0)
        j += n;
      s += lpf[2 * h] * x[j];
      --j;
    }
    y[2 * i] = s;
    s = 0.;
    j = i;
    for (h = 0; h < modd; h++) {
      if (j < 0)
        j += n;
      s += lpf[2 * h + 1] * x[j];
      --j;
    }
    y[2 * i + 1] = s;
  }
}


x86 assembly (clang, -O0):
<uplo>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    %r8,-0x28(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x2c(%rbp)
mov    -0x1c(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x30(%rbp)
mov    -0x2c(%rbp),%eax
mov    %eax,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    1247 <uplo+0x147>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x48(%rbp)
movl   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%eax
cmp    -0x2c(%rbp),%eax
jge    11a6 <uplo+0xa6>
mov    -0x18(%rbp),%rax
mov    -0x38(%rbp),%ecx
shl    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x34(%rbp),%ecx
sub    -0x38(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x48(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    1156 <uplo+0x56>
movsd  -0x48(%rbp),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x34(%rbp),%ecx
shl    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x48(%rbp)
movl   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%eax
cmp    -0x30(%rbp),%eax
jge    121f <uplo+0x11f>
mov    -0x18(%rbp),%rax
mov    -0x38(%rbp),%ecx
shl    $0x1,%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x34(%rbp),%ecx
sub    -0x38(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x48(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    11cc <uplo+0xcc>
movsd  -0x48(%rbp),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x34(%rbp),%ecx
shl    $0x1,%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    113b <uplo+0x3b>
mov    -0x2c(%rbp),%eax
mov    %eax,-0x40(%rbp)
mov    -0x40(%rbp),%eax
cmp    -0xc(%rbp),%eax
jle    125f <uplo+0x15f>
mov    -0xc(%rbp),%eax
mov    %eax,-0x40(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x40(%rbp),%eax
jge    13ac <uplo+0x2ac>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x34(%rbp),%eax
mov    %eax,-0x3c(%rbp)
movl   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%eax
cmp    -0x2c(%rbp),%eax
jge    12ee <uplo+0x1ee>
cmpl   $0x0,-0x3c(%rbp)
jge    12a6 <uplo+0x1a6>
mov    -0xc(%rbp),%eax
add    -0x3c(%rbp),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x38(%rbp),%ecx
shl    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x48(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x3c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x3c(%rbp)
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    1287 <uplo+0x187>
movsd  -0x48(%rbp),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x34(%rbp),%ecx
shl    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x34(%rbp),%eax
mov    %eax,-0x3c(%rbp)
movl   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%eax
cmp    -0x30(%rbp),%eax
jge    1384 <uplo+0x284>
cmpl   $0x0,-0x3c(%rbp)
jge    1339 <uplo+0x239>
mov    -0xc(%rbp),%eax
add    -0x3c(%rbp),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x38(%rbp),%ecx
shl    $0x1,%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x48(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x3c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x3c(%rbp)
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    131a <uplo+0x21a>
movsd  -0x48(%rbp),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x34(%rbp),%ecx
shl    $0x1,%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    1266 <uplo+0x166>
pop    %rbp
ret

x86 assembly (clang, -O2):
<uplo>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
mov    %rdx,-0x40(%rsp)
lea    0x1(%rcx),%eax
shr    $0x1f,%eax
lea    (%rcx,%rax,1),%edx
add    $0x1,%edx
sar    %edx
mov    %ecx,%eax
shr    $0x1f,%eax
add    %ecx,%eax
sar    %eax
mov    %eax,%eax
mov    %rax,-0x30(%rsp)
mov    %edx,-0x38(%rsp)
cmp    %esi,%edx
jge    12b6 <uplo+0x1b6>
mov    -0x38(%rsp),%eax
cmp    $0x2,%eax
mov    $0x1,%r15d
cmovge %eax,%r15d
movslq %eax,%r14
movslq %esi,%r12
mov    %ecx,%r11d
and    $0xfffffffe,%r11d
mov    -0x40(%rsp),%rdx
lea    0x10(%rdx),%rax
mov    %rax,-0x20(%rsp)
lea    (%rdi,%r14,8),%rax
mov    %r15d,%ebp
and    $0x7ffffffe,%ebp
neg    %rbp
add    $0x18,%rdx
mov    %rdx,-0x28(%rsp)
mov    -0x30(%rsp),%r9
and    $0xfffffffe,%r9d
neg    %r9
mov    -0x40(%rsp),%r10
jmp    11be <uplo+0xbe>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
or     $0x1,%r13d
movslq %r13d,%rdx
movsd  %xmm0,(%r8,%rdx,8)
add    $0x1,%r14
add    $0x8,%rax
cmp    %r12,%r14
je     12b6 <uplo+0x1b6>
xorpd  %xmm0,%xmm0
xorpd  %xmm1,%xmm1
test   %ecx,%ecx
jle    1230 <uplo+0x130>
xorpd  %xmm1,%xmm1
xor    %ebx,%ebx
cmp    $0x3,%ecx
jl     120c <uplo+0x10c>
mov    -0x20(%rsp),%rdx
nopw   0x0(%rax,%rax,1)
movsd  -0x10(%rdx),%xmm2
mulsd  (%rax,%rbx,8),%xmm2
addsd  %xmm1,%xmm2
movsd  (%rdx),%xmm1
mulsd  -0x8(%rax,%rbx,8),%xmm1
addsd  %xmm2,%xmm1
add    $0x20,%rdx
add    $0xfffffffffffffffe,%rbx
cmp    %rbx,%rbp
jne    11e0 <uplo+0xe0>
neg    %rbx
test   $0x1,%r15b
je     1230 <uplo+0x130>
mov    %r14,%r13
sub    %rbx,%r13
shl    $0x4,%rbx
mov    -0x40(%rsp),%rdx
movsd  (%rdx,%rbx,1),%xmm2
mulsd  (%rdi,%r13,8),%xmm2
addsd  %xmm2,%xmm1
lea    (%r14,%r14,1),%r13d
movslq %r13d,%rdx
movsd  %xmm1,(%r8,%rdx,8)
cmp    $0x2,%ecx
jl     11a0 <uplo+0xa0>
xorpd  %xmm0,%xmm0
xor    %ebx,%ebx
cmp    $0x2,%r11d
je     128c <uplo+0x18c>
mov    -0x28(%rsp),%rdx
nopw   0x0(%rax,%rax,1)
movsd  -0x10(%rdx),%xmm1
mulsd  (%rax,%rbx,8),%xmm1
addsd  %xmm0,%xmm1
movsd  (%rdx),%xmm0
mulsd  -0x8(%rax,%rbx,8),%xmm0
addsd  %xmm1,%xmm0
add    $0x20,%rdx
add    $0xfffffffffffffffe,%rbx
cmp    %rbx,%r9
jne    1260 <uplo+0x160>
neg    %rbx
testb  $0x1,-0x30(%rsp)
je     11a0 <uplo+0xa0>
mov    %r14,%rdx
sub    %rbx,%rdx
shl    $0x4,%rbx
movsd  0x8(%r10,%rbx,1),%xmm1
mulsd  (%rdi,%rdx,8),%xmm1
addsd  %xmm1,%xmm0
jmp    11a0 <uplo+0xa0>
mov    -0x38(%rsp),%edx
cmp    %esi,%edx
mov    %edx,%eax
cmovg  %esi,%eax
test   %eax,%eax
jle    14b6 <uplo+0x3b6>
mov    %eax,%r11d
mov    %edx,%r10d
lea    -0x1(%rcx),%eax
mov    %eax,-0x28(%rsp)
mov    %r10,-0x20(%rsp)
and    $0xfffffffe,%r10d
mov    %ecx,%eax
and    $0xfffffffe,%eax
mov    %eax,-0x14(%rsp)
mov    -0x30(%rsp),%r9
and    $0xfffffffe,%r9d
mov    -0x40(%rsp),%rax
lea    0x10(%rax),%rdx
mov    %rdx,-0x8(%rsp)
add    $0x18,%rax
mov    %rax,-0x10(%rsp)
xor    %r14d,%r14d
xor    %r12d,%r12d
mov    %r11,-0x38(%rsp)
jmp    133b <uplo+0x23b>
cs nopw 0x0(%rax,%rax,1)
nop
shl    $0x3,%r13
or     $0x8,%r13
movsd  %xmm0,(%r8,%r13,1)
add    $0x1,%r12
cmp    %r11,%r12
je     14b6 <uplo+0x3b6>
xorpd  %xmm0,%xmm0
xorpd  %xmm1,%xmm1
test   %ecx,%ecx
jle    13e6 <uplo+0x2e6>
cmpl   $0x2,-0x28(%rsp)
jae    1360 <uplo+0x260>
xorpd  %xmm1,%xmm1
xor    %r15d,%r15d
mov    %r12d,%edx
jmp    13bc <uplo+0x2bc>
xchg   %ax,%ax
xorpd  %xmm2,%xmm2
mov    -0x8(%rsp),%rax
xor    %r15d,%r15d
mov    %r12d,%edx
nop
mov    %edx,%ebx
sar    $0x1f,%ebx
and    %esi,%ebx
add    %edx,%ebx
movslq %ebx,%rdx
movsd  -0x10(%rax),%xmm3
movsd  (%rax),%xmm1
mulsd  (%rdi,%rdx,8),%xmm3
addsd  %xmm2,%xmm3
test   %edx,%edx
mov    %esi,%ebx
cmovg  %r14d,%ebx
lea    -0x1(%rbx,%rdx,1),%ebp
movslq %ebp,%rbp
mulsd  (%rdi,%rbp,8),%xmm1
addsd  %xmm3,%xmm1
add    %ebx,%edx
add    $0xfffffffe,%edx
add    $0x2,%r15
add    $0x20,%rax
movapd %xmm1,%xmm2
cmp    %r15,%r10
jne    1370 <uplo+0x270>
testb  $0x1,-0x20(%rsp)
je     13e6 <uplo+0x2e6>
mov    %edx,%eax
sar    $0x1f,%eax
and    %esi,%eax
add    %edx,%eax
shl    $0x4,%r15
mov    -0x40(%rsp),%rdx
movsd  (%rdx,%r15,1),%xmm2
cltq
mulsd  (%rdi,%rax,8),%xmm2
addsd  %xmm2,%xmm1
lea    (%r12,%r12,1),%r13
mov    %r12,%rax
shl    $0x4,%rax
movsd  %xmm1,(%r8,%rax,1)
cmp    $0x2,%ecx
jl     1320 <uplo+0x220>
cmpl   $0x2,-0x14(%rsp)
jne    1420 <uplo+0x320>
xorpd  %xmm0,%xmm0
xor    %r15d,%r15d
mov    %r12d,%ebx
jmp    147d <uplo+0x37d>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
xorpd  %xmm1,%xmm1
mov    -0x10(%rsp),%rax
xor    %r15d,%r15d
mov    %r12d,%ebx
nop
mov    %ebx,%edx
sar    $0x1f,%edx
and    %esi,%edx
add    %ebx,%edx
movslq %edx,%rdx
movsd  -0x10(%rax),%xmm2
movsd  (%rax),%xmm0
mulsd  (%rdi,%rdx,8),%xmm2
addsd  %xmm1,%xmm2
test   %edx,%edx
mov    %esi,%ebx
cmovg  %r14d,%ebx
lea    -0x1(%rbx,%rdx,1),%r11d
movslq %r11d,%rbp
mulsd  (%rdi,%rbp,8),%xmm0
addsd  %xmm2,%xmm0
add    %edx,%ebx
add    $0xfffffffe,%ebx
add    $0x2,%r15
add    $0x20,%rax
movapd %xmm0,%xmm1
cmp    %r15,%r9
jne    1430 <uplo+0x330>
testb  $0x1,-0x30(%rsp)
mov    -0x38(%rsp),%r11
je     1320 <uplo+0x220>
mov    %ebx,%eax
sar    $0x1f,%eax
and    %esi,%eax
add    %ebx,%eax
shl    $0x4,%r15
mov    -0x40(%rsp),%rdx
movsd  0x8(%rdx,%r15,1),%xmm1
cltq
mulsd  (%rdi,%rax,8),%xmm1
addsd  %xmm1,%xmm0
jmp    1320 <uplo+0x220>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @uplo(double* %0, i32 %1, double* %2, i32 %3, double* %4) {
%6 = alloca double*
%7 = alloca i32
%8 = alloca double*
%9 = alloca i32
%10 = alloca double*
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca i32
%15 = alloca i32
%16 = alloca i32
%17 = alloca double
store double* %0, double** %6
store i32 %1, i32* %7
store double* %2, double** %8
store i32 %3, i32* %9
store double* %4, double** %10
%18 = load i32, i32* %9
%19 = add nsw i32 %18, 1
%20 = sdiv i32 %19, 2
store i32 %20, i32* %11
%21 = load i32, i32* %9
%22 = sdiv i32 %21, 2
store i32 %22, i32* %12
%23 = load i32, i32* %11
store i32 %23, i32* %13
br label %24
24: ; preds = %91, %5
%25 = load i32, i32* %13
%26 = load i32, i32* %7
%27 = icmp slt i32 %25, %26
br i1 %27, label %28, label %94
28: ; preds = %24
store double 0.000000e+00, double* %17
store i32 0, i32* %14
br label %29
29: ; preds = %49, %28
%30 = load i32, i32* %14
%31 = load i32, i32* %11
%32 = icmp slt i32 %30, %31
br i1 %32, label %33, label %52
33: ; preds = %29
%34 = load double*, double** %8
%35 = load i32, i32* %14
%36 = mul nsw i32 2, %35
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds double, double* %34, i64 %37
%39 = load double, double* %38
%40 = load double*, double** %6
%41 = load i32, i32* %13
%42 = load i32, i32* %14
%43 = sub nsw i32 %41, %42
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds double, double* %40, i64 %44
%46 = load double, double* %45
%47 = load double, double* %17
%48 = call double @llvm.fmuladd.f64(double %39, double %46, double %47)
store double %48, double* %17
br label %49
49: ; preds = %33
%50 = load i32, i32* %14
%51 = add nsw i32 %50, 1
store i32 %51, i32* %14
br label %29
52: ; preds = %29
%53 = load double, double* %17
%54 = load double*, double** %10
%55 = load i32, i32* %13
%56 = mul nsw i32 2, %55
%57 = sext i32 %56 to i64
%58 = getelementptr inbounds double, double* %54, i64 %57
store double %53, double* %58
store double 0.000000e+00, double* %17
store i32 0, i32* %14
br label %59
59: ; preds = %80, %52
%60 = load i32, i32* %14
%61 = load i32, i32* %12
%62 = icmp slt i32 %60, %61
br i1 %62, label %63, label %83
63: ; preds = %59
%64 = load double*, double** %8
%65 = load i32, i32* %14
%66 = mul nsw i32 2, %65
%67 = add nsw i32 %66, 1
%68 = sext i32 %67 to i64
%69 = getelementptr inbounds double, double* %64, i64 %68
%70 = load double, double* %69
%71 = load double*, double** %6
%72 = load i32, i32* %13
%73 = load i32, i32* %14
%74 = sub nsw i32 %72, %73
%75 = sext i32 %74 to i64
%76 = getelementptr inbounds double, double* %71, i64 %75
%77 = load double, double* %76
%78 = load double, double* %17
%79 = call double @llvm.fmuladd.f64(double %70, double %77, double %78)
store double %79, double* %17
br label %80
80: ; preds = %63
%81 = load i32, i32* %14
%82 = add nsw i32 %81, 1
store i32 %82, i32* %14
br label %59
83: ; preds = %59
%84 = load double, double* %17
%85 = load double*, double** %10
%86 = load i32, i32* %13
%87 = mul nsw i32 2, %86
%88 = add nsw i32 %87, 1
%89 = sext i32 %88 to i64
%90 = getelementptr inbounds double, double* %85, i64 %89
store double %84, double* %90
br label %91
91: ; preds = %83
%92 = load i32, i32* %13
%93 = add nsw i32 %92, 1
store i32 %93, i32* %13
br label %24
94: ; preds = %24
%95 = load i32, i32* %11
store i32 %95, i32* %16
%96 = load i32, i32* %16
%97 = load i32, i32* %7
%98 = icmp sgt i32 %96, %97
br i1 %98, label %99, label %101
99: ; preds = %94
%100 = load i32, i32* %7
store i32 %100, i32* %16
br label %101
101: ; preds = %99, %94
store i32 0, i32* %13
br label %102
102: ; preds = %185, %101
%103 = load i32, i32* %13
%104 = load i32, i32* %16
%105 = icmp slt i32 %103, %104
br i1 %105, label %106, label %188
106: ; preds = %102
store double 0.000000e+00, double* %17
%107 = load i32, i32* %13
store i32 %107, i32* %15
store i32 0, i32* %14
br label %108
108: ; preds = %135, %106
%109 = load i32, i32* %14
%110 = load i32, i32* %11
%111 = icmp slt i32 %109, %110
br i1 %111, label %112, label %138
112: ; preds = %108
%113 = load i32, i32* %15
%114 = icmp slt i32 %113, 0
br i1 %114, label %115, label %119
115: ; preds = %112
%116 = load i32, i32* %7
%117 = load i32, i32* %15
%118 = add nsw i32 %117, %116
store i32 %118, i32* %15
br label %119
119: ; preds = %115, %112
%120 = load double*, double** %8
%121 = load i32, i32* %14
%122 = mul nsw i32 2, %121
%123 = sext i32 %122 to i64
%124 = getelementptr inbounds double, double* %120, i64 %123
%125 = load double, double* %124
%126 = load double*, double** %6
%127 = load i32, i32* %15
%128 = sext i32 %127 to i64
%129 = getelementptr inbounds double, double* %126, i64 %128
%130 = load double, double* %129
%131 = load double, double* %17
%132 = call double @llvm.fmuladd.f64(double %125, double %130, double %131)
store double %132, double* %17
%133 = load i32, i32* %15
%134 = add nsw i32 %133, -1
store i32 %134, i32* %15
br label %135
135: ; preds = %119
%136 = load i32, i32* %14
%137 = add nsw i32 %136, 1
store i32 %137, i32* %14
br label %108
138: ; preds = %108
%139 = load double, double* %17
%140 = load double*, double** %10
%141 = load i32, i32* %13
%142 = mul nsw i32 2, %141
%143 = sext i32 %142 to i64
%144 = getelementptr inbounds double, double* %140, i64 %143
store double %139, double* %144
store double 0.000000e+00, double* %17
%145 = load i32, i32* %13
store i32 %145, i32* %15
store i32 0, i32* %14
br label %146
146: ; preds = %174, %138
%147 = load i32, i32* %14
%148 = load i32, i32* %12
%149 = icmp slt i32 %147, %148
br i1 %149, label %150, label %177
150: ; preds = %146
%151 = load i32, i32* %15
%152 = icmp slt i32 %151, 0
br i1 %152, label %153, label %157
153: ; preds = %150
%154 = load i32, i32* %7
%155 = load i32, i32* %15
%156 = add nsw i32 %155, %154
store i32 %156, i32* %15
br label %157
157: ; preds = %153, %150
%158 = load double*, double** %8
%159 = load i32, i32* %14
%160 = mul nsw i32 2, %159
%161 = add nsw i32 %160, 1
%162 = sext i32 %161 to i64
%163 = getelementptr inbounds double, double* %158, i64 %162
%164 = load double, double* %163
%165 = load double*, double** %6
%166 = load i32, i32* %15
%167 = sext i32 %166 to i64
%168 = getelementptr inbounds double, double* %165, i64 %167
%169 = load double, double* %168
%170 = load double, double* %17
%171 = call double @llvm.fmuladd.f64(double %164, double %169, double %170)
store double %171, double* %17
%172 = load i32, i32* %15
%173 = add nsw i32 %172, -1
store i32 %173, i32* %15
br label %174
174: ; preds = %157
%175 = load i32, i32* %14
%176 = add nsw i32 %175, 1
store i32 %176, i32* %14
br label %146
177: ; preds = %146
%178 = load double, double* %17
%179 = load double*, double** %10
%180 = load i32, i32* %13
%181 = mul nsw i32 2, %180
%182 = add nsw i32 %181, 1
%183 = sext i32 %182 to i64
%184 = getelementptr inbounds double, double* %179, i64 %183
store double %178, double* %184
br label %185
185: ; preds = %177
%186 = load i32, i32* %13
%187 = add nsw i32 %186, 1
store i32 %187, i32* %13
br label %102
188: ; preds = %102
ret void
}

LLVM IR (-O2):
define void @uplo(double* nocapture %0, i32 %1, double* nocapture %2, i32 %3, double* nocapture writeonly %4) {
%6 = add nsw i32 %3, 1
%7 = sdiv i32 %6, 2
%8 = sdiv i32 %3, 2
%9 = icmp slt i32 %7, %1
br i1 %9, label %10, label %115
10: ; preds = %5
%11 = icmp sgt i32 %3, 0
%12 = icmp sgt i32 %3, 1
%13 = call i32 @llvm.smax.i32(i32 %7, i32 1)
%14 = sext i32 %7 to i64
%15 = sext i32 %1 to i64
%16 = zext i32 %13 to i64
%17 = zext i32 %8 to i64
%18 = and i64 %16, 1
%19 = icmp slt i32 %3, 3
%20 = and i64 %16, 2147483646
%21 = icmp eq i64 %18, 0
%22 = and i64 %17, 1
%23 = and i32 %3, -2
%24 = icmp eq i32 %23, 2
%25 = and i64 %17, 4294967294
%26 = icmp eq i64 %22, 0
br label %27
27: ; preds = %10, %108
%28 = phi i64 [ %14, %10 ], [ %113, %108 ]
br i1 %11, label %29, label %64
29: ; preds = %27
br i1 %19, label %52, label %30
30: ; preds = %29, %30
%31 = phi i64 [ %49, %30 ], [ 0, %29 ]
%32 = phi double [ %48, %30 ], [ 0.000000e+00, %29 ]
%33 = phi i64 [ %50, %30 ], [ 0, %29 ]
%34 = shl nuw nsw i64 %31, 1
%35 = getelementptr inbounds double, double* %2, i64 %34
%36 = load double, double* %35
%37 = sub nsw i64 %28, %31
%38 = getelementptr inbounds double, double* %0, i64 %37
%39 = load double, double* %38
%40 = tail call double @llvm.fmuladd.f64(double %36, double %39, double %32)
%41 = or i64 %31, 1
%42 = shl nuw nsw i64 %41, 1
%43 = getelementptr inbounds double, double* %2, i64 %42
%44 = load double, double* %43
%45 = sub nsw i64 %28, %41
%46 = getelementptr inbounds double, double* %0, i64 %45
%47 = load double, double* %46
%48 = tail call double @llvm.fmuladd.f64(double %44, double %47, double %40)
%49 = add nuw nsw i64 %31, 2
%50 = add i64 %33, 2
%51 = icmp eq i64 %50, %20
br i1 %51, label %52, label %30
52: ; preds = %30, %29
%53 = phi double [ undef, %29 ], [ %48, %30 ]
%54 = phi i64 [ 0, %29 ], [ %49, %30 ]
%55 = phi double [ 0.000000e+00, %29 ], [ %48, %30 ]
br i1 %21, label %64, label %56
56: ; preds = %52
%57 = shl nuw nsw i64 %54, 1
%58 = getelementptr inbounds double, double* %2, i64 %57
%59 = load double, double* %58
%60 = sub nsw i64 %28, %54
%61 = getelementptr inbounds double, double* %0, i64 %60
%62 = load double, double* %61
%63 = tail call double @llvm.fmuladd.f64(double %59, double %62, double %55)
br label %64
64: ; preds = %56, %52, %27
%65 = phi double [ 0.000000e+00, %27 ], [ %53, %52 ], [ %63, %56 ]
%66 = trunc i64 %28 to i32
%67 = shl nsw i32 %66, 1
%68 = sext i32 %67 to i64
%69 = getelementptr inbounds double, double* %4, i64 %68
store double %65, double* %69
br i1 %12, label %70, label %108
70: ; preds = %64
br i1 %24, label %95, label %71
71: ; preds = %70, %71
%72 = phi i64 [ %92, %71 ], [ 0, %70 ]
%73 = phi double [ %91, %71 ], [ 0.000000e+00, %70 ]
%74 = phi i64 [ %93, %71 ], [ 0, %70 ]
%75 = shl nuw nsw i64 %72, 1
%76 = or i64 %75, 1
%77 = getelementptr inbounds double, double* %2, i64 %76
%78 = load double, double* %77
%79 = sub nsw i64 %28, %72
%80 = getelementptr inbounds double, double* %0, i64 %79
%81 = load double, double* %80
%82 = tail call double @llvm.fmuladd.f64(double %78, double %81, double %73)
%83 = or i64 %72, 1
%84 = shl nuw nsw i64 %83, 1
%85 = or i64 %84, 1
%86 = getelementptr inbounds double, double* %2, i64 %85
%87 = load double, double* %86
%88 = sub nsw i64 %28, %83
%89 = getelementptr inbounds double, double* %0, i64 %88
%90 = load double, double* %89
%91 = tail call double @llvm.fmuladd.f64(double %87, double %90, double %82)
%92 = add nuw nsw i64 %72, 2
%93 = add i64 %74, 2
%94 = icmp eq i64 %93, %25
br i1 %94, label %95, label %71
95: ; preds = %71, %70
%96 = phi double [ undef, %70 ], [ %91, %71 ]
%97 = phi i64 [ 0, %70 ], [ %92, %71 ]
%98 = phi double [ 0.000000e+00, %70 ], [ %91, %71 ]
br i1 %26, label %108, label %99
99: ; preds = %95
%100 = shl nuw nsw i64 %97, 1
%101 = or i64 %100, 1
%102 = getelementptr inbounds double, double* %2, i64 %101
%103 = load double, double* %102
%104 = sub nsw i64 %28, %97
%105 = getelementptr inbounds double, double* %0, i64 %104
%106 = load double, double* %105
%107 = tail call double @llvm.fmuladd.f64(double %103, double %106, double %98)
br label %108
108: ; preds = %99, %95, %64
%109 = phi double [ 0.000000e+00, %64 ], [ %96, %95 ], [ %107, %99 ]
%110 = or i32 %67, 1
%111 = sext i32 %110 to i64
%112 = getelementptr inbounds double, double* %4, i64 %111
store double %109, double* %112
%113 = add nsw i64 %28, 1
%114 = icmp eq i64 %113, %15
br i1 %114, label %115, label %27
115: ; preds = %108, %5
%116 = icmp sgt i32 %7, %1
%117 = select i1 %116, i32 %1, i32 %7
%118 = icmp sgt i32 %117, 0
br i1 %118, label %119, label %247
119: ; preds = %115
%120 = icmp sgt i32 %3, 0
%121 = icmp sgt i32 %3, 1
%122 = zext i32 %117 to i64
%123 = zext i32 %7 to i64
%124 = zext i32 %8 to i64
%125 = and i64 %123, 1
%126 = add i32 %3, -1
%127 = icmp ult i32 %126, 2
%128 = and i64 %123, 4294967294
%129 = icmp eq i64 %125, 0
%130 = and i64 %124, 1
%131 = and i32 %3, -2
%132 = icmp eq i32 %131, 2
%133 = and i64 %124, 4294967294
%134 = icmp eq i64 %130, 0
br label %135
135: ; preds = %119, %241
%136 = phi i64 [ 0, %119 ], [ %245, %241 ]
br i1 %120, label %137, label %186
137: ; preds = %135
%138 = trunc i64 %136 to i32
br i1 %127, label %170, label %139
139: ; preds = %137, %139
%140 = phi i64 [ %167, %139 ], [ 0, %137 ]
%141 = phi double [ %165, %139 ], [ 0.000000e+00, %137 ]
%142 = phi i32 [ %166, %139 ], [ %138, %137 ]
%143 = phi i64 [ %168, %139 ], [ 0, %137 ]
%144 = icmp slt i32 %142, 0
%145 = select i1 %144, i32 %1, i32 0
%146 = add nsw i32 %145, %142
%147 = shl nuw nsw i64 %140, 1
%148 = getelementptr inbounds double, double* %2, i64 %147
%149 = load double, double* %148
%150 = sext i32 %146 to i64
%151 = getelementptr inbounds double, double* %0, i64 %150
%152 = load double, double* %151
%153 = tail call double @llvm.fmuladd.f64(double %149, double %152, double %141)
%154 = add nsw i32 %146, -1
%155 = icmp sgt i32 %146, 0
%156 = select i1 %155, i32 0, i32 %1
%157 = add nsw i32 %156, %154
%158 = shl nuw i64 %140, 1
%159 = or i64 %158, 2
%160 = getelementptr inbounds double, double* %2, i64 %159
%161 = load double, double* %160
%162 = sext i32 %157 to i64
%163 = getelementptr inbounds double, double* %0, i64 %162
%164 = load double, double* %163
%165 = tail call double @llvm.fmuladd.f64(double %161, double %164, double %153)
%166 = add nsw i32 %157, -1
%167 = add nuw nsw i64 %140, 2
%168 = add i64 %143, 2
%169 = icmp eq i64 %168, %128
br i1 %169, label %170, label %139
170: ; preds = %139, %137
%171 = phi double [ undef, %137 ], [ %165, %139 ]
%172 = phi i64 [ 0, %137 ], [ %167, %139 ]
%173 = phi double [ 0.000000e+00, %137 ], [ %165, %139 ]
%174 = phi i32 [ %138, %137 ], [ %166, %139 ]
br i1 %129, label %186, label %175
175: ; preds = %170
%176 = icmp slt i32 %174, 0
%177 = select i1 %176, i32 %1, i32 0
%178 = add nsw i32 %177, %174
%179 = shl nuw nsw i64 %172, 1
%180 = getelementptr inbounds double, double* %2, i64 %179
%181 = load double, double* %180
%182 = sext i32 %178 to i64
%183 = getelementptr inbounds double, double* %0, i64 %182
%184 = load double, double* %183
%185 = tail call double @llvm.fmuladd.f64(double %181, double %184, double %173)
br label %186
186: ; preds = %175, %170, %135
%187 = phi double [ 0.000000e+00, %135 ], [ %171, %170 ], [ %185, %175 ]
%188 = shl nuw nsw i64 %136, 1
%189 = getelementptr inbounds double, double* %4, i64 %188
store double %187, double* %189
br i1 %121, label %190, label %241
190: ; preds = %186
%191 = trunc i64 %136 to i32
br i1 %132, label %224, label %192
192: ; preds = %190, %192
%193 = phi i64 [ %221, %192 ], [ 0, %190 ]
%194 = phi double [ %219, %192 ], [ 0.000000e+00, %190 ]
%195 = phi i32 [ %220, %192 ], [ %191, %190 ]
%196 = phi i64 [ %222, %192 ], [ 0, %190 ]
%197 = icmp slt i32 %195, 0
%198 = select i1 %197, i32 %1, i32 0
%199 = add nsw i32 %198, %195
%200 = shl nuw nsw i64 %193, 1
%201 = or i64 %200, 1
%202 = getelementptr inbounds double, double* %2, i64 %201
%203 = load double, double* %202
%204 = sext i32 %199 to i64
%205 = getelementptr inbounds double, double* %0, i64 %204
%206 = load double, double* %205
%207 = tail call double @llvm.fmuladd.f64(double %203, double %206, double %194)
%208 = add nsw i32 %199, -1
%209 = icmp sgt i32 %199, 0
%210 = select i1 %209, i32 0, i32 %1
%211 = add nsw i32 %210, %208
%212 = shl nuw i64 %193, 1
%213 = or i64 %212, 3
%214 = getelementptr inbounds double, double* %2, i64 %213
%215 = load double, double* %214
%216 = sext i32 %211 to i64
%217 = getelementptr inbounds double, double* %0, i64 %216
%218 = load double, double* %217
%219 = tail call double @llvm.fmuladd.f64(double %215, double %218, double %207)
%220 = add nsw i32 %211, -1
%221 = add nuw nsw i64 %193, 2
%222 = add i64 %196, 2
%223 = icmp eq i64 %222, %133
br i1 %223, label %224, label %192
224: ; preds = %192, %190
%225 = phi double [ undef, %190 ], [ %219, %192 ]
%226 = phi i64 [ 0, %190 ], [ %221, %192 ]
%227 = phi double [ 0.000000e+00, %190 ], [ %219, %192 ]
%228 = phi i32 [ %191, %190 ], [ %220, %192 ]
br i1 %134, label %241, label %229
229: ; preds = %224
%230 = icmp slt i32 %228, 0
%231 = select i1 %230, i32 %1, i32 0
%232 = add nsw i32 %231, %228
%233 = shl nuw nsw i64 %226, 1
%234 = or i64 %233, 1
%235 = getelementptr inbounds double, double* %2, i64 %234
%236 = load double, double* %235
%237 = sext i32 %232 to i64
%238 = getelementptr inbounds double, double* %0, i64 %237
%239 = load double, double* %238
%240 = tail call double @llvm.fmuladd.f64(double %236, double %239, double %227)
br label %241
241: ; preds = %229, %224, %186
%242 = phi double [ 0.000000e+00, %186 ], [ %225, %224 ], [ %240, %229 ]
%243 = or i64 %188, 1
%244 = getelementptr inbounds double, double* %4, i64 %243
store double %242, double* %244
%245 = add nuw nsw i64 %136, 1
%246 = icmp eq i64 %245, %122
br i1 %246, label %247, label %135
247: ; preds = %241, %115
ret void
}