void dfst(int n, double *a) {
  void ddst(int n, int isgn, double *a);
  void bitrv1(int n, double *a);
  int j, k, m, mh;
  double xr, xi, yr, yi;
  m = n >> 1;
  for (j = 1; j < m; j++) {
    k = n - j;
    xr = a[j] - a[k];
    a[j] += a[k];
    a[k] = xr;
  }
  a[0] = a[m];
  while (m >= 2) {
    ddst(m, 1, a);
    bitrv1(m, a);
    mh = m >> 1;
    for (j = 1; j < mh; j++) {
      k = m - j;
      xr = a[m + k];
      xi = a[m + j];
      yr = a[j];
      yi = a[k];
      a[m + j] = yr;
      a[m + k] = yi;
      a[j] = xr + xi;
      a[k] = xr - xi;
    }
    a[m] = a[0];
    a[0] = a[m + mh];
    a[m + mh] = a[mh];
    m = mh;
  }
  a[1] = a[0];
  a[0] = 0;
  bitrv1(n, a);
}


x86 assembly (clang, -O0):
<dfst>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x4(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x1c(%rbp)
movl   $0x1,-0x14(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    11b2 <dfst+0x92>
mov    -0x4(%rbp),%eax
sub    -0x14(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
addsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x28(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    113f <dfst+0x1f>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movsd  %xmm0,(%rax)
cmpl   $0x2,-0x1c(%rbp)
jl     1328 <dfst+0x208>
mov    -0x1c(%rbp),%edi
mov    -0x10(%rbp),%rdx
mov    $0x1,%esi
call   1040 <ddst@plt>
mov    -0x1c(%rbp),%edi
mov    -0x10(%rbp),%rsi
call   1030 <bitrv1@plt>
mov    -0x1c(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x20(%rbp)
movl   $0x1,-0x14(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0x20(%rbp),%eax
jge    12cf <dfst+0x1af>
mov    -0x1c(%rbp),%eax
sub    -0x14(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x18(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x14(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x38(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x14(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x40(%rbp),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x18(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x28(%rbp),%xmm0
addsd  -0x30(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x28(%rbp),%xmm0
subsd  -0x30(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x18(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    11fe <dfst+0xde>
mov    -0x10(%rbp),%rax
movsd  (%rax),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x20(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0x20(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x20(%rbp),%eax
mov    %eax,-0x1c(%rbp)
jmp    11c7 <dfst+0xa7>
mov    -0x10(%rbp),%rax
movsd  (%rax),%xmm0
mov    -0x10(%rbp),%rax
movsd  %xmm0,0x8(%rax)
mov    -0x10(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax)
mov    -0x4(%rbp),%edi
mov    -0x10(%rbp),%rsi
call   1030 <bitrv1@plt>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<dfst>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %rsi,%rbx
mov    %edi,%r12d
sar    %r12d
cmp    $0x3,%edi
jle    1501 <dfst+0x3e1>
cmp    $0x3,%r12d
mov    $0x2,%eax
cmovge %r12d,%eax
mov    %edi,%r8d
add    $0xffffffffffffffff,%rax
mov    $0x1,%edx
cmp    $0x6,%edi
jl     11d6 <dfst+0xb6>
lea    (%rbx,%r8,8),%rsi
add    $0xfffffffffffffff8,%rsi
mov    %rax,%rcx
and    $0xfffffffffffffffe,%rcx
neg    %rcx
mov    $0x1,%edx
cs nopw 0x0(%rax,%rax,1)
nop
movsd  (%rbx,%rdx,8),%xmm0
movsd  (%rsi),%xmm1
movapd %xmm0,%xmm2
subsd  %xmm1,%xmm2
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rbx,%rdx,8)
movsd  %xmm2,(%rsi)
movsd  0x8(%rbx,%rdx,8),%xmm0
movsd  -0x8(%rsi),%xmm1
movapd %xmm0,%xmm2
subsd  %xmm1,%xmm2
addsd  %xmm1,%xmm0
movsd  %xmm0,0x8(%rbx,%rdx,8)
movsd  %xmm2,-0x8(%rsi)
add    $0xfffffffffffffff0,%rsi
lea    (%rcx,%rdx,1),%rbp
add    $0x2,%rbp
add    $0x2,%rdx
cmp    $0x1,%rbp
jne    1180 <dfst+0x60>
test   $0x1,%al
je     11ff <dfst+0xdf>
sub    %rdx,%r8
movsd  (%rbx,%rdx,8),%xmm0
movsd  (%rbx,%r8,8),%xmm1
movapd %xmm0,%xmm2
subsd  %xmm1,%xmm2
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rbx,%rdx,8)
movsd  %xmm2,(%rbx,%r8,8)
movslq %r12d,%rax
movsd  (%rbx,%rax,8),%xmm0
movsd  %xmm0,(%rbx)
cmp    $0x4,%edi
jl     1515 <dfst+0x3f5>
mov    %edi,0x14(%rsp)
lea    -0x8(%rbx),%r14
lea    0x8(%rbx),%rax
mov    %rax,0x20(%rsp)
lea    -0x10(%rbx),%rax
mov    %rax,0x18(%rsp)
mov    %r14,0x8(%rsp)
jmp    1273 <dfst+0x153>
cs nopw 0x0(%rax,%rax,1)
nop
mov    %r15d,%r13d
lea    (%r12,%r15,1),%eax
movsd  (%rbx),%xmm0
movsd  %xmm0,(%rbx,%r13,8)
cltq
movsd  (%rbx,%rax,8),%xmm0
movsd  %xmm0,(%rbx)
mov    %r12d,%ecx
movsd  (%rbx,%rcx,8),%xmm0
movsd  %xmm0,(%rbx,%rax,8)
cmp    $0x3,%r15d
jbe    150a <dfst+0x3ea>
mov    %r12d,%r15d
mov    %r12d,%edi
mov    $0x1,%esi
mov    %rbx,%rdx
call   1040 <ddst@plt>
mov    %r12d,%edi
mov    %rbx,%rsi
call   1030 <bitrv1@plt>
shr    %r12d
cmp    $0x3,%r15d
jbe    1240 <dfst+0x120>
cmp    $0x3,%r12d
mov    $0x2,%esi
cmovae %r12d,%esi
movslq %r15d,%r13
lea    -0x1(%rsi),%rcx
mov    $0x1,%edi
cmp    $0x2,%rcx
jae    1330 <dfst+0x210>
lea    (%rbx,%r13,8),%rax
lea    0x0(,%rdi,8),%rcx
neg    %rcx
mov    %r13,%rdx
shl    $0x4,%rdx
add    %rbx,%rdx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movsd  (%rdx,%rcx,1),%xmm0
movsd  (%rax,%rdi,8),%xmm1
movsd  (%rbx,%rdi,8),%xmm2
movsd  (%rax,%rcx,1),%xmm3
movsd  %xmm2,(%rax,%rdi,8)
movsd  %xmm3,(%rdx,%rcx,1)
movapd %xmm0,%xmm2
addsd  %xmm1,%xmm2
movsd  %xmm2,(%rbx,%rdi,8)
subsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,1)
add    $0x1,%rdi
add    $0xfffffffffffffff8,%rcx
cmp    %rdi,%rsi
jne    12e0 <dfst+0x1c0>
jmp    1243 <dfst+0x123>
cs nopw 0x0(%rax,%rax,1)
lea    -0x2(%rsi),%rax
mov    %r13,%r9
shl    $0x4,%r9
mov    $0x8,%edx
mul    %rdx
lea    (%r14,%r9,1),%rdx
seto   %r10b
mov    %rdx,%rbp
sub    %rax,%rbp
cmp    %rdx,%rbp
ja     12b9 <dfst+0x199>
test   %r10b,%r10b
jne    12b9 <dfst+0x199>
lea    (%r14,%r13,8),%rbp
mov    %rbp,%rdx
sub    %rax,%rdx
cmp    %rbp,%rdx
ja     12b9 <dfst+0x199>
test   %r10b,%r10b
jne    12b9 <dfst+0x199>
mov    %rcx,0x30(%rsp)
mov    %r13,%rcx
add    %r13,%rcx
mov    0x20(%rsp),%r8
cmp    %rbx,%r8
setb   0x4(%rsp)
lea    (%r8,%r13,8),%r10
lea    0x0(%r13,%rsi,1),%rax
lea    (%rbx,%rax,8),%rbp
lea    (%rbx,%rsi,8),%r14
mov    %rcx,%rax
mov    %rcx,0x28(%rsp)
sub    %rsi,%rax
lea    (%r8,%rax,8),%rdx
add    %rbx,%r9
mov    %r13,%rax
sub    %rsi,%rax
lea    (%r8,%rax,8),%r11
lea    (%rbx,%r13,8),%rax
cmp    %r14,%r10
setb   0x7(%rsp)
cmp    %rbp,%r8
setb   0x6(%rsp)
cmp    %r9,%r10
setb   %cl
cmp    %rbp,%rdx
setb   0x5(%rsp)
cmp    %rbp,%r11
setb   0x3(%rsp)
cmp    %r9,%r8
setb   %r10b
cmp    %r14,%rdx
setb   0x2(%rsp)
cmp    %rax,%r8
setb   %bpl
cmp    %r14,%r11
setb   %r8b
cmp    %rax,%rdx
setb   %r14b
cmp    %r9,%r11
setb   %r9b
mov    0x6(%rsp),%dl
test   %dl,0x7(%rsp)
jne    14f7 <dfst+0x3d7>
mov    %r8d,%edx
and    0x5(%rsp),%cl
mov    0x30(%rsp),%r8
jne    14f7 <dfst+0x3d7>
mov    0x3(%rsp),%cl
and    %cl,0x4(%rsp)
jne    14f7 <dfst+0x3d7>
and    0x2(%rsp),%r10b
jne    14f7 <dfst+0x3d7>
and    %dl,%bpl
jne    14f7 <dfst+0x3d7>
and    %r9b,%r14b
mov    0x8(%rsp),%r14
jne    12b9 <dfst+0x199>
mov    %r8,%r11
and    $0xfffffffffffffffe,%r11
mov    %r8,%rdi
or     $0x1,%rdi
mov    0x18(%rsp),%rcx
mov    0x28(%rsp),%rdx
lea    (%rcx,%rdx,8),%rdx
mov    %r11,%r10
neg    %r10
mov    $0x8,%ebp
xor    %ecx,%ecx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movupd (%rdx,%rcx,8),%xmm0
shufpd $0x1,%xmm0,%xmm0
movupd (%rax,%rbp,1),%xmm1
movups (%rbx,%rbp,1),%xmm2
movups -0x10(%rax,%rcx,8),%xmm3
movups %xmm2,(%rax,%rbp,1)
movups %xmm3,(%rdx,%rcx,8)
movapd %xmm0,%xmm2
addpd  %xmm1,%xmm2
movupd %xmm2,(%rbx,%rbp,1)
subpd  %xmm1,%xmm0
shufpd $0x1,%xmm0,%xmm0
movupd %xmm0,-0x10(%rax,%rcx,8)
add    $0xfffffffffffffffe,%rcx
add    $0x10,%rbp
cmp    %rcx,%r10
jne    14a0 <dfst+0x380>
cmp    %r11,%r8
je     1243 <dfst+0x123>
jmp    12b9 <dfst+0x199>
mov    0x8(%rsp),%r14
jmp    12b9 <dfst+0x199>
movslq %r12d,%rax
lea    (%rbx,%rax,8),%rax
jmp    1511 <dfst+0x3f1>
mov    %rbx,%rax
mov    0x14(%rsp),%edi
movsd  (%rax),%xmm0
movsd  %xmm0,0x8(%rbx)
movq   $0x0,(%rbx)
mov    %rbx,%rsi
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
jmp    1030 <bitrv1@plt>

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

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