void radb2(int ido, int l1, const double cc[], double ch[],
           const double wa1[]) {
  int i, k, ic;
  double ti2, tr2;
  for (k = 0; k < l1; k++) {
    ch[k * ido] = cc[2 * k * ido] + cc[ido - 1 + (2 * k + 1) * ido];
    ch[(k + l1) * ido] = cc[2 * k * ido] - cc[ido - 1 + (2 * k + 1) * ido];
  }
  if (ido < 2)
    return;
  if (ido != 2) {
    for (k = 0; k < l1; ++k) {
      for (i = 2; i < ido; i += 2) {
        ic = ido - i;
        ch[i - 1 + k * ido] =
            cc[i - 1 + 2 * k * ido] + cc[ic - 1 + (2 * k + 1) * ido];
        tr2 = cc[i - 1 + 2 * k * ido] - cc[ic - 1 + (2 * k + 1) * ido];
        ch[i + k * ido] = cc[i + 2 * k * ido] - cc[ic + (2 * k + 1) * ido];
        ti2 = cc[i + (2 * k) * ido] + cc[ic + (2 * k + 1) * ido];
        ch[i - 1 + (k + l1) * ido] = wa1[i - 2] * tr2 - wa1[i - 1] * ti2;
        ch[i + (k + l1) * ido] = wa1[i - 2] * ti2 + wa1[i - 1] * tr2;
      }
    }
    if (ido % 2 == 1)
      return;
  }
  for (k = 0; k < l1; k++) {
    ch[ido - 1 + k * ido] = 2 * cc[ido - 1 + 2 * k * ido];
    ch[ido - 1 + (k + l1) * ido] = -2 * cc[(2 * k + 1) * ido];
  }
}


x86 assembly (clang, -O0):
<radb2>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %rdx,-0x10(%rbp)
mov    %rcx,-0x18(%rbp)
mov    %r8,-0x20(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    11ce <radb2+0xce>
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%ecx
shl    $0x1,%ecx
imul   -0x4(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x4(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
add    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
addsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
imul   -0x4(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%ecx
shl    $0x1,%ecx
imul   -0x4(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x4(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
add    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
subsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    -0x8(%rbp),%ecx
imul   -0x4(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    111d <radb2+0x1d>
cmpl   $0x2,-0x4(%rbp)
jge    11dd <radb2+0xdd>
jmp    14df <radb2+0x3df>
cmpl   $0x2,-0x4(%rbp)
je     143e <radb2+0x33e>
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1420 <radb2+0x320>
movl   $0x2,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    140d <radb2+0x30d>
mov    -0x4(%rbp),%eax
sub    -0x24(%rbp),%eax
mov    %eax,-0x2c(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x2c(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
add    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
addsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x24(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x2c(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
add    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
subsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x2c(%rbp),%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
add    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
subsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x24(%rbp),%ecx
mov    -0x28(%rbp),%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x2c(%rbp),%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
add    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
addsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x24(%rbp),%ecx
sub    $0x2,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  -0x40(%rbp),%xmm2
mov    -0x20(%rbp),%rax
mov    -0x24(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm1
mulsd  -0x38(%rbp),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x18(%rbp),%rax
mov    -0x24(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
add    -0x8(%rbp),%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x20(%rbp),%rax
mov    -0x24(%rbp),%ecx
sub    $0x2,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  -0x38(%rbp),%xmm2
mov    -0x20(%rbp),%rax
mov    -0x24(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm1
mulsd  -0x40(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x18(%rbp),%rax
mov    -0x24(%rbp),%ecx
mov    -0x28(%rbp),%edx
add    -0x8(%rbp),%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x24(%rbp)
jmp    1201 <radb2+0x101>
jmp    1412 <radb2+0x312>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    11ee <radb2+0xee>
mov    -0x4(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
cmp    $0x1,%edx
jne    1439 <radb2+0x339>
jmp    14df <radb2+0x3df>
jmp    143e <radb2+0x33e>
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    14df <radb2+0x3df>
mov    -0x10(%rbp),%rax
mov    -0x4(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
shl    $0x1,%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  0xb96(%rip),%xmm0
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x4(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%ecx
shl    $0x1,%ecx
add    $0x1,%ecx
imul   -0x4(%rbp),%ecx
movslq %ecx,%rcx
movsd  0xb52(%rip),%xmm0
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x4(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
add    -0x8(%rbp),%edx
imul   -0x4(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1445 <radb2+0x345>
pop    %rbp
ret

x86 assembly (clang, -O2):
<radb2>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
test   %esi,%esi
jle    115a <radb2+0x5a>
movslq %edi,%r9
lea    (%r9,%r9,1),%rbp
mov    %esi,%eax
mov    %r9,%rbx
imul   %rax,%rbx
lea    (%rcx,%rbx,8),%r10
shl    $0x3,%r9
lea    (%rdx,%rbp,8),%rbp
add    $0xfffffffffffffff8,%rbp
xor    %ebx,%ebx
movsd  (%rdx,%rbx,2),%xmm0
addsd  0x0(%rbp,%rbx,2),%xmm0
movsd  %xmm0,(%rcx,%rbx,1)
movsd  (%rdx,%rbx,2),%xmm0
subsd  0x0(%rbp,%rbx,2),%xmm0
movsd  %xmm0,(%r10,%rbx,1)
add    %r9,%rbx
add    $0xffffffffffffffff,%rax
jne    1130 <radb2+0x30>
cmp    $0x2,%edi
jl     1336 <radb2+0x236>
je     12d0 <radb2+0x1d0>
test   %esi,%esi
jle    1336 <radb2+0x236>
mov    %edi,%r10d
mov    %esi,-0x2c(%rsp)
mov    %esi,%eax
mov    %rax,-0x8(%rsp)
imul   %r10,%rax
lea    (%rcx,%rax,8),%rax
lea    0x0(,%r10,8),%rsi
mov    %rsi,-0x10(%rsp)
lea    (%rdi,%rdi,1),%ebp
lea    (%rdi,%rdi,1),%r12d
add    $0xfffffffd,%r12d
lea    -0x10(%rdx),%rsi
mov    %rsi,-0x18(%rsp)
xor    %r13d,%r13d
mov    %rdi,-0x20(%rsp)
mov    %edi,%r15d
mov    %rcx,-0x28(%rsp)
mov    %rcx,%rbx
mov    %ebp,%ecx
xor    %r9d,%r9d
mov    -0x18(%rsp),%rbp
cs nopw 0x0(%rax,%rax,1)
nop
movslq %r13d,%rsi
lea    (%rdx,%rsi,8),%rsi
movslq %r15d,%rdi
add    %r10,%rdi
lea    0x0(,%rdi,8),%rdi
add    %rbp,%rdi
mov    $0x2,%r14d
mov    %r12d,%r11d
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  -0x8(%rsi,%r14,8),%xmm0
movslq %r11d,%r11
addsd  (%rdx,%r11,8),%xmm0
movsd  %xmm0,-0x8(%rbx,%r14,8)
movsd  -0x8(%rsi,%r14,8),%xmm0
movsd  (%rsi,%r14,8),%xmm1
subsd  (%rdx,%r11,8),%xmm0
subsd  (%rdi),%xmm1
movsd  %xmm1,(%rbx,%r14,8)
movsd  (%rsi,%r14,8),%xmm1
addsd  (%rdi),%xmm1
movsd  -0x8(%r8,%r14,8),%xmm2
mulsd  %xmm1,%xmm2
movsd  -0x10(%r8,%r14,8),%xmm3
mulsd  %xmm0,%xmm3
subsd  %xmm2,%xmm3
movsd  %xmm3,-0x8(%rax,%r14,8)
mulsd  -0x8(%r8,%r14,8),%xmm0
mulsd  -0x10(%r8,%r14,8),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,(%rax,%r14,8)
add    $0x2,%r14
add    $0xfffffffe,%r11d
add    $0xfffffffffffffff0,%rdi
cmp    %r10,%r14
jb     1200 <radb2+0x100>
add    $0x1,%r9
mov    -0x10(%rsp),%rsi
add    %rsi,%rax
add    %rsi,%rbx
add    %ecx,%r13d
add    %ecx,%r12d
add    %ecx,%r15d
cmp    -0x8(%rsp),%r9
jne    11d0 <radb2+0xd0>
mov    -0x20(%rsp),%rdi
mov    %edi,%eax
shr    $0x1f,%eax
add    %edi,%eax
and    $0xfffffffe,%eax
mov    %edi,%esi
sub    %eax,%esi
cmp    $0x1,%esi
mov    -0x2c(%rsp),%esi
mov    -0x28(%rsp),%rcx
je     1336 <radb2+0x236>
test   %esi,%esi
jle    1336 <radb2+0x236>
movslq %edi,%rbp
mov    %esi,%eax
mov    %rbp,%rsi
imul   %rax,%rsi
add    %rbp,%rsi
add    $0xffffffffffffffff,%rsi
lea    (%rcx,%rsi,8),%rsi
lea    0x0(,%rbp,8),%rdi
lea    (%rcx,%rbp,8),%rcx
add    $0xfffffffffffffff8,%rcx
lea    (%rdx,%rbp,8),%rdx
xor    %ebp,%ebp
movsd  0xcf7(%rip),%xmm0
nopl   0x0(%rax)
movsd  -0x8(%rdx,%rbp,2),%xmm1
addsd  %xmm1,%xmm1
movsd  %xmm1,(%rcx,%rbp,1)
movsd  (%rdx,%rbp,2),%xmm1
mulsd  %xmm0,%xmm1
movsd  %xmm1,(%rsi,%rbp,1)
add    %rdi,%rbp
add    $0xffffffffffffffff,%rax
jne    1310 <radb2+0x210>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @radb2(i32 %0, i32 %1, double* %2, double* %3, double* %4) {
%6 = alloca i32
%7 = alloca i32
%8 = alloca double*
%9 = alloca double*
%10 = alloca double*
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca double
%15 = alloca double
store i32 %0, i32* %6
store i32 %1, i32* %7
store double* %2, double** %8
store double* %3, double** %9
store double* %4, double** %10
store i32 0, i32* %12
br label %16
16: ; preds = %77, %5
%17 = load i32, i32* %12
%18 = load i32, i32* %7
%19 = icmp slt i32 %17, %18
br i1 %19, label %20, label %80
20: ; preds = %16
%21 = load double*, double** %8
%22 = load i32, i32* %12
%23 = mul nsw i32 2, %22
%24 = load i32, i32* %6
%25 = mul nsw i32 %23, %24
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds double, double* %21, i64 %26
%28 = load double, double* %27
%29 = load double*, double** %8
%30 = load i32, i32* %6
%31 = sub nsw i32 %30, 1
%32 = load i32, i32* %12
%33 = mul nsw i32 2, %32
%34 = add nsw i32 %33, 1
%35 = load i32, i32* %6
%36 = mul nsw i32 %34, %35
%37 = add nsw i32 %31, %36
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds double, double* %29, i64 %38
%40 = load double, double* %39
%41 = fadd double %28, %40
%42 = load double*, double** %9
%43 = load i32, i32* %12
%44 = load i32, i32* %6
%45 = mul nsw i32 %43, %44
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds double, double* %42, i64 %46
store double %41, double* %47
%48 = load double*, double** %8
%49 = load i32, i32* %12
%50 = mul nsw i32 2, %49
%51 = load i32, i32* %6
%52 = mul nsw i32 %50, %51
%53 = sext i32 %52 to i64
%54 = getelementptr inbounds double, double* %48, i64 %53
%55 = load double, double* %54
%56 = load double*, double** %8
%57 = load i32, i32* %6
%58 = sub nsw i32 %57, 1
%59 = load i32, i32* %12
%60 = mul nsw i32 2, %59
%61 = add nsw i32 %60, 1
%62 = load i32, i32* %6
%63 = mul nsw i32 %61, %62
%64 = add nsw i32 %58, %63
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds double, double* %56, i64 %65
%67 = load double, double* %66
%68 = fsub double %55, %67
%69 = load double*, double** %9
%70 = load i32, i32* %12
%71 = load i32, i32* %7
%72 = add nsw i32 %70, %71
%73 = load i32, i32* %6
%74 = mul nsw i32 %72, %73
%75 = sext i32 %74 to i64
%76 = getelementptr inbounds double, double* %69, i64 %75
store double %68, double* %76
br label %77
77: ; preds = %20
%78 = load i32, i32* %12
%79 = add nsw i32 %78, 1
store i32 %79, i32* %12
br label %16
80: ; preds = %16
%81 = load i32, i32* %6
%82 = icmp slt i32 %81, 2
br i1 %82, label %83, label %84
83: ; preds = %80
br label %328
84: ; preds = %80
%85 = load i32, i32* %6
%86 = icmp ne i32 %85, 2
br i1 %86, label %87, label %277
87: ; preds = %84
store i32 0, i32* %12
br label %88
88: ; preds = %268, %87
%89 = load i32, i32* %12
%90 = load i32, i32* %7
%91 = icmp slt i32 %89, %90
br i1 %91, label %92, label %271
92: ; preds = %88
store i32 2, i32* %11
br label %93
93: ; preds = %264, %92
%94 = load i32, i32* %11
%95 = load i32, i32* %6
%96 = icmp slt i32 %94, %95
br i1 %96, label %97, label %267
97: ; preds = %93
%98 = load i32, i32* %6
%99 = load i32, i32* %11
%100 = sub nsw i32 %98, %99
store i32 %100, i32* %13
%101 = load double*, double** %8
%102 = load i32, i32* %11
%103 = sub nsw i32 %102, 1
%104 = load i32, i32* %12
%105 = mul nsw i32 2, %104
%106 = load i32, i32* %6
%107 = mul nsw i32 %105, %106
%108 = add nsw i32 %103, %107
%109 = sext i32 %108 to i64
%110 = getelementptr inbounds double, double* %101, i64 %109
%111 = load double, double* %110
%112 = load double*, double** %8
%113 = load i32, i32* %13
%114 = sub nsw i32 %113, 1
%115 = load i32, i32* %12
%116 = mul nsw i32 2, %115
%117 = add nsw i32 %116, 1
%118 = load i32, i32* %6
%119 = mul nsw i32 %117, %118
%120 = add nsw i32 %114, %119
%121 = sext i32 %120 to i64
%122 = getelementptr inbounds double, double* %112, i64 %121
%123 = load double, double* %122
%124 = fadd double %111, %123
%125 = load double*, double** %9
%126 = load i32, i32* %11
%127 = sub nsw i32 %126, 1
%128 = load i32, i32* %12
%129 = load i32, i32* %6
%130 = mul nsw i32 %128, %129
%131 = add nsw i32 %127, %130
%132 = sext i32 %131 to i64
%133 = getelementptr inbounds double, double* %125, i64 %132
store double %124, double* %133
%134 = load double*, double** %8
%135 = load i32, i32* %11
%136 = sub nsw i32 %135, 1
%137 = load i32, i32* %12
%138 = mul nsw i32 2, %137
%139 = load i32, i32* %6
%140 = mul nsw i32 %138, %139
%141 = add nsw i32 %136, %140
%142 = sext i32 %141 to i64
%143 = getelementptr inbounds double, double* %134, i64 %142
%144 = load double, double* %143
%145 = load double*, double** %8
%146 = load i32, i32* %13
%147 = sub nsw i32 %146, 1
%148 = load i32, i32* %12
%149 = mul nsw i32 2, %148
%150 = add nsw i32 %149, 1
%151 = load i32, i32* %6
%152 = mul nsw i32 %150, %151
%153 = add nsw i32 %147, %152
%154 = sext i32 %153 to i64
%155 = getelementptr inbounds double, double* %145, i64 %154
%156 = load double, double* %155
%157 = fsub double %144, %156
store double %157, double* %15
%158 = load double*, double** %8
%159 = load i32, i32* %11
%160 = load i32, i32* %12
%161 = mul nsw i32 2, %160
%162 = load i32, i32* %6
%163 = mul nsw i32 %161, %162
%164 = add nsw i32 %159, %163
%165 = sext i32 %164 to i64
%166 = getelementptr inbounds double, double* %158, i64 %165
%167 = load double, double* %166
%168 = load double*, double** %8
%169 = load i32, i32* %13
%170 = load i32, i32* %12
%171 = mul nsw i32 2, %170
%172 = add nsw i32 %171, 1
%173 = load i32, i32* %6
%174 = mul nsw i32 %172, %173
%175 = add nsw i32 %169, %174
%176 = sext i32 %175 to i64
%177 = getelementptr inbounds double, double* %168, i64 %176
%178 = load double, double* %177
%179 = fsub double %167, %178
%180 = load double*, double** %9
%181 = load i32, i32* %11
%182 = load i32, i32* %12
%183 = load i32, i32* %6
%184 = mul nsw i32 %182, %183
%185 = add nsw i32 %181, %184
%186 = sext i32 %185 to i64
%187 = getelementptr inbounds double, double* %180, i64 %186
store double %179, double* %187
%188 = load double*, double** %8
%189 = load i32, i32* %11
%190 = load i32, i32* %12
%191 = mul nsw i32 2, %190
%192 = load i32, i32* %6
%193 = mul nsw i32 %191, %192
%194 = add nsw i32 %189, %193
%195 = sext i32 %194 to i64
%196 = getelementptr inbounds double, double* %188, i64 %195
%197 = load double, double* %196
%198 = load double*, double** %8
%199 = load i32, i32* %13
%200 = load i32, i32* %12
%201 = mul nsw i32 2, %200
%202 = add nsw i32 %201, 1
%203 = load i32, i32* %6
%204 = mul nsw i32 %202, %203
%205 = add nsw i32 %199, %204
%206 = sext i32 %205 to i64
%207 = getelementptr inbounds double, double* %198, i64 %206
%208 = load double, double* %207
%209 = fadd double %197, %208
store double %209, double* %14
%210 = load double*, double** %10
%211 = load i32, i32* %11
%212 = sub nsw i32 %211, 2
%213 = sext i32 %212 to i64
%214 = getelementptr inbounds double, double* %210, i64 %213
%215 = load double, double* %214
%216 = load double, double* %15
%217 = load double*, double** %10
%218 = load i32, i32* %11
%219 = sub nsw i32 %218, 1
%220 = sext i32 %219 to i64
%221 = getelementptr inbounds double, double* %217, i64 %220
%222 = load double, double* %221
%223 = load double, double* %14
%224 = fmul double %222, %223
%225 = fneg double %224
%226 = call double @llvm.fmuladd.f64(double %215, double %216, double %225)
%227 = load double*, double** %9
%228 = load i32, i32* %11
%229 = sub nsw i32 %228, 1
%230 = load i32, i32* %12
%231 = load i32, i32* %7
%232 = add nsw i32 %230, %231
%233 = load i32, i32* %6
%234 = mul nsw i32 %232, %233
%235 = add nsw i32 %229, %234
%236 = sext i32 %235 to i64
%237 = getelementptr inbounds double, double* %227, i64 %236
store double %226, double* %237
%238 = load double*, double** %10
%239 = load i32, i32* %11
%240 = sub nsw i32 %239, 2
%241 = sext i32 %240 to i64
%242 = getelementptr inbounds double, double* %238, i64 %241
%243 = load double, double* %242
%244 = load double, double* %14
%245 = load double*, double** %10
%246 = load i32, i32* %11
%247 = sub nsw i32 %246, 1
%248 = sext i32 %247 to i64
%249 = getelementptr inbounds double, double* %245, i64 %248
%250 = load double, double* %249
%251 = load double, double* %15
%252 = fmul double %250, %251
%253 = call double @llvm.fmuladd.f64(double %243, double %244, double %252)
%254 = load double*, double** %9
%255 = load i32, i32* %11
%256 = load i32, i32* %12
%257 = load i32, i32* %7
%258 = add nsw i32 %256, %257
%259 = load i32, i32* %6
%260 = mul nsw i32 %258, %259
%261 = add nsw i32 %255, %260
%262 = sext i32 %261 to i64
%263 = getelementptr inbounds double, double* %254, i64 %262
store double %253, double* %263
br label %264
264: ; preds = %97
%265 = load i32, i32* %11
%266 = add nsw i32 %265, 2
store i32 %266, i32* %11
br label %93
267: ; preds = %93
br label %268
268: ; preds = %267
%269 = load i32, i32* %12
%270 = add nsw i32 %269, 1
store i32 %270, i32* %12
br label %88
271: ; preds = %88
%272 = load i32, i32* %6
%273 = srem i32 %272, 2
%274 = icmp eq i32 %273, 1
br i1 %274, label %275, label %276
275: ; preds = %271
br label %328
276: ; preds = %271
br label %277
277: ; preds = %276, %84
store i32 0, i32* %12
br label %278
278: ; preds = %325, %277
%279 = load i32, i32* %12
%280 = load i32, i32* %7
%281 = icmp slt i32 %279, %280
br i1 %281, label %282, label %328
282: ; preds = %278
%283 = load double*, double** %8
%284 = load i32, i32* %6
%285 = sub nsw i32 %284, 1
%286 = load i32, i32* %12
%287 = mul nsw i32 2, %286
%288 = load i32, i32* %6
%289 = mul nsw i32 %287, %288
%290 = add nsw i32 %285, %289
%291 = sext i32 %290 to i64
%292 = getelementptr inbounds double, double* %283, i64 %291
%293 = load double, double* %292
%294 = fmul double 2.000000e+00, %293
%295 = load double*, double** %9
%296 = load i32, i32* %6
%297 = sub nsw i32 %296, 1
%298 = load i32, i32* %12
%299 = load i32, i32* %6
%300 = mul nsw i32 %298, %299
%301 = add nsw i32 %297, %300
%302 = sext i32 %301 to i64
%303 = getelementptr inbounds double, double* %295, i64 %302
store double %294, double* %303
%304 = load double*, double** %8
%305 = load i32, i32* %12
%306 = mul nsw i32 2, %305
%307 = add nsw i32 %306, 1
%308 = load i32, i32* %6
%309 = mul nsw i32 %307, %308
%310 = sext i32 %309 to i64
%311 = getelementptr inbounds double, double* %304, i64 %310
%312 = load double, double* %311
%313 = fmul double -2.000000e+00, %312
%314 = load double*, double** %9
%315 = load i32, i32* %6
%316 = sub nsw i32 %315, 1
%317 = load i32, i32* %12
%318 = load i32, i32* %7
%319 = add nsw i32 %317, %318
%320 = load i32, i32* %6
%321 = mul nsw i32 %319, %320
%322 = add nsw i32 %316, %321
%323 = sext i32 %322 to i64
%324 = getelementptr inbounds double, double* %314, i64 %323
store double %313, double* %324
br label %325
325: ; preds = %282
%326 = load i32, i32* %12
%327 = add nsw i32 %326, 1
store i32 %327, i32* %12
br label %278
328: ; preds = %83, %275, %278
ret void
}

LLVM IR (-O2):
define void @radb2(i32 %0, i32 %1, double* nocapture %2, double* nocapture writeonly %3, double* nocapture %4) {
%6 = icmp sgt i32 %1, 0
br i1 %6, label %7, label %35
7: ; preds = %5
%8 = add nsw i32 %0, -1
%9 = sext i32 %0 to i64
%10 = sext i32 %8 to i64
%11 = zext i32 %1 to i64
%12 = zext i32 %1 to i64
br label %13
13: ; preds = %7, %13
%14 = phi i64 [ 0, %7 ], [ %33, %13 ]
%15 = shl nuw nsw i64 %14, 1
%16 = mul nsw i64 %15, %9
%17 = getelementptr inbounds double, double* %2, i64 %16
%18 = load double, double* %17
%19 = or i64 %15, 1
%20 = mul nsw i64 %19, %9
%21 = add nsw i64 %20, %10
%22 = getelementptr inbounds double, double* %2, i64 %21
%23 = load double, double* %22
%24 = fadd double %18, %23
%25 = mul nsw i64 %14, %9
%26 = getelementptr inbounds double, double* %3, i64 %25
store double %24, double* %26
%27 = load double, double* %17
%28 = load double, double* %22
%29 = fsub double %27, %28
%30 = add nuw nsw i64 %14, %11
%31 = mul nsw i64 %30, %9
%32 = getelementptr inbounds double, double* %3, i64 %31
store double %29, double* %32
%33 = add nuw nsw i64 %14, 1
%34 = icmp eq i64 %33, %12
br i1 %34, label %35, label %13
35: ; preds = %13, %5
%36 = icmp slt i32 %0, 2
br i1 %36, label %142, label %37
37: ; preds = %35
%38 = icmp eq i32 %0, 2
br i1 %38, label %113, label %39
39: ; preds = %37
br i1 %6, label %40, label %142
40: ; preds = %39
%41 = zext i32 %0 to i64
%42 = zext i32 %1 to i64
%43 = zext i32 %1 to i64
br label %44
44: ; preds = %40, %106
%45 = phi i64 [ 0, %40 ], [ %107, %106 ]
%46 = shl nuw nsw i64 %45, 1
%47 = trunc i64 %46 to i32
%48 = mul nsw i32 %47, %0
%49 = trunc i64 %46 to i32
%50 = or i32 %49, 1
%51 = mul nsw i32 %50, %0
%52 = mul nsw i64 %45, %41
%53 = add nuw nsw i64 %45, %42
%54 = mul nsw i64 %53, %41
%55 = sext i32 %48 to i64
%56 = sext i32 %51 to i64
br label %57
57: ; preds = %44, %57
%58 = phi i64 [ 2, %44 ], [ %104, %57 ]
%59 = sub nsw i64 %41, %58
%60 = add nsw i64 %58, -1
%61 = add nsw i64 %60, %55
%62 = getelementptr inbounds double, double* %2, i64 %61
%63 = load double, double* %62
%64 = trunc i64 %59 to i32
%65 = add i32 %51, %64
%66 = add i32 %65, -1
%67 = sext i32 %66 to i64
%68 = getelementptr inbounds double, double* %2, i64 %67
%69 = load double, double* %68
%70 = fadd double %63, %69
%71 = add nsw i64 %60, %52
%72 = getelementptr inbounds double, double* %3, i64 %71
store double %70, double* %72
%73 = load double, double* %62
%74 = load double, double* %68
%75 = fsub double %73, %74
%76 = add nsw i64 %58, %55
%77 = getelementptr inbounds double, double* %2, i64 %76
%78 = load double, double* %77
%79 = add nsw i64 %59, %56
%80 = getelementptr inbounds double, double* %2, i64 %79
%81 = load double, double* %80
%82 = fsub double %78, %81
%83 = add nuw nsw i64 %58, %52
%84 = getelementptr inbounds double, double* %3, i64 %83
store double %82, double* %84
%85 = load double, double* %77
%86 = load double, double* %80
%87 = fadd double %85, %86
%88 = add nsw i64 %58, -2
%89 = getelementptr inbounds double, double* %4, i64 %88
%90 = load double, double* %89
%91 = getelementptr inbounds double, double* %4, i64 %60
%92 = load double, double* %91
%93 = fneg double %92
%94 = fmul double %87, %93
%95 = tail call double @llvm.fmuladd.f64(double %90, double %75, double %94)
%96 = add nsw i64 %60, %54
%97 = getelementptr inbounds double, double* %3, i64 %96
store double %95, double* %97
%98 = load double, double* %89
%99 = load double, double* %91
%100 = fmul double %75, %99
%101 = tail call double @llvm.fmuladd.f64(double %98, double %87, double %100)
%102 = add nuw nsw i64 %58, %54
%103 = getelementptr inbounds double, double* %3, i64 %102
store double %101, double* %103
%104 = add nuw nsw i64 %58, 2
%105 = icmp ult i64 %104, %41
br i1 %105, label %57, label %106
106: ; preds = %57
%107 = add nuw nsw i64 %45, 1
%108 = icmp eq i64 %107, %43
br i1 %108, label %109, label %44
109: ; preds = %106
%110 = srem i32 %0, 2
%111 = icmp ne i32 %110, 1
%112 = and i1 %111, %6
br i1 %112, label %114, label %142
113: ; preds = %37
br i1 %6, label %114, label %142
114: ; preds = %109, %113
%115 = add nsw i32 %0, -1
%116 = sext i32 %0 to i64
%117 = sext i32 %115 to i64
%118 = zext i32 %1 to i64
%119 = zext i32 %1 to i64
br label %120
120: ; preds = %114, %120
%121 = phi i64 [ 0, %114 ], [ %140, %120 ]
%122 = shl nuw nsw i64 %121, 1
%123 = mul nsw i64 %122, %116
%124 = add nsw i64 %123, %117
%125 = getelementptr inbounds double, double* %2, i64 %124
%126 = load double, double* %125
%127 = fmul double %126, 2.000000e+00
%128 = mul nsw i64 %121, %116
%129 = add nsw i64 %128, %117
%130 = getelementptr inbounds double, double* %3, i64 %129
store double %127, double* %130
%131 = or i64 %122, 1
%132 = mul nsw i64 %131, %116
%133 = getelementptr inbounds double, double* %2, i64 %132
%134 = load double, double* %133
%135 = fmul double %134, -2.000000e+00
%136 = add nuw nsw i64 %121, %118
%137 = mul nsw i64 %136, %116
%138 = add nsw i64 %137, %117
%139 = getelementptr inbounds double, double* %3, i64 %138
store double %135, double* %139
%140 = add nuw nsw i64 %121, 1
%141 = icmp eq i64 %140, %119
br i1 %141, label %142, label %120
142: ; preds = %120, %39, %113, %109, %35
ret void
}