void fft(n, real, imag) int n;
double *real, *imag;
{
  double a, b, c, d;
  double q, r, s, t;
  int i, j, k;
  for (i = 1, j = n - 1, k = n / 2; i < k; i++, j--) {
    a = real[i];
    b = real[j];
    q = a + b;
    r = a - b;
    c = imag[i];
    d = imag[j];
    s = c + d;
    t = c - d;
    real[i] = (q + t) * .5;
    real[j] = (q - t) * .5;
    imag[i] = (s - r) * .5;
    imag[j] = (s + r) * .5;
  }
  fht(real, n);
  fht(imag, n);
}


x86 assembly (clang, -O0):
<fft>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movl   $0x1,-0x5c(%rbp)
mov    -0x4(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x60(%rbp)
mov    -0x4(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x64(%rbp)
mov    -0x5c(%rbp),%eax
cmp    -0x64(%rbp),%eax
jge    1274 <fft+0x164>
mov    -0x10(%rbp),%rax
movslq -0x5c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x20(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x60(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x20(%rbp),%xmm0
addsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x20(%rbp),%xmm0
subsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x5c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x60(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x30(%rbp),%xmm0
addsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  -0x30(%rbp),%xmm0
subsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  -0x40(%rbp),%xmm0
addsd  -0x58(%rbp),%xmm0
movsd  0xe1d(%rip),%xmm1
mulsd  %xmm1,%xmm0
mov    -0x10(%rbp),%rax
movslq -0x5c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x40(%rbp),%xmm0
subsd  -0x58(%rbp),%xmm0
movsd  0xdfa(%rip),%xmm1
mulsd  %xmm1,%xmm0
mov    -0x10(%rbp),%rax
movslq -0x60(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x50(%rbp),%xmm0
subsd  -0x48(%rbp),%xmm0
movsd  0xdd7(%rip),%xmm1
mulsd  %xmm1,%xmm0
mov    -0x18(%rbp),%rax
movslq -0x5c(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x50(%rbp),%xmm0
addsd  -0x48(%rbp),%xmm0
movsd  0xdb4(%rip),%xmm1
mulsd  %xmm1,%xmm0
mov    -0x18(%rbp),%rax
movslq -0x60(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x5c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x5c(%rbp)
mov    -0x60(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x60(%rbp)
jmp    1141 <fft+0x31>
mov    -0x10(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    $0x0,%al
call   1030 <fht@plt>
mov    -0x18(%rbp),%rdi
mov    -0x4(%rbp),%esi
mov    $0x0,%al
call   1030 <fht@plt>
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<fft>:
push   %rbp
push   %rbx
push   %rax
mov    %rdx,%rbx
mov    %edi,%ebp
cmp    $0x4,%edi
jl     11b5 <fft+0xa5>
mov    %ebp,%eax
shr    %eax
mov    %ebp,%ecx
add    $0xffffffffffffffff,%rcx
mov    $0x1,%edx
movsd  0xec8(%rip),%xmm0
nopl   0x0(%rax,%rax,1)
movsd  (%rsi,%rdx,8),%xmm1
movsd  (%rsi,%rcx,8),%xmm2
movapd %xmm1,%xmm3
addsd  %xmm2,%xmm3
subsd  %xmm2,%xmm1
movsd  (%rbx,%rdx,8),%xmm2
movsd  (%rbx,%rcx,8),%xmm4
movapd %xmm2,%xmm5
addsd  %xmm4,%xmm5
subsd  %xmm4,%xmm2
movapd %xmm3,%xmm4
addsd  %xmm2,%xmm4
mulsd  %xmm0,%xmm4
movsd  %xmm4,(%rsi,%rdx,8)
subsd  %xmm2,%xmm3
mulsd  %xmm0,%xmm3
movsd  %xmm3,(%rsi,%rcx,8)
movapd %xmm5,%xmm2
subsd  %xmm1,%xmm2
mulsd  %xmm0,%xmm2
movsd  %xmm2,(%rbx,%rdx,8)
addsd  %xmm1,%xmm5
mulsd  %xmm0,%xmm5
movsd  %xmm5,(%rbx,%rcx,8)
add    $0x1,%rdx
add    $0xffffffffffffffff,%rcx
cmp    %rdx,%rax
jne    1140 <fft+0x30>
mov    %rsi,%rdi
mov    %ebp,%esi
xor    %eax,%eax
call   1030 <fht@plt>
mov    %rbx,%rdi
mov    %ebp,%esi
xor    %eax,%eax
add    $0x8,%rsp
pop    %rbx
pop    %rbp
jmp    1030 <fht@plt>

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

LLVM IR (-O2):
define void @fft(i32 %0, double* %1, double* %2) {
%4 = icmp sgt i32 %0, 3
br i1 %4, label %5, label %35
5: ; preds = %3
%6 = lshr i32 %0, 1
%7 = zext i32 %0 to i64
%8 = zext i32 %6 to i64
br label %9
9: ; preds = %5, %9
%10 = phi i64 [ 1, %5 ], [ %33, %9 ]
%11 = phi i64 [ %7, %5 ], [ %12, %9 ]
%12 = add nsw i64 %11, -1
%13 = getelementptr inbounds double, double* %1, i64 %10
%14 = load double, double* %13
%15 = getelementptr inbounds double, double* %1, i64 %12
%16 = load double, double* %15
%17 = fadd double %14, %16
%18 = fsub double %14, %16
%19 = getelementptr inbounds double, double* %2, i64 %10
%20 = load double, double* %19
%21 = getelementptr inbounds double, double* %2, i64 %12
%22 = load double, double* %21
%23 = fadd double %20, %22
%24 = fsub double %20, %22
%25 = fadd double %17, %24
%26 = fmul double %25, 5.000000e-01
store double %26, double* %13
%27 = fsub double %17, %24
%28 = fmul double %27, 5.000000e-01
store double %28, double* %15
%29 = fsub double %23, %18
%30 = fmul double %29, 5.000000e-01
store double %30, double* %19
%31 = fadd double %18, %23
%32 = fmul double %31, 5.000000e-01
store double %32, double* %21
%33 = add nuw nsw i64 %10, 1
%34 = icmp eq i64 %33, %8
br i1 %34, label %35, label %9
35: ; preds = %9, %3
%36 = tail call i32 (double*, i32, ...) bitcast (i32 (...)* @fht to i32 (double*, i32, ...)*)(double* %1, i32 %0)
%37 = tail call i32 (double*, i32, ...) bitcast (i32 (...)* @fht to i32 (double*, i32, ...)*)(double* %2, i32 %0)
ret void
}