#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
double cos(double);
int /*<<< orphan*/ factorize(size_t, size_t const *, int, size_t *);
double sin(double);
void cffti1(size_t n, double wa[], size_t ifac[]) {
  static const size_t ntryh[5] = {4, 6, 3, 2, 5};
  static const double twopi = 6.28318530717958647692;
  size_t j, k, fi;
  double argh = twopi / n;
  size_t i = 0, l1 = 1;
  factorize(n, ntryh, 5, ifac);
  for (k = 1; k <= ifac[1]; k++) {
    size_t ip = ifac[k + 1];
    size_t ido = n / (l1 * ip);
    for (j = 1; j < ip; j++) {
      size_t is = i;
      double argld = j * l1 * argh;
      wa[i] = 1;
      wa[i + 1] = 0;
      for (fi = 1; fi <= ido; fi++) {
        double arg = fi * argld;
        i += 2;
        wa[i] = cos(arg);
        wa[i + 1] = sin(arg);
      }
      if (ip > 6) {
        wa[is] = wa[i];
        wa[is + 1] = wa[i + 1];
      }
    }
    l1 *= ip;
  }
}


x86 assembly (clang, -O0):
<cffti1>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movaps 0xec5(%rip),%xmm0
movq   -0x8(%rbp),%xmm1
punpckldq %xmm0,%xmm1
movapd 0xec4(%rip),%xmm0
subpd  %xmm0,%xmm1
movaps %xmm1,%xmm0
unpckhpd %xmm1,%xmm1
addsd  %xmm0,%xmm1
movsd  0xe8d(%rip),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
movq   $0x0,-0x40(%rbp)
movq   $0x1,-0x48(%rbp)
mov    -0x8(%rbp),%rdi
mov    -0x18(%rbp),%rcx
lea    0xe95(%rip),%rsi
mov    $0x5,%edx
call   1050 <factorize@plt>
movq   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%rax
mov    -0x18(%rbp),%rcx
cmp    0x8(%rcx),%rax
ja     136f <cffti1+0x23f>
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%rcx
mov    0x8(%rax,%rcx,8),%rax
mov    %rax,-0x50(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x48(%rbp),%rcx
imul   -0x50(%rbp),%rcx
xor    %edx,%edx
div    %rcx
mov    %rax,-0x58(%rbp)
movq   $0x1,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmp    -0x50(%rbp),%rax
jae    1351 <cffti1+0x221>
mov    -0x40(%rbp),%rax
mov    %rax,-0x60(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x48(%rbp),%rcx
imul   %rcx,%rax
movq   %rax,%xmm0
movaps 0xdf4(%rip),%xmm1
punpckldq %xmm1,%xmm0
movapd 0xdf8(%rip),%xmm1
subpd  %xmm1,%xmm0
movaps %xmm0,%xmm1
unpckhpd %xmm0,%xmm0
addsd  %xmm1,%xmm0
mulsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x68(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
movsd  0xdb7(%rip),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,0x8(%rax,%rcx,8)
movq   $0x1,-0x30(%rbp)
mov    -0x30(%rbp),%rax
cmp    -0x58(%rbp),%rax
ja     12fa <cffti1+0x1ca>
movaps 0xd8c(%rip),%xmm1
movq   -0x30(%rbp),%xmm0
punpckldq %xmm1,%xmm0
movapd 0xd8b(%rip),%xmm1
subpd  %xmm1,%xmm0
movaps %xmm0,%xmm1
unpckhpd %xmm0,%xmm0
addsd  %xmm1,%xmm0
mulsd  -0x68(%rbp),%xmm0
movsd  %xmm0,-0x70(%rbp)
mov    -0x40(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x40(%rbp)
movsd  -0x70(%rbp),%xmm0
call   1040 <cos@plt>
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x70(%rbp),%xmm0
call   1030 <sin@plt>
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
movsd  %xmm0,0x8(%rax,%rcx,8)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    126f <cffti1+0x13f>
cmpq   $0x6,-0x50(%rbp)
jbe    133b <cffti1+0x20b>
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x60(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
movsd  0x8(%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x60(%rbp),%rcx
movsd  %xmm0,0x8(%rax,%rcx,8)
jmp    1340 <cffti1+0x210>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    11ee <cffti1+0xbe>
mov    -0x50(%rbp),%rax
imul   -0x48(%rbp),%rax
mov    %rax,-0x48(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    11ad <cffti1+0x7d>
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<cffti1>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x68,%rsp
mov    %rdx,%r14
mov    %rsi,%rbx
mov    %rdi,%rbp
lea    0xee2(%rip),%rsi
mov    $0x5,%edx
mov    %r14,%rcx
call   1050 <factorize@plt>
mov    0x8(%r14),%r8
test   %r8,%r8
je     1351 <cffti1+0x221>
movq   %rbp,%xmm0
punpckldq 0xe8b(%rip),%xmm0
subpd  0xe93(%rip),%xmm0
movapd %xmm0,%xmm1
unpckhpd %xmm0,%xmm1
addsd  %xmm0,%xmm1
movsd  0xe8f(%rip),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,0x18(%rsp)
mov    $0x1,%r9d
xor    %edi,%edi
movdqa 0xe55(%rip),%xmm1
movapd 0xe5d(%rip),%xmm2
mov    $0x1,%ecx
mov    %r14,0x8(%rsp)
mov    %rbp,0x20(%rsp)
jmp    11ea <cffti1+0xba>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
mov    0x8(%rsp),%r14
mov    0x8(%r14),%r8
mov    %r13,%rdi
mov    0x10(%rsp),%r9
cmp    %r8,%r9
ja     1351 <cffti1+0x221>
mov    %rcx,%rax
mov    0x8(%r14,%r9,8),%rsi
mov    %rsi,%rcx
mov    %rax,0x38(%rsp)
imul   %rax,%rcx
mov    %rbp,%rax
or     %rcx,%rax
shr    $0x20,%rax
je     1220 <cffti1+0xf0>
mov    %rbp,%rax
xor    %edx,%edx
div    %rcx
mov    %rax,%r12
jmp    1229 <cffti1+0xf9>
nopw   0x0(%rax,%rax,1)
mov    %ebp,%eax
xor    %edx,%edx
div    %ecx
mov    %eax,%r12d
add    $0x1,%r9
cmp    $0x2,%rsi
jb     11e1 <cffti1+0xb1>
mov    %r9,0x10(%rsp)
mov    $0x1,%r15d
mov    %rdi,%r13
mov    %rcx,0x30(%rsp)
mov    %rsi,0x28(%rsp)
jmp    126a <cffti1+0x13a>
nopl   (%rax)
add    $0x1,%r15
mov    %r13,%rdi
cmp    %rsi,%r15
mov    0x20(%rsp),%rbp
mov    0x30(%rsp),%rcx
je     11d0 <cffti1+0xa0>
mov    %r15,%rax
imul   0x38(%rsp),%rax
movq   %rax,%xmm0
punpckldq %xmm1,%xmm0
subpd  %xmm2,%xmm0
movsd  0xda0(%rip),%xmm3
mov    %rdi,(%rsp)
movupd %xmm3,(%rbx,%rdi,8)
cmp    %rbp,%rcx
ja     1321 <cffti1+0x1f1>
movapd %xmm0,%xmm3
unpckhpd %xmm0,%xmm3
addsd  %xmm0,%xmm3
mulsd  0x18(%rsp),%xmm3
movapd %xmm3,0x40(%rsp)
mov    $0x1,%r14d
mov    (%rsp),%rbp
nopl   0x0(%rax)
movq   %r14,%xmm3
punpckldq %xmm1,%xmm3
subpd  %xmm2,%xmm3
movapd %xmm3,%xmm0
unpckhpd %xmm3,%xmm0
addsd  %xmm3,%xmm0
mulsd  0x40(%rsp),%xmm0
movapd %xmm0,0x50(%rsp)
lea    0x2(%rbp),%r13
call   1040 <cos@plt>
movsd  %xmm0,0x10(%rbx,%rbp,8)
movapd 0x50(%rsp),%xmm0
call   1030 <sin@plt>
movapd 0xd09(%rip),%xmm2
movdqa 0xcf1(%rip),%xmm1
movsd  %xmm0,0x18(%rbx,%rbp,8)
add    $0x1,%r14
mov    %r13,%rbp
cmp    %r12,%r14
jbe    12c0 <cffti1+0x190>
mov    0x28(%rsp),%rsi
cmp    $0x7,%rsi
jb     1250 <cffti1+0x120>
movsd  (%rbx,%r13,8),%xmm0
mov    (%rsp),%rax
movsd  %xmm0,(%rbx,%rax,8)
movsd  0x8(%rbx,%r13,8),%xmm0
movsd  %xmm0,0x8(%rbx,%rax,8)
jmp    1250 <cffti1+0x120>
add    $0x68,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@cffti1.ntryh = internal constant [5 x i64] [i64 4, i64 6, i64 3, i64 2, i64 5]
@cffti1.twopi = internal constant double 0x401921FB54442D18
define void @cffti1(i64 %0, double* %1, i64* %2) {
%4 = alloca i64
%5 = alloca double*
%6 = alloca i64*
%7 = alloca i64
%8 = alloca i64
%9 = alloca i64
%10 = alloca double
%11 = alloca i64
%12 = alloca i64
%13 = alloca i64
%14 = alloca i64
%15 = alloca i64
%16 = alloca double
%17 = alloca double
store i64 %0, i64* %4
store double* %1, double** %5
store i64* %2, i64** %6
%18 = load i64, i64* %4
%19 = uitofp i64 %18 to double
%20 = fdiv double 0x401921FB54442D18, %19
store double %20, double* %10
store i64 0, i64* %11
store i64 1, i64* %12
%21 = load i64, i64* %4
%22 = load i64*, i64** %6
%23 = call i32 @factorize(i64 %21, i64* getelementptr inbounds ([5 x i64], [5 x i64]* @cffti1.ntryh, i64 0, i64 0), i32 5, i64* %22)
store i64 1, i64* %8
br label %24
24: ; preds = %113, %3
%25 = load i64, i64* %8
%26 = load i64*, i64** %6
%27 = getelementptr inbounds i64, i64* %26, i64 1
%28 = load i64, i64* %27
%29 = icmp ule i64 %25, %28
br i1 %29, label %30, label %116
30: ; preds = %24
%31 = load i64*, i64** %6
%32 = load i64, i64* %8
%33 = add i64 %32, 1
%34 = getelementptr inbounds i64, i64* %31, i64 %33
%35 = load i64, i64* %34
store i64 %35, i64* %13
%36 = load i64, i64* %4
%37 = load i64, i64* %12
%38 = load i64, i64* %13
%39 = mul i64 %37, %38
%40 = udiv i64 %36, %39
store i64 %40, i64* %14
store i64 1, i64* %7
br label %41
41: ; preds = %106, %30
%42 = load i64, i64* %7
%43 = load i64, i64* %13
%44 = icmp ult i64 %42, %43
br i1 %44, label %45, label %109
45: ; preds = %41
%46 = load i64, i64* %11
store i64 %46, i64* %15
%47 = load i64, i64* %7
%48 = load i64, i64* %12
%49 = mul i64 %47, %48
%50 = uitofp i64 %49 to double
%51 = load double, double* %10
%52 = fmul double %50, %51
store double %52, double* %16
%53 = load double*, double** %5
%54 = load i64, i64* %11
%55 = getelementptr inbounds double, double* %53, i64 %54
store double 1.000000e+00, double* %55
%56 = load double*, double** %5
%57 = load i64, i64* %11
%58 = add i64 %57, 1
%59 = getelementptr inbounds double, double* %56, i64 %58
store double 0.000000e+00, double* %59
store i64 1, i64* %9
br label %60
60: ; preds = %82, %45
%61 = load i64, i64* %9
%62 = load i64, i64* %14
%63 = icmp ule i64 %61, %62
br i1 %63, label %64, label %85
64: ; preds = %60
%65 = load i64, i64* %9
%66 = uitofp i64 %65 to double
%67 = load double, double* %16
%68 = fmul double %66, %67
store double %68, double* %17
%69 = load i64, i64* %11
%70 = add i64 %69, 2
store i64 %70, i64* %11
%71 = load double, double* %17
%72 = call double @cos(double %71)
%73 = load double*, double** %5
%74 = load i64, i64* %11
%75 = getelementptr inbounds double, double* %73, i64 %74
store double %72, double* %75
%76 = load double, double* %17
%77 = call double @sin(double %76)
%78 = load double*, double** %5
%79 = load i64, i64* %11
%80 = add i64 %79, 1
%81 = getelementptr inbounds double, double* %78, i64 %80
store double %77, double* %81
br label %82
82: ; preds = %64
%83 = load i64, i64* %9
%84 = add i64 %83, 1
store i64 %84, i64* %9
br label %60
85: ; preds = %60
%86 = load i64, i64* %13
%87 = icmp ugt i64 %86, 6
br i1 %87, label %88, label %105
88: ; preds = %85
%89 = load double*, double** %5
%90 = load i64, i64* %11
%91 = getelementptr inbounds double, double* %89, i64 %90
%92 = load double, double* %91
%93 = load double*, double** %5
%94 = load i64, i64* %15
%95 = getelementptr inbounds double, double* %93, i64 %94
store double %92, double* %95
%96 = load double*, double** %5
%97 = load i64, i64* %11
%98 = add i64 %97, 1
%99 = getelementptr inbounds double, double* %96, i64 %98
%100 = load double, double* %99
%101 = load double*, double** %5
%102 = load i64, i64* %15
%103 = add i64 %102, 1
%104 = getelementptr inbounds double, double* %101, i64 %103
store double %100, double* %104
br label %105
105: ; preds = %88, %85
br label %106
106: ; preds = %105
%107 = load i64, i64* %7
%108 = add i64 %107, 1
store i64 %108, i64* %7
br label %41
109: ; preds = %41
%110 = load i64, i64* %13
%111 = load i64, i64* %12
%112 = mul i64 %111, %110
store i64 %112, i64* %12
br label %113
113: ; preds = %109
%114 = load i64, i64* %8
%115 = add i64 %114, 1
store i64 %115, i64* %8
br label %24
116: ; preds = %24
ret void
}

LLVM IR (-O2):
@cffti1.ntryh = internal constant [5 x i64] [i64 4, i64 6, i64 3, i64 2, i64 5]
define void @cffti1(i64 %0, double* nocapture %1, i64* %2) {
%4 = uitofp i64 %0 to double
%5 = fdiv double 0x401921FB54442D18, %4
%6 = tail call i32 @factorize(i64 %0, i64* getelementptr inbounds ([5 x i64], [5 x i64]* @cffti1.ntryh, i64 0, i64 0), i32 5, i64* %2)
%7 = getelementptr inbounds i64, i64* %2, i64 1
%8 = load i64, i64* %7
%9 = icmp eq i64 %8, 0
br i1 %9, label %64, label %16
10: ; preds = %61
%11 = load i64, i64* %7
br label %12
12: ; preds = %10, %16
%13 = phi i64 [ %17, %16 ], [ %11, %10 ]
%14 = phi i64 [ %19, %16 ], [ %54, %10 ]
%15 = icmp ugt i64 %21, %13
br i1 %15, label %64, label %16
16: ; preds = %3, %12
%17 = phi i64 [ %13, %12 ], [ %8, %3 ]
%18 = phi i64 [ %21, %12 ], [ 1, %3 ]
%19 = phi i64 [ %14, %12 ], [ 0, %3 ]
%20 = phi i64 [ %24, %12 ], [ 1, %3 ]
%21 = add i64 %18, 1
%22 = getelementptr inbounds i64, i64* %2, i64 %21
%23 = load i64, i64* %22
%24 = mul i64 %23, %20
%25 = udiv i64 %0, %24
%26 = icmp ugt i64 %23, 1
br i1 %26, label %27, label %12
27: ; preds = %16
%28 = icmp ugt i64 %24, %0
%29 = icmp ugt i64 %23, 6
br label %30
30: ; preds = %27, %61
%31 = phi i64 [ 1, %27 ], [ %62, %61 ]
%32 = phi i64 [ %19, %27 ], [ %54, %61 ]
%33 = mul i64 %31, %20
%34 = uitofp i64 %33 to double
%35 = fmul double %5, %34
%36 = getelementptr inbounds double, double* %1, i64 %32
%37 = add i64 %32, 1
%38 = getelementptr inbounds double, double* %1, i64 %37
%39 = bitcast double* %36 to <2 x double>*
store <2 x double> <double 1.000000e+00, double 0.000000e+00>, <2 x double>* %39
br i1 %28, label %53, label %40
40: ; preds = %30, %40
%41 = phi i64 [ %51, %40 ], [ 1, %30 ]
%42 = phi i64 [ %45, %40 ], [ %32, %30 ]
%43 = uitofp i64 %41 to double
%44 = fmul double %35, %43
%45 = add i64 %42, 2
%46 = tail call double @cos(double %44)
%47 = getelementptr inbounds double, double* %1, i64 %45
store double %46, double* %47
%48 = tail call double @sin(double %44)
%49 = add i64 %42, 3
%50 = getelementptr inbounds double, double* %1, i64 %49
store double %48, double* %50
%51 = add i64 %41, 1
%52 = icmp ugt i64 %51, %25
br i1 %52, label %53, label %40
53: ; preds = %40, %30
%54 = phi i64 [ %32, %30 ], [ %45, %40 ]
br i1 %29, label %55, label %61
55: ; preds = %53
%56 = getelementptr inbounds double, double* %1, i64 %54
%57 = load double, double* %56
store double %57, double* %36
%58 = add i64 %54, 1
%59 = getelementptr inbounds double, double* %1, i64 %58
%60 = load double, double* %59
store double %60, double* %38
br label %61
61: ; preds = %55, %53
%62 = add nuw i64 %31, 1
%63 = icmp eq i64 %62, %23
br i1 %63, label %10, label %30
64: ; preds = %12, %3
ret void
}