#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 */
typedef int int32_t;

/* Variables and functions */
int M_PI;
float cos(int);
int decompose(int, int *, int const *);
float sin(int);
void cffti1_ps(int32_t n, float *wa, int32_t *ifac) {
  static const int32_t ntryh[] = {5, 3, 4, 2, 0};
  int32_t k1, j, ii;
  int32_t nf = decompose(n, ifac, ntryh);
  float argh = (2 * M_PI) / (float)n;
  int32_t i = 1;
  int32_t l1 = 1;
  for (k1 = 1; k1 <= nf; k1++) {
    int32_t ip = ifac[k1 + 1];
    int32_t ld = 0;
    int32_t l2 = l1 * ip;
    int32_t ido = n / l2;
    int32_t idot = ido + ido + 2;
    int32_t ipm = ip - 1;
    for (j = 1; j <= ipm; j++) {
      float argld;
      int32_t i1 = i, fi = 0;
      wa[i - 1] = 1;
      wa[i] = 0;
      ld += l1;
      argld = ld * argh;
      for (ii = 4; ii <= idot; ii += 2) {
        i += 2;
        fi += 1;
        wa[i - 1] = cos(fi * argld);
        wa[i] = sin(fi * argld);
      }
      if (ip > 5) {
        wa[i1 - 1] = wa[i - 1];
        wa[i1] = wa[i];
      }
    }
    l1 = l2;
  }
}


x86 assembly (clang, -O0):
<cffti1_ps>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    -0x4(%rbp),%edi
mov    -0x18(%rbp),%rsi
lea    0xebf(%rip),%rdx
call   1050 <decompose@plt>
mov    %eax,-0x28(%rbp)
mov    0x2e88(%rip),%rax
mov    (%rax),%eax
shl    $0x1,%eax
cvtsi2ss %eax,%xmm0
cvtsi2ssl -0x4(%rbp),%xmm1
divss  %xmm1,%xmm0
movss  %xmm0,-0x2c(%rbp)
movl   $0x1,-0x30(%rbp)
movl   $0x1,-0x34(%rbp)
movl   $0x1,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x28(%rbp),%eax
jg     1324 <cffti1_ps+0x1f4>
mov    -0x18(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x38(%rbp)
movl   $0x0,-0x3c(%rbp)
mov    -0x34(%rbp),%eax
imul   -0x38(%rbp),%eax
mov    %eax,-0x40(%rbp)
mov    -0x4(%rbp),%eax
cltd
idivl  -0x40(%rbp)
mov    %eax,-0x44(%rbp)
mov    -0x44(%rbp),%eax
add    -0x44(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x48(%rbp)
mov    -0x38(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x4c(%rbp)
movl   $0x1,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x4c(%rbp),%eax
jg     1310 <cffti1_ps+0x1e0>
mov    -0x30(%rbp),%eax
mov    %eax,-0x54(%rbp)
movl   $0x0,-0x58(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movss  0xdf0(%rip),%xmm0
movss  %xmm0,(%rax,%rcx,4)
mov    -0x10(%rbp),%rax
movslq -0x30(%rbp),%rcx
xorps  %xmm0,%xmm0
movss  %xmm0,(%rax,%rcx,4)
mov    -0x34(%rbp),%eax
add    -0x3c(%rbp),%eax
mov    %eax,-0x3c(%rbp)
cvtsi2ssl -0x3c(%rbp),%xmm0
mulss  -0x2c(%rbp),%xmm0
movss  %xmm0,-0x50(%rbp)
movl   $0x4,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x48(%rbp),%eax
jg     12b5 <cffti1_ps+0x185>
mov    -0x30(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x30(%rbp)
mov    -0x58(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x58(%rbp)
cvtsi2ssl -0x58(%rbp),%xmm0
mulss  -0x50(%rbp),%xmm0
cvttss2si %xmm0,%edi
call   1040 <cos@plt>
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movss  %xmm0,(%rax,%rcx,4)
cvtsi2ssl -0x58(%rbp),%xmm0
mulss  -0x50(%rbp),%xmm0
cvttss2si %xmm0,%edi
call   1030 <sin@plt>
mov    -0x10(%rbp),%rax
movslq -0x30(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x24(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x24(%rbp)
jmp    1244 <cffti1_ps+0x114>
cmpl   $0x5,-0x38(%rbp)
jle    12fd <cffti1_ps+0x1cd>
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x54(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x10(%rbp),%rax
movslq -0x30(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x54(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
jmp    1302 <cffti1_ps+0x1d2>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    11e2 <cffti1_ps+0xb2>
mov    -0x40(%rbp),%eax
mov    %eax,-0x34(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    118c <cffti1_ps+0x5c>
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<cffti1_ps>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x58,%rsp
mov    %rdx,%rax
mov    %rsi,%rbx
lea    0xeb5(%rip),%rdx
mov    %edi,0x4(%rsp)
mov    %rax,0x30(%rsp)
mov    %rax,%rsi
call   1050 <decompose@plt>
mov    %rax,0x8(%rsp)
test   %eax,%eax
jle    12e6 <cffti1_ps+0x1b6>
mov    0x2e78(%rip),%rax
mov    (%rax),%eax
add    %eax,%eax
cvtsi2ss %eax,%xmm1
cvtsi2ssl 0x4(%rsp),%xmm0
divss  %xmm0,%xmm1
movss  %xmm1,0x18(%rsp)
mov    0x8(%rsp),%rax
add    $0x1,%eax
mov    %rax,0x8(%rsp)
mov    $0x1,%r14d
mov    $0x1,%ecx
mov    $0x1,%eax
mov    %rbx,0x40(%rsp)
jmp    11c4 <cffti1_ps+0x94>
nopl   0x0(%rax)
mov    0x38(%rsp),%rcx
cmp    0x8(%rsp),%rcx
mov    0x14(%rsp),%eax
je     12e6 <cffti1_ps+0x1b6>
mov    %eax,%edi
mov    0x30(%rsp),%rax
mov    0x4(%rax,%rcx,4),%ebp
add    $0x1,%rcx
mov    %ebp,%esi
imul   %edi,%esi
mov    0x4(%rsp),%eax
cltd
idiv   %esi
cmp    $0x2,%ebp
mov    %rcx,0x38(%rsp)
mov    %esi,0x14(%rsp)
jl     11b0 <cffti1_ps+0x80>
lea    (%rax,%rax,1),%r12d
xor    %ecx,%ecx
mov    $0x1,%esi
mov    %edi,0x20(%rsp)
mov    %ebp,0x1c(%rsp)
mov    %rax,0x48(%rsp)
jmp    1228 <cffti1_ps+0xf8>
nopw   0x0(%rax,%rax,1)
mov    0x24(%rsp),%esi
add    $0x1,%esi
cmp    %edx,%esi
mov    0x20(%rsp),%edi
mov    0x48(%rsp),%rax
mov    0x28(%rsp),%ecx
je     11b0 <cffti1_ps+0x80>
movslq %r14d,%rdx
add    %edi,%ecx
movl   $0x3f800000,-0x4(%rbx,%rdx,4)
3f
movl   $0x0,(%rbx,%rdx,4)
test   %eax,%eax
mov    %ecx,0x28(%rsp)
mov    %esi,0x24(%rsp)
mov    %rdx,0x50(%rsp)
jle    12ae <cffti1_ps+0x17e>
xorps  %xmm0,%xmm0
cvtsi2ss %ecx,%xmm0
mulss  0x18(%rsp),%xmm0
movss  %xmm0,0x2c(%rsp)
lea    (%rbx,%rdx,4),%rbx
mov    $0x2,%r13d
mov    $0x1,%r15d
xorps  %xmm0,%xmm0
cvtsi2ss %r15d,%xmm0
mulss  0x2c(%rsp),%xmm0
cvttss2si %xmm0,%ebp
mov    %ebp,%edi
call   1040 <cos@plt>
movss  %xmm0,-0x4(%rbx,%r13,4)
mov    %ebp,%edi
call   1030 <sin@plt>
movss  %xmm0,(%rbx,%r13,4)
add    $0x2,%r13
add    $0x2,%r14d
add    $0x1,%r15d
cmp    %r12d,%r13d
jle    1270 <cffti1_ps+0x140>
mov    0x1c(%rsp),%edx
cmp    $0x6,%edx
mov    0x40(%rsp),%rbx
jb     1210 <cffti1_ps+0xe0>
mov    0x50(%rsp),%rsi
lea    -0x1(%rsi),%rax
movslq %r14d,%rcx
movss  -0x4(%rbx,%rcx,4),%xmm0
movss  %xmm0,(%rbx,%rax,4)
movss  (%rbx,%rcx,4),%xmm0
movss  %xmm0,(%rbx,%rsi,4)
jmp    1210 <cffti1_ps+0xe0>
add    $0x58,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@cffti1_ps.ntryh = internal constant [5 x i32] [i32 5, i32 3, i32 4, i32 2, i32 0]
@M_PI = global i32 0
define void @cffti1_ps(i32 %0, float* nocapture %1, i32* %2) {
%4 = tail call i32 @decompose(i32 %0, i32* %2, i32* getelementptr inbounds ([5 x i32], [5 x i32]* @cffti1_ps.ntryh, i64 0, i64 0))
%5 = load i32, i32* @M_PI
%6 = shl nsw i32 %5, 1
%7 = sitofp i32 %6 to float
%8 = sitofp i32 %0 to float
%9 = fdiv float %7, %8
%10 = icmp slt i32 %4, 1
br i1 %10, label %74, label %11
11: ; preds = %3
%12 = add nuw i32 %4, 1
%13 = zext i32 %12 to i64
br label %17
14: ; preds = %71, %17
%15 = phi i32 [ %19, %17 ], [ %62, %71 ]
%16 = icmp eq i64 %21, %13
br i1 %16, label %74, label %17
17: ; preds = %11, %14
%18 = phi i64 [ 1, %11 ], [ %21, %14 ]
%19 = phi i32 [ 1, %11 ], [ %15, %14 ]
%20 = phi i32 [ 1, %11 ], [ %24, %14 ]
%21 = add nuw nsw i64 %18, 1
%22 = getelementptr inbounds i32, i32* %2, i64 %21
%23 = load i32, i32* %22
%24 = mul nsw i32 %23, %20
%25 = sdiv i32 %0, %24
%26 = shl nsw i32 %25, 1
%27 = icmp sgt i32 %23, 1
br i1 %27, label %28, label %14
28: ; preds = %17
%29 = icmp slt i32 %25, 1
%30 = icmp ugt i32 %23, 5
br label %31
31: ; preds = %28, %71
%32 = phi i32 [ 1, %28 ], [ %72, %71 ]
%33 = phi i32 [ %19, %28 ], [ %62, %71 ]
%34 = phi i32 [ 0, %28 ], [ %40, %71 ]
%35 = add nsw i32 %33, -1
%36 = sext i32 %35 to i64
%37 = getelementptr inbounds float, float* %1, i64 %36
store float 1.000000e+00, float* %37
%38 = sext i32 %33 to i64
%39 = getelementptr inbounds float, float* %1, i64 %38
store float 0.000000e+00, float* %39
%40 = add nsw i32 %34, %20
%41 = sitofp i32 %40 to float
%42 = fmul float %9, %41
br i1 %29, label %61, label %43
43: ; preds = %31, %43
%44 = phi i64 [ %47, %43 ], [ %38, %31 ]
%45 = phi i32 [ %48, %43 ], [ 0, %31 ]
%46 = phi i32 [ %57, %43 ], [ 4, %31 ]
%47 = add nsw i64 %44, 2
%48 = add nuw nsw i32 %45, 1
%49 = sitofp i32 %48 to float
%50 = fmul float %42, %49
%51 = fptosi float %50 to i32
%52 = tail call float @cos(i32 %51)
%53 = add nsw i64 %44, 1
%54 = getelementptr inbounds float, float* %1, i64 %53
store float %52, float* %54
%55 = tail call float @sin(i32 %51)
%56 = getelementptr inbounds float, float* %1, i64 %47
store float %55, float* %56
%57 = add nuw nsw i32 %46, 2
%58 = icmp sgt i32 %46, %26
br i1 %58, label %59, label %43
59: ; preds = %43
%60 = trunc i64 %47 to i32
br label %61
61: ; preds = %59, %31
%62 = phi i32 [ %33, %31 ], [ %60, %59 ]
br i1 %30, label %63, label %71
63: ; preds = %61
%64 = add nsw i32 %62, -1
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds float, float* %1, i64 %65
%67 = load float, float* %66
store float %67, float* %37
%68 = sext i32 %62 to i64
%69 = getelementptr inbounds float, float* %1, i64 %68
%70 = load float, float* %69
store float %70, float* %39
br label %71
71: ; preds = %63, %61
%72 = add nuw nsw i32 %32, 1
%73 = icmp eq i32 %72, %23
br i1 %73, label %14, label %31
74: ; preds = %14, %3
ret void
}