void rftfsub(int n, float *a, int nc, float *c) {
  int j, k, kk, ks, m;
  float wkr, wki, xr, xi, yr, yi;
  m = n >> 1;
  ks = 2 * nc / m;
  kk = 0;
  for (j = 2; j < m; j += 2) {
    k = n - j;
    kk += ks;
    wkr = 0.5 - c[nc - kk];
    wki = c[kk];
    xr = a[j] - a[k];
    xi = a[j + 1] + a[k + 1];
    yr = wkr * xr - wki * xi;
    yi = wkr * xi + wki * xr;
    a[j] -= yr;
    a[j + 1] -= yi;
    a[k] += yr;
    a[k + 1] -= yi;
  }
}


x86 assembly (clang, -O0):
<rftfsub>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0x4(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x34(%rbp)
mov    -0x14(%rbp),%eax
shl    $0x1,%eax
cltd
idivl  -0x34(%rbp)
mov    %eax,-0x30(%rbp)
movl   $0x0,-0x2c(%rbp)
movl   $0x2,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x34(%rbp),%eax
jge    12a8 <rftfsub+0x1a8>
mov    -0x4(%rbp),%eax
sub    -0x24(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x30(%rbp),%eax
add    -0x2c(%rbp),%eax
mov    %eax,-0x2c(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x14(%rbp),%ecx
sub    -0x2c(%rbp),%ecx
movslq %ecx,%rcx
movss  (%rax,%rcx,4),%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xe8e(%rip),%xmm0
subsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x38(%rbp)
mov    -0x20(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x3c(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
subss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x40(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
addss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x44(%rbp)
movss  -0x38(%rbp),%xmm0
movss  -0x40(%rbp),%xmm2
movss  -0x3c(%rbp),%xmm1
mulss  -0x44(%rbp),%xmm1
movd   %xmm1,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x48(%rbp)
movss  -0x38(%rbp),%xmm0
movss  -0x44(%rbp),%xmm2
movss  -0x3c(%rbp),%xmm1
mulss  -0x40(%rbp),%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x4c(%rbp)
movss  -0x48(%rbp),%xmm1
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
subss  %xmm1,%xmm0
movss  %xmm0,(%rax,%rcx,4)
movss  -0x4c(%rbp),%xmm1
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movss  (%rax,%rcx,4),%xmm0
subss  %xmm1,%xmm0
movss  %xmm0,(%rax,%rcx,4)
movss  -0x48(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
addss  (%rax,%rcx,4),%xmm0
movss  %xmm0,(%rax,%rcx,4)
movss  -0x4c(%rbp),%xmm1
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movss  (%rax,%rcx,4),%xmm0
subss  %xmm1,%xmm0
movss  %xmm0,(%rax,%rcx,4)
mov    -0x24(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x24(%rbp)
jmp    1136 <rftfsub+0x36>
pop    %rbp
ret

x86 assembly (clang, -O2):
<rftfsub>:
cmp    $0x6,%edi
jl     11cd <rftfsub+0xcd>
mov    %edx,%r8d
mov    %edi,%r9d
sar    %r9d
lea    (%r8,%r8,1),%eax
cltd
idiv   %r9d
mov    %edi,%edx
movslq %r9d,%r9
movslq %eax,%r10
movslq %r8d,%rax
lea    (%rcx,%r10,4),%rdi
sub    %r10,%rax
shl    $0x2,%r10
lea    (%rcx,%rax,4),%rcx
mov    %r10,%r8
neg    %r8
lea    (%rsi,%rdx,4),%rdx
add    $0xfffffffffffffffc,%rdx
mov    $0x2,%eax
movss  0xeb1(%rip),%xmm0
nop
movaps %xmm0,%xmm1
subss  (%rcx),%xmm1
movss  (%rdi),%xmm2
movss  (%rsi,%rax,4),%xmm3
movaps %xmm3,%xmm4
subss  -0x4(%rdx),%xmm4
movss  0x4(%rsi,%rax,4),%xmm5
movss  (%rdx),%xmm6
addss  %xmm5,%xmm6
movaps %xmm6,%xmm7
mulss  %xmm2,%xmm7
mulss  %xmm1,%xmm6
mulss  %xmm4,%xmm1
subss  %xmm7,%xmm1
mulss  %xmm2,%xmm4
addss  %xmm4,%xmm6
subss  %xmm1,%xmm3
movss  %xmm3,(%rsi,%rax,4)
subss  %xmm6,%xmm5
movss  %xmm5,0x4(%rsi,%rax,4)
addss  -0x4(%rdx),%xmm1
movss  %xmm1,-0x4(%rdx)
movss  (%rdx),%xmm1
subss  %xmm6,%xmm1
movss  %xmm1,(%rdx)
add    $0x2,%rax
add    %r10,%rdi
add    %r8,%rcx
add    $0xfffffffffffffff8,%rdx
cmp    %r9,%rax
jl     1150 <rftfsub+0x50>
ret

LLVM IR (-O0):
define void @rftfsub(i32 %0, float* %1, i32 %2, float* %3) {
%5 = alloca i32
%6 = alloca float*
%7 = alloca i32
%8 = alloca float*
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca float
%15 = alloca float
%16 = alloca float
%17 = alloca float
%18 = alloca float
%19 = alloca float
store i32 %0, i32* %5
store float* %1, float** %6
store i32 %2, i32* %7
store float* %3, float** %8
%20 = load i32, i32* %5
%21 = ashr i32 %20, 1
store i32 %21, i32* %13
%22 = load i32, i32* %7
%23 = mul nsw i32 2, %22
%24 = load i32, i32* %13
%25 = sdiv i32 %23, %24
store i32 %25, i32* %12
store i32 0, i32* %11
store i32 2, i32* %9
br label %26
26: ; preds = %119, %4
%27 = load i32, i32* %9
%28 = load i32, i32* %13
%29 = icmp slt i32 %27, %28
br i1 %29, label %30, label %122
30: ; preds = %26
%31 = load i32, i32* %5
%32 = load i32, i32* %9
%33 = sub nsw i32 %31, %32
store i32 %33, i32* %10
%34 = load i32, i32* %12
%35 = load i32, i32* %11
%36 = add nsw i32 %35, %34
store i32 %36, i32* %11
%37 = load float*, float** %8
%38 = load i32, i32* %7
%39 = load i32, i32* %11
%40 = sub nsw i32 %38, %39
%41 = sext i32 %40 to i64
%42 = getelementptr inbounds float, float* %37, i64 %41
%43 = load float, float* %42
%44 = fpext float %43 to double
%45 = fsub double 5.000000e-01, %44
%46 = fptrunc double %45 to float
store float %46, float* %14
%47 = load float*, float** %8
%48 = load i32, i32* %11
%49 = sext i32 %48 to i64
%50 = getelementptr inbounds float, float* %47, i64 %49
%51 = load float, float* %50
store float %51, float* %15
%52 = load float*, float** %6
%53 = load i32, i32* %9
%54 = sext i32 %53 to i64
%55 = getelementptr inbounds float, float* %52, i64 %54
%56 = load float, float* %55
%57 = load float*, float** %6
%58 = load i32, i32* %10
%59 = sext i32 %58 to i64
%60 = getelementptr inbounds float, float* %57, i64 %59
%61 = load float, float* %60
%62 = fsub float %56, %61
store float %62, float* %16
%63 = load float*, float** %6
%64 = load i32, i32* %9
%65 = add nsw i32 %64, 1
%66 = sext i32 %65 to i64
%67 = getelementptr inbounds float, float* %63, i64 %66
%68 = load float, float* %67
%69 = load float*, float** %6
%70 = load i32, i32* %10
%71 = add nsw i32 %70, 1
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds float, float* %69, i64 %72
%74 = load float, float* %73
%75 = fadd float %68, %74
store float %75, float* %17
%76 = load float, float* %14
%77 = load float, float* %16
%78 = load float, float* %15
%79 = load float, float* %17
%80 = fmul float %78, %79
%81 = fneg float %80
%82 = call float @llvm.fmuladd.f32(float %76, float %77, float %81)
store float %82, float* %18
%83 = load float, float* %14
%84 = load float, float* %17
%85 = load float, float* %15
%86 = load float, float* %16
%87 = fmul float %85, %86
%88 = call float @llvm.fmuladd.f32(float %83, float %84, float %87)
store float %88, float* %19
%89 = load float, float* %18
%90 = load float*, float** %6
%91 = load i32, i32* %9
%92 = sext i32 %91 to i64
%93 = getelementptr inbounds float, float* %90, i64 %92
%94 = load float, float* %93
%95 = fsub float %94, %89
store float %95, float* %93
%96 = load float, float* %19
%97 = load float*, float** %6
%98 = load i32, i32* %9
%99 = add nsw i32 %98, 1
%100 = sext i32 %99 to i64
%101 = getelementptr inbounds float, float* %97, i64 %100
%102 = load float, float* %101
%103 = fsub float %102, %96
store float %103, float* %101
%104 = load float, float* %18
%105 = load float*, float** %6
%106 = load i32, i32* %10
%107 = sext i32 %106 to i64
%108 = getelementptr inbounds float, float* %105, i64 %107
%109 = load float, float* %108
%110 = fadd float %109, %104
store float %110, float* %108
%111 = load float, float* %19
%112 = load float*, float** %6
%113 = load i32, i32* %10
%114 = add nsw i32 %113, 1
%115 = sext i32 %114 to i64
%116 = getelementptr inbounds float, float* %112, i64 %115
%117 = load float, float* %116
%118 = fsub float %117, %111
store float %118, float* %116
br label %119
119: ; preds = %30
%120 = load i32, i32* %9
%121 = add nsw i32 %120, 2
store i32 %121, i32* %9
br label %26
122: ; preds = %26
ret void
}

LLVM IR (-O2):
define void @rftfsub(i32 %0, float* nocapture %1, i32 %2, float* nocapture %3) {
%5 = ashr i32 %0, 1
%6 = icmp sgt i32 %0, 5
br i1 %6, label %7, label %50
7: ; preds = %4
%8 = shl nsw i32 %2, 1
%9 = sdiv i32 %8, %5
%10 = zext i32 %0 to i64
%11 = sext i32 %5 to i64
%12 = sext i32 %9 to i64
%13 = sext i32 %2 to i64
br label %14
14: ; preds = %7, %14
%15 = phi i64 [ 0, %7 ], [ %18, %14 ]
%16 = phi i64 [ 2, %7 ], [ %48, %14 ]
%17 = sub nsw i64 %10, %16
%18 = add nsw i64 %15, %12
%19 = sub nsw i64 %13, %18
%20 = getelementptr inbounds float, float* %3, i64 %19
%21 = load float, float* %20
%22 = fsub float 5.000000e-01, %21
%23 = getelementptr inbounds float, float* %3, i64 %18
%24 = load float, float* %23
%25 = getelementptr inbounds float, float* %1, i64 %16
%26 = load float, float* %25
%27 = getelementptr inbounds float, float* %1, i64 %17
%28 = load float, float* %27
%29 = fsub float %26, %28
%30 = or i64 %16, 1
%31 = getelementptr inbounds float, float* %1, i64 %30
%32 = load float, float* %31
%33 = add nsw i64 %17, 1
%34 = getelementptr inbounds float, float* %1, i64 %33
%35 = load float, float* %34
%36 = fadd float %32, %35
%37 = fneg float %24
%38 = fmul float %36, %37
%39 = tail call float @llvm.fmuladd.f32(float %22, float %29, float %38)
%40 = fmul float %24, %29
%41 = tail call float @llvm.fmuladd.f32(float %22, float %36, float %40)
%42 = fsub float %26, %39
store float %42, float* %25
%43 = fsub float %32, %41
store float %43, float* %31
%44 = load float, float* %27
%45 = fadd float %44, %39
store float %45, float* %27
%46 = load float, float* %34
%47 = fsub float %46, %41
store float %47, float* %34
%48 = add nuw nsw i64 %16, 2
%49 = icmp slt i64 %48, %11
br i1 %49, label %14, label %50
50: ; preds = %14, %4
ret void
}