#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 */
float cos(double);
int /*<<< orphan*/ cosft2(float *, int, int);
int /*<<< orphan*/ free_vector(float *, int, int);
int /*<<< orphan*/ getchar();
int /*<<< orphan*/ printf(char *, ...);
int /*<<< orphan*/ scanf(char *, float *);
float *vector(int, int);
int main(void) {
  int i, j, nlim;
  float big, per, scal, small, *data;
  data = vector(1, 16);
  for (;;) {
    printf("Period of cosine in channels (2-%2d)\n", 16);
    scanf("%f", &per);
    if (per <= 0.0)
      break;
    for (i = 1; i <= 16; i++)
      data[i] = cos(2.0 * 3.1415926 * (i - 0.5) / per);
    cosft2(data, 16, 1);
    big = -1.0e10;
    small = 1.0e10;
    for (i = 1; i <= 16; i++) {
      if (data[i] < small)
        small = data[i];
      if (data[i] > big)
        big = data[i];
    }
    scal = 30.0 / (big - small);
    for (i = 1; i <= 16; i++) {
      nlim = (int)(0.5 + scal * (data[i] - small) + 1.0e-3);
      printf("%4d %6.2f ", i, data[i]);
      for (j = 1; j <= nlim + 1; j++)
        printf("*");
      printf("\n");
    }
    printf("press RETURN to continue ...\n");
    (void)getchar();
    cosft2(data, 16, -1);
    big = -1.0e10;
    small = 1.0e10;
    for (i = 1; i <= 16; i++) {
      if (data[i] < small)
        small = data[i];
      if (data[i] > big)
        big = data[i];
    }
    scal = 30.0 / (big - small);
    for (i = 1; i <= 16; i++) {
      nlim = (int)(0.5 + scal * (data[i] - small) + 1.0e-3);
      printf("%4d ", i);
      for (j = 1; j <= nlim + 1; j++)
        printf("*");
      printf("\n");
    }
  }
  free_vector(data, 1, 16);
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
movl   $0x0,-0x4(%rbp)
mov    $0x1,%edi
mov    $0x10,%esi
call   1060 <vector@plt>
mov    %rax,-0x28(%rbp)
lea    0xe8f(%rip),%rdi
mov    $0x10,%esi
mov    $0x0,%al
call   1030 <printf@plt>
lea    0xea2(%rip),%rdi
lea    -0x18(%rbp),%rsi
call   1070 <scanf@plt>
movss  -0x18(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
xorps  %xmm0,%xmm0
ucomisd %xmm1,%xmm0
jb     11d0 <main+0x60>
jmp    154a <main+0x3da>
movl   $0x1,-0x8(%rbp)
cmpl   $0x10,-0x8(%rbp)
jg     122b <main+0xbb>
cvtsi2sdl -0x8(%rbp),%xmm1
movsd  0xe2a(%rip),%xmm0
subsd  %xmm0,%xmm1
movsd  0xe26(%rip),%xmm0
mulsd  %xmm1,%xmm0
movss  -0x18(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
divsd  %xmm1,%xmm0
call   1080 <cos@plt>
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    11d7 <main+0x67>
mov    -0x28(%rbp),%rdi
mov    $0x10,%esi
mov    $0x1,%edx
call   1090 <cosft2@plt>
movss  0xdbe(%rip),%xmm0
movss  %xmm0,-0x14(%rbp)
movss  0xdad(%rip),%xmm0
movss  %xmm0,-0x20(%rbp)
movl   $0x1,-0x8(%rbp)
cmpl   $0x10,-0x8(%rbp)
jg     12d2 <main+0x162>
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm1
movss  -0x20(%rbp),%xmm0
ucomiss %xmm1,%xmm0
jbe    1296 <main+0x126>
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x20(%rbp)
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
ucomiss -0x14(%rbp),%xmm0
jbe    12bf <main+0x14f>
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x14(%rbp)
jmp    12c4 <main+0x154>
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    125f <main+0xef>
movss  -0x14(%rbp),%xmm0
subss  -0x20(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xd20(%rip),%xmm0
divsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x1c(%rbp)
movl   $0x1,-0x8(%rbp)
cmpl   $0x10,-0x8(%rbp)
jg     13b6 <main+0x246>
movss  -0x1c(%rbp),%xmm0
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm1
subss  -0x20(%rbp),%xmm1
mulss  %xmm1,%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xceb(%rip),%xmm0
addsd  %xmm1,%xmm0
movsd  0xcd7(%rip),%xmm1
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%esi
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xcf2(%rip),%rdi
mov    $0x1,%al
call   1030 <printf@plt>
movl   $0x1,-0xc(%rbp)
mov    -0xc(%rbp),%eax
mov    -0x10(%rbp),%ecx
add    $0x1,%ecx
cmp    %ecx,%eax
jg     139a <main+0x22a>
lea    0xcd7(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    136d <main+0x1fd>
lea    0xcab(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    12fc <main+0x18c>
lea    0xca1(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    $0x0,%al
call   1050 <getchar@plt>
mov    -0x28(%rbp),%rdi
mov    $0x10,%esi
mov    $0xffffffff,%edx
call   1090 <cosft2@plt>
movss  0xc1e(%rip),%xmm0
movss  %xmm0,-0x14(%rbp)
movss  0xc0d(%rip),%xmm0
movss  %xmm0,-0x20(%rbp)
movl   $0x1,-0x8(%rbp)
cmpl   $0x10,-0x8(%rbp)
jg     1472 <main+0x302>
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm1
movss  -0x20(%rbp),%xmm0
ucomiss %xmm1,%xmm0
jbe    1436 <main+0x2c6>
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x20(%rbp)
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
ucomiss -0x14(%rbp),%xmm0
jbe    145f <main+0x2ef>
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x14(%rbp)
jmp    1464 <main+0x2f4>
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    13ff <main+0x28f>
movss  -0x14(%rbp),%xmm0
subss  -0x20(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xb80(%rip),%xmm0
divsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x1c(%rbp)
movl   $0x1,-0x8(%rbp)
cmpl   $0x10,-0x8(%rbp)
jg     1545 <main+0x3d5>
movss  -0x1c(%rbp),%xmm0
mov    -0x28(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm1
subss  -0x20(%rbp),%xmm1
mulss  %xmm1,%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xb4b(%rip),%xmm0
addsd  %xmm1,%xmm0
movsd  0xb37(%rip),%xmm1
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%esi
lea    0xb8e(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
movl   $0x1,-0xc(%rbp)
mov    -0xc(%rbp),%eax
mov    -0x10(%rbp),%ecx
add    $0x1,%ecx
cmp    %ecx,%eax
jg     1529 <main+0x3b9>
lea    0xb48(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    14fc <main+0x38c>
lea    0xb1c(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    149c <main+0x32c>
jmp    1192 <main+0x22>
mov    -0x28(%rbp),%rdi
mov    $0x1,%esi
mov    $0x10,%edx
call   1040 <free_vector@plt>
xor    %eax,%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    $0x1,%edi
mov    $0x10,%esi
call   1080 <vector@plt>
mov    %rax,%r15
lea    0xe81(%rip),%rdi
mov    $0x10,%esi
xor    %eax,%eax
call   1050 <printf@plt>
lea    0xe94(%rip),%rdi
lea    0xc(%rsp),%rsi
call   1090 <scanf@plt>
movss  0xc(%rsp),%xmm0
xorps  %xmm1,%xmm1
ucomiss %xmm0,%xmm1
jae    168f <main+0x4ff>
lea    0xe74(%rip),%r14
lea    0xe78(%rip),%r12
jmp    1236 <main+0xa6>
cs nopw 0x0(%rax,%rax,1)
lea    0xe31(%rip),%rdi
mov    $0x10,%esi
xor    %eax,%eax
call   1050 <printf@plt>
lea    0xe44(%rip),%rdi
lea    0xc(%rsp),%rsi
call   1090 <scanf@plt>
movss  0xc(%rsp),%xmm0
xorps  %xmm1,%xmm1
ucomiss %xmm0,%xmm1
jae    168f <main+0x4ff>
xorps  %xmm1,%xmm1
cvtss2sd %xmm0,%xmm1
movsd  0xdbb(%rip),%xmm0
divsd  %xmm1,%xmm0
call   10a0 <cos@plt>
movss  %xmm0,0x4(%r15)
mov    $0x2,%ebp
nopl   0x0(%rax)
movsd  0xda0(%rip),%xmm2
movsd  0xda0(%rip),%xmm3
movss  0xc(%rsp),%xmm1
xorps  %xmm0,%xmm0
cvtsi2sd %ebp,%xmm0
addsd  %xmm2,%xmm0
mulsd  %xmm3,%xmm0
cvtss2sd %xmm1,%xmm1
divsd  %xmm1,%xmm0
call   10a0 <cos@plt>
movss  %xmm0,(%r15,%rbp,4)
lea    0x1(%rbp),%rbx
cmp    $0x11,%rbx
je     12f0 <main+0x160>
movss  0xc(%rsp),%xmm1
xorps  %xmm0,%xmm0
cvtsi2sd %ebx,%xmm0
movsd  0xd51(%rip),%xmm2
addsd  %xmm2,%xmm0
movsd  0xd4d(%rip),%xmm2
mulsd  %xmm2,%xmm0
cvtss2sd %xmm1,%xmm1
divsd  %xmm1,%xmm0
call   10a0 <cos@plt>
movss  %xmm0,0x4(%r15,%rbp,4)
add    $0x1,%rbx
mov    %rbx,%rbp
jmp    1260 <main+0xd0>
nopw   0x0(%rax,%rax,1)
mov    %r15,%rdi
mov    $0x10,%esi
mov    $0x1,%edx
call   10b0 <cosft2@plt>
movss  0x4(%r15),%xmm1
movss  0x8(%r15),%xmm0
movaps %xmm1,%xmm2
minss  0xd0f(%rip),%xmm2
movaps %xmm1,%xmm3
maxss  0xd08(%rip),%xmm3
movaps %xmm0,%xmm4
minss  %xmm2,%xmm4
maxss  %xmm3,%xmm0
movss  0xc(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm0,%xmm2
movss  0x10(%r15),%xmm0
movaps %xmm0,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm0
movss  0x14(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm0,%xmm2
movss  0x18(%r15),%xmm0
movaps %xmm0,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm0
movss  0x1c(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm0,%xmm2
movss  0x20(%r15),%xmm0
movaps %xmm0,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm0
movss  0x24(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm0,%xmm2
movss  0x28(%r15),%xmm0
movaps %xmm0,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm0
movss  0x2c(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm0,%xmm2
movss  0x30(%r15),%xmm0
movaps %xmm0,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm0
movss  0x34(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm0,%xmm2
movss  0x38(%r15),%xmm0
movaps %xmm0,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm0
movss  0x3c(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm0,%xmm2
movss  0x40(%r15),%xmm0
movaps %xmm0,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm0
movss  %xmm4,0x14(%rsp)
subss  %xmm4,%xmm0
movss  0xc01(%rip),%xmm2
divss  %xmm0,%xmm2
movss  %xmm2,0x10(%rsp)
mov    $0x1,%r13d
nop
xorps  %xmm0,%xmm0
cvtss2sd %xmm1,%xmm0
subss  0x14(%rsp),%xmm1
mulss  0x10(%rsp),%xmm1
cvtss2sd %xmm1,%xmm1
addsd  0xbb9(%rip),%xmm1
addsd  0xbb9(%rip),%xmm1
cvttsd2si %xmm1,%ebp
mov    %r14,%rdi
mov    %r13d,%esi
mov    $0x1,%al
call   1050 <printf@plt>
test   %ebp,%ebp
js     148f <main+0x2ff>
add    $0x1,%ebp
nop
mov    $0x2a,%edi
call   1030 <putchar@plt>
add    $0xffffffff,%ebp
jne    1480 <main+0x2f0>
mov    $0xa,%edi
call   1030 <putchar@plt>
add    $0x1,%r13
cmp    $0x11,%r13
je     14b0 <main+0x320>
movss  (%r15,%r13,4),%xmm1
jmp    1440 <main+0x2b0>
nopl   0x0(%rax,%rax,1)
lea    0xbba(%rip),%rdi
call   1040 <puts@plt>
xor    %eax,%eax
call   1070 <getchar@plt>
mov    %r15,%rdi
mov    $0x10,%esi
mov    $0xffffffff,%edx
call   10b0 <cosft2@plt>
movss  0x4(%r15),%xmm0
movss  0x8(%r15),%xmm1
movaps %xmm0,%xmm2
minss  0xb3c(%rip),%xmm2
movaps %xmm0,%xmm3
maxss  0xb35(%rip),%xmm3
movaps %xmm1,%xmm4
minss  %xmm2,%xmm4
maxss  %xmm3,%xmm1
movss  0xc(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm1,%xmm2
movss  0x10(%r15),%xmm1
movaps %xmm1,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm1
movss  0x14(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm1,%xmm2
movss  0x18(%r15),%xmm1
movaps %xmm1,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm1
movss  0x1c(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm1,%xmm2
movss  0x20(%r15),%xmm1
movaps %xmm1,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm1
movss  0x24(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm1,%xmm2
movss  0x28(%r15),%xmm1
movaps %xmm1,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm1
movss  0x2c(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm1,%xmm2
movss  0x30(%r15),%xmm1
movaps %xmm1,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm1
movss  0x34(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm1,%xmm2
movss  0x38(%r15),%xmm1
movaps %xmm1,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm1
movss  0x3c(%r15),%xmm2
movaps %xmm2,%xmm3
minss  %xmm4,%xmm3
maxss  %xmm1,%xmm2
movss  0x40(%r15),%xmm1
movaps %xmm1,%xmm4
minss  %xmm3,%xmm4
maxss  %xmm2,%xmm1
movss  %xmm4,0x14(%rsp)
subss  %xmm4,%xmm1
movss  0xa2e(%rip),%xmm2
divss  %xmm1,%xmm2
movss  %xmm2,0x10(%rsp)
mov    $0x1,%ebp
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
subss  0x14(%rsp),%xmm0
mulss  0x10(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
addsd  0x9e0(%rip),%xmm0
addsd  0x9e0(%rip),%xmm0
cvttsd2si %xmm0,%ebx
mov    %r12,%rdi
mov    %ebp,%esi
xor    %eax,%eax
call   1050 <printf@plt>
test   %ebx,%ebx
js     166f <main+0x4df>
add    $0x1,%ebx
nopw   0x0(%rax,%rax,1)
mov    $0x2a,%edi
call   1030 <putchar@plt>
add    $0xffffffff,%ebx
jne    1660 <main+0x4d0>
mov    $0xa,%edi
call   1030 <putchar@plt>
add    $0x1,%rbp
cmp    $0x11,%rbp
je     1200 <main+0x70>
movss  (%r15,%rbp,4),%xmm0
jmp    1620 <main+0x490>
mov    %r15,%rdi
mov    $0x1,%esi
mov    $0x10,%edx
call   1060 <free_vector@plt>
xor    %eax,%eax
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [38 x i8] c"Period of cosine in channels (2-%2d)\0A\00"
@.str.1 = [3 x i8] c"%f\00"
@.str.2 = [11 x i8] c"%4d %6.2f \00"
@.str.3 = [2 x i8] c"*\00"
@.str.4 = [2 x i8] c"\0A\00"
@.str.5 = [30 x i8] c"press RETURN to continue ...\0A\00"
@.str.6 = [5 x i8] c"%4d \00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
%5 = alloca float
%6 = alloca float
%7 = alloca float
%8 = alloca float
%9 = alloca float*
store i32 0, i32* %1
%10 = call float* @vector(i32 1, i32 16)
store float* %10, float** %9
br label %11
11: ; preds = %204, %0
%12 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([38 x i8], [38 x i8]* @.str, i64 0, i64 0), i32 16)
%13 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), float* %6)
%14 = load float, float* %6
%15 = fpext float %14 to double
%16 = fcmp ole double %15, 0.000000e+00
br i1 %16, label %17, label %18
17: ; preds = %11
br label %205
18: ; preds = %11
store i32 1, i32* %2
br label %19
19: ; preds = %35, %18
%20 = load i32, i32* %2
%21 = icmp sle i32 %20, 16
br i1 %21, label %22, label %38
22: ; preds = %19
%23 = load i32, i32* %2
%24 = sitofp i32 %23 to double
%25 = fsub double %24, 5.000000e-01
%26 = fmul double 0x401921FB4D12D84A, %25
%27 = load float, float* %6
%28 = fpext float %27 to double
%29 = fdiv double %26, %28
%30 = call float @cos(double %29)
%31 = load float*, float** %9
%32 = load i32, i32* %2
%33 = sext i32 %32 to i64
%34 = getelementptr inbounds float, float* %31, i64 %33
store float %30, float* %34
br label %35
35: ; preds = %22
%36 = load i32, i32* %2
%37 = add nsw i32 %36, 1
store i32 %37, i32* %2
br label %19
38: ; preds = %19
%39 = load float*, float** %9
%40 = call i32 @cosft2(float* %39, i32 16, i32 1)
store float -1.000000e+10, float* %5
store float 1.000000e+10, float* %8
store i32 1, i32* %2
br label %41
41: ; preds = %73, %38
%42 = load i32, i32* %2
%43 = icmp sle i32 %42, 16
br i1 %43, label %44, label %76
44: ; preds = %41
%45 = load float*, float** %9
%46 = load i32, i32* %2
%47 = sext i32 %46 to i64
%48 = getelementptr inbounds float, float* %45, i64 %47
%49 = load float, float* %48
%50 = load float, float* %8
%51 = fcmp olt float %49, %50
br i1 %51, label %52, label %58
52: ; preds = %44
%53 = load float*, float** %9
%54 = load i32, i32* %2
%55 = sext i32 %54 to i64
%56 = getelementptr inbounds float, float* %53, i64 %55
%57 = load float, float* %56
store float %57, float* %8
br label %58
58: ; preds = %52, %44
%59 = load float*, float** %9
%60 = load i32, i32* %2
%61 = sext i32 %60 to i64
%62 = getelementptr inbounds float, float* %59, i64 %61
%63 = load float, float* %62
%64 = load float, float* %5
%65 = fcmp ogt float %63, %64
br i1 %65, label %66, label %72
66: ; preds = %58
%67 = load float*, float** %9
%68 = load i32, i32* %2
%69 = sext i32 %68 to i64
%70 = getelementptr inbounds float, float* %67, i64 %69
%71 = load float, float* %70
store float %71, float* %5
br label %72
72: ; preds = %66, %58
br label %73
73: ; preds = %72
%74 = load i32, i32* %2
%75 = add nsw i32 %74, 1
store i32 %75, i32* %2
br label %41
76: ; preds = %41
%77 = load float, float* %5
%78 = load float, float* %8
%79 = fsub float %77, %78
%80 = fpext float %79 to double
%81 = fdiv double 3.000000e+01, %80
%82 = fptrunc double %81 to float
store float %82, float* %7
store i32 1, i32* %2
br label %83
83: ; preds = %120, %76
%84 = load i32, i32* %2
%85 = icmp sle i32 %84, 16
br i1 %85, label %86, label %123
86: ; preds = %83
%87 = load float, float* %7
%88 = load float*, float** %9
%89 = load i32, i32* %2
%90 = sext i32 %89 to i64
%91 = getelementptr inbounds float, float* %88, i64 %90
%92 = load float, float* %91
%93 = load float, float* %8
%94 = fsub float %92, %93
%95 = fmul float %87, %94
%96 = fpext float %95 to double
%97 = fadd double 5.000000e-01, %96
%98 = fadd double %97, 1.000000e-03
%99 = fptosi double %98 to i32
store i32 %99, i32* %4
%100 = load i32, i32* %2
%101 = load float*, float** %9
%102 = load i32, i32* %2
%103 = sext i32 %102 to i64
%104 = getelementptr inbounds float, float* %101, i64 %103
%105 = load float, float* %104
%106 = fpext float %105 to double
%107 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([11 x i8], [11 x i8]* @.str.2, i64 0, i64 0), i32 %100, double %106)
store i32 1, i32* %3
br label %108
108: ; preds = %115, %86
%109 = load i32, i32* %3
%110 = load i32, i32* %4
%111 = add nsw i32 %110, 1
%112 = icmp sle i32 %109, %111
br i1 %112, label %113, label %118
113: ; preds = %108
%114 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.3, i64 0, i64 0))
br label %115
115: ; preds = %113
%116 = load i32, i32* %3
%117 = add nsw i32 %116, 1
store i32 %117, i32* %3
br label %108
118: ; preds = %108
%119 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.4, i64 0, i64 0))
br label %120
120: ; preds = %118
%121 = load i32, i32* %2
%122 = add nsw i32 %121, 1
store i32 %122, i32* %2
br label %83
123: ; preds = %83
%124 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([30 x i8], [30 x i8]* @.str.5, i64 0, i64 0))
%125 = call i32 (...) @getchar()
%126 = load float*, float** %9
%127 = call i32 @cosft2(float* %126, i32 16, i32 -1)
store float -1.000000e+10, float* %5
store float 1.000000e+10, float* %8
store i32 1, i32* %2
br label %128
128: ; preds = %160, %123
%129 = load i32, i32* %2
%130 = icmp sle i32 %129, 16
br i1 %130, label %131, label %163
131: ; preds = %128
%132 = load float*, float** %9
%133 = load i32, i32* %2
%134 = sext i32 %133 to i64
%135 = getelementptr inbounds float, float* %132, i64 %134
%136 = load float, float* %135
%137 = load float, float* %8
%138 = fcmp olt float %136, %137
br i1 %138, label %139, label %145
139: ; preds = %131
%140 = load float*, float** %9
%141 = load i32, i32* %2
%142 = sext i32 %141 to i64
%143 = getelementptr inbounds float, float* %140, i64 %142
%144 = load float, float* %143
store float %144, float* %8
br label %145
145: ; preds = %139, %131
%146 = load float*, float** %9
%147 = load i32, i32* %2
%148 = sext i32 %147 to i64
%149 = getelementptr inbounds float, float* %146, i64 %148
%150 = load float, float* %149
%151 = load float, float* %5
%152 = fcmp ogt float %150, %151
br i1 %152, label %153, label %159
153: ; preds = %145
%154 = load float*, float** %9
%155 = load i32, i32* %2
%156 = sext i32 %155 to i64
%157 = getelementptr inbounds float, float* %154, i64 %156
%158 = load float, float* %157
store float %158, float* %5
br label %159
159: ; preds = %153, %145
br label %160
160: ; preds = %159
%161 = load i32, i32* %2
%162 = add nsw i32 %161, 1
store i32 %162, i32* %2
br label %128
163: ; preds = %128
%164 = load float, float* %5
%165 = load float, float* %8
%166 = fsub float %164, %165
%167 = fpext float %166 to double
%168 = fdiv double 3.000000e+01, %167
%169 = fptrunc double %168 to float
store float %169, float* %7
store i32 1, i32* %2
br label %170
170: ; preds = %201, %163
%171 = load i32, i32* %2
%172 = icmp sle i32 %171, 16
br i1 %172, label %173, label %204
173: ; preds = %170
%174 = load float, float* %7
%175 = load float*, float** %9
%176 = load i32, i32* %2
%177 = sext i32 %176 to i64
%178 = getelementptr inbounds float, float* %175, i64 %177
%179 = load float, float* %178
%180 = load float, float* %8
%181 = fsub float %179, %180
%182 = fmul float %174, %181
%183 = fpext float %182 to double
%184 = fadd double 5.000000e-01, %183
%185 = fadd double %184, 1.000000e-03
%186 = fptosi double %185 to i32
store i32 %186, i32* %4
%187 = load i32, i32* %2
%188 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.6, i64 0, i64 0), i32 %187)
store i32 1, i32* %3
br label %189
189: ; preds = %196, %173
%190 = load i32, i32* %3
%191 = load i32, i32* %4
%192 = add nsw i32 %191, 1
%193 = icmp sle i32 %190, %192
br i1 %193, label %194, label %199
194: ; preds = %189
%195 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.3, i64 0, i64 0))
br label %196
196: ; preds = %194
%197 = load i32, i32* %3
%198 = add nsw i32 %197, 1
store i32 %198, i32* %3
br label %189
199: ; preds = %189
%200 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.4, i64 0, i64 0))
br label %201
201: ; preds = %199
%202 = load i32, i32* %2
%203 = add nsw i32 %202, 1
store i32 %203, i32* %2
br label %170
204: ; preds = %170
br label %11
205: ; preds = %17
%206 = load float*, float** %9
%207 = call i32 @free_vector(float* %206, i32 1, i32 16)
ret i32 0
}

LLVM IR (-O2):
@.str = [38 x i8] c"Period of cosine in channels (2-%2d)\0A\00"
@.str.1 = [3 x i8] c"%f\00"
@.str.2 = [11 x i8] c"%4d %6.2f \00"
@.str.6 = [5 x i8] c"%4d \00"
@str = [29 x i8] c"press RETURN to continue ...\00"
define i32 @main() {
%1 = alloca float
%2 = bitcast float* %1 to i8*
%3 = tail call float* @vector(i32 1, i32 16)
%4 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([38 x i8], [38 x i8]* @.str, i64 0, i64 0), i32 16)
%5 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), float* %1)
%6 = load float, float* %1
%7 = fcmp ugt float %6, 0.000000e+00
br i1 %7, label %8, label %283
8: ; preds = %0
%9 = getelementptr inbounds float, float* %3, i64 1
%10 = getelementptr inbounds float, float* %3, i64 2
%11 = getelementptr inbounds float, float* %3, i64 3
%12 = getelementptr inbounds float, float* %3, i64 4
%13 = getelementptr inbounds float, float* %3, i64 5
%14 = getelementptr inbounds float, float* %3, i64 6
%15 = getelementptr inbounds float, float* %3, i64 7
%16 = getelementptr inbounds float, float* %3, i64 8
%17 = getelementptr inbounds float, float* %3, i64 9
%18 = getelementptr inbounds float, float* %3, i64 10
%19 = getelementptr inbounds float, float* %3, i64 11
%20 = getelementptr inbounds float, float* %3, i64 12
%21 = getelementptr inbounds float, float* %3, i64 13
%22 = getelementptr inbounds float, float* %3, i64 14
%23 = getelementptr inbounds float, float* %3, i64 15
%24 = getelementptr inbounds float, float* %3, i64 16
%25 = getelementptr inbounds float, float* %3, i64 1
br label %31
26: ; preds = %276
%27 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([38 x i8], [38 x i8]* @.str, i64 0, i64 0), i32 16)
%28 = call i32 @scanf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0), float* %1)
%29 = load float, float* %1
%30 = fcmp ugt float %29, 0.000000e+00
br i1 %30, label %31, label %283
31: ; preds = %8, %26
%32 = phi float [ %6, %8 ], [ %29, %26 ]
%33 = fpext float %32 to double
%34 = fdiv double 0x400921FB4D12D84A, %33
%35 = call float @cos(double %34)
store float %35, float* %25
br label %36
36: ; preds = %49, %31
%37 = phi i64 [ 2, %31 ], [ %59, %49 ]
%38 = load float, float* %1
%39 = trunc i64 %37 to i32
%40 = sitofp i32 %39 to double
%41 = fadd double %40, -5.000000e-01
%42 = fmul double %41, 0x401921FB4D12D84A
%43 = fpext float %38 to double
%44 = fdiv double %42, %43
%45 = call float @cos(double %44)
%46 = getelementptr inbounds float, float* %3, i64 %37
store float %45, float* %46
%47 = or i64 %37, 1
%48 = icmp eq i64 %47, 17
br i1 %48, label %60, label %49
49: ; preds = %36
%50 = load float, float* %1
%51 = trunc i64 %47 to i32
%52 = sitofp i32 %51 to double
%53 = fadd double %52, -5.000000e-01
%54 = fmul double %53, 0x401921FB4D12D84A
%55 = fpext float %50 to double
%56 = fdiv double %54, %55
%57 = call float @cos(double %56)
%58 = getelementptr inbounds float, float* %3, i64 %47
store float %57, float* %58
%59 = add nuw nsw i64 %37, 2
br label %36
60: ; preds = %36
%61 = call i32 @cosft2(float* %3, i32 16, i32 1)
%62 = load float, float* %9
%63 = fcmp olt float %62, 1.000000e+10
%64 = select i1 %63, float %62, float 1.000000e+10
%65 = fcmp ogt float %62, -1.000000e+10
%66 = select i1 %65, float %62, float -1.000000e+10
%67 = load float, float* %10
%68 = fcmp olt float %67, %64
%69 = select i1 %68, float %67, float %64
%70 = fcmp ogt float %67, %66
%71 = select i1 %70, float %67, float %66
%72 = load float, float* %11
%73 = fcmp olt float %72, %69
%74 = select i1 %73, float %72, float %69
%75 = fcmp ogt float %72, %71
%76 = select i1 %75, float %72, float %71
%77 = load float, float* %12
%78 = fcmp olt float %77, %74
%79 = select i1 %78, float %77, float %74
%80 = fcmp ogt float %77, %76
%81 = select i1 %80, float %77, float %76
%82 = load float, float* %13
%83 = fcmp olt float %82, %79
%84 = select i1 %83, float %82, float %79
%85 = fcmp ogt float %82, %81
%86 = select i1 %85, float %82, float %81
%87 = load float, float* %14
%88 = fcmp olt float %87, %84
%89 = select i1 %88, float %87, float %84
%90 = fcmp ogt float %87, %86
%91 = select i1 %90, float %87, float %86
%92 = load float, float* %15
%93 = fcmp olt float %92, %89
%94 = select i1 %93, float %92, float %89
%95 = fcmp ogt float %92, %91
%96 = select i1 %95, float %92, float %91
%97 = load float, float* %16
%98 = fcmp olt float %97, %94
%99 = select i1 %98, float %97, float %94
%100 = fcmp ogt float %97, %96
%101 = select i1 %100, float %97, float %96
%102 = load float, float* %17
%103 = fcmp olt float %102, %99
%104 = select i1 %103, float %102, float %99
%105 = fcmp ogt float %102, %101
%106 = select i1 %105, float %102, float %101
%107 = load float, float* %18
%108 = fcmp olt float %107, %104
%109 = select i1 %108, float %107, float %104
%110 = fcmp ogt float %107, %106
%111 = select i1 %110, float %107, float %106
%112 = load float, float* %19
%113 = fcmp olt float %112, %109
%114 = select i1 %113, float %112, float %109
%115 = fcmp ogt float %112, %111
%116 = select i1 %115, float %112, float %111
%117 = load float, float* %20
%118 = fcmp olt float %117, %114
%119 = select i1 %118, float %117, float %114
%120 = fcmp ogt float %117, %116
%121 = select i1 %120, float %117, float %116
%122 = load float, float* %21
%123 = fcmp olt float %122, %119
%124 = select i1 %123, float %122, float %119
%125 = fcmp ogt float %122, %121
%126 = select i1 %125, float %122, float %121
%127 = load float, float* %22
%128 = fcmp olt float %127, %124
%129 = select i1 %128, float %127, float %124
%130 = fcmp ogt float %127, %126
%131 = select i1 %130, float %127, float %126
%132 = load float, float* %23
%133 = fcmp olt float %132, %129
%134 = select i1 %133, float %132, float %129
%135 = fcmp ogt float %132, %131
%136 = select i1 %135, float %132, float %131
%137 = load float, float* %24
%138 = fcmp olt float %137, %134
%139 = select i1 %138, float %137, float %134
%140 = fcmp ogt float %137, %136
%141 = select i1 %140, float %137, float %136
%142 = fsub float %141, %139
%143 = fdiv float 3.000000e+01, %142
br label %144
144: ; preds = %168, %60
%145 = phi float [ %62, %60 ], [ %170, %168 ]
%146 = phi i64 [ 1, %60 ], [ %166, %168 ]
%147 = fsub float %145, %139
%148 = fmul float %143, %147
%149 = fpext float %148 to double
%150 = fadd double %149, 5.000000e-01
%151 = fadd double %150, 1.000000e-03
%152 = fptosi double %151 to i32
%153 = fpext float %145 to double
%154 = trunc i64 %146 to i32
%155 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([11 x i8], [11 x i8]* @.str.2, i64 0, i64 0), i32 %154, double %153)
%156 = icmp slt i32 %152, 0
br i1 %156, label %164, label %157
157: ; preds = %144
%158 = add i32 %152, 1
br label %159
159: ; preds = %157, %159
%160 = phi i32 [ %162, %159 ], [ 1, %157 ]
%161 = call i32 @putchar(i32 42)
%162 = add nuw i32 %160, 1
%163 = icmp eq i32 %160, %158
br i1 %163, label %164, label %159
164: ; preds = %159, %144
%165 = call i32 @putchar(i32 10)
%166 = add nuw nsw i64 %146, 1
%167 = icmp eq i64 %166, 17
br i1 %167, label %171, label %168
168: ; preds = %164
%169 = getelementptr inbounds float, float* %3, i64 %166
%170 = load float, float* %169
br label %144
171: ; preds = %164
%172 = call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([29 x i8], [29 x i8]* @str, i64 0, i64 0))
%173 = call i32 (...) @getchar()
%174 = call i32 @cosft2(float* %3, i32 16, i32 -1)
%175 = load float, float* %9
%176 = fcmp olt float %175, 1.000000e+10
%177 = select i1 %176, float %175, float 1.000000e+10
%178 = fcmp ogt float %175, -1.000000e+10
%179 = select i1 %178, float %175, float -1.000000e+10
%180 = load float, float* %10
%181 = fcmp olt float %180, %177
%182 = select i1 %181, float %180, float %177
%183 = fcmp ogt float %180, %179
%184 = select i1 %183, float %180, float %179
%185 = load float, float* %11
%186 = fcmp olt float %185, %182
%187 = select i1 %186, float %185, float %182
%188 = fcmp ogt float %185, %184
%189 = select i1 %188, float %185, float %184
%190 = load float, float* %12
%191 = fcmp olt float %190, %187
%192 = select i1 %191, float %190, float %187
%193 = fcmp ogt float %190, %189
%194 = select i1 %193, float %190, float %189
%195 = load float, float* %13
%196 = fcmp olt float %195, %192
%197 = select i1 %196, float %195, float %192
%198 = fcmp ogt float %195, %194
%199 = select i1 %198, float %195, float %194
%200 = load float, float* %14
%201 = fcmp olt float %200, %197
%202 = select i1 %201, float %200, float %197
%203 = fcmp ogt float %200, %199
%204 = select i1 %203, float %200, float %199
%205 = load float, float* %15
%206 = fcmp olt float %205, %202
%207 = select i1 %206, float %205, float %202
%208 = fcmp ogt float %205, %204
%209 = select i1 %208, float %205, float %204
%210 = load float, float* %16
%211 = fcmp olt float %210, %207
%212 = select i1 %211, float %210, float %207
%213 = fcmp ogt float %210, %209
%214 = select i1 %213, float %210, float %209
%215 = load float, float* %17
%216 = fcmp olt float %215, %212
%217 = select i1 %216, float %215, float %212
%218 = fcmp ogt float %215, %214
%219 = select i1 %218, float %215, float %214
%220 = load float, float* %18
%221 = fcmp olt float %220, %217
%222 = select i1 %221, float %220, float %217
%223 = fcmp ogt float %220, %219
%224 = select i1 %223, float %220, float %219
%225 = load float, float* %19
%226 = fcmp olt float %225, %222
%227 = select i1 %226, float %225, float %222
%228 = fcmp ogt float %225, %224
%229 = select i1 %228, float %225, float %224
%230 = load float, float* %20
%231 = fcmp olt float %230, %227
%232 = select i1 %231, float %230, float %227
%233 = fcmp ogt float %230, %229
%234 = select i1 %233, float %230, float %229
%235 = load float, float* %21
%236 = fcmp olt float %235, %232
%237 = select i1 %236, float %235, float %232
%238 = fcmp ogt float %235, %234
%239 = select i1 %238, float %235, float %234
%240 = load float, float* %22
%241 = fcmp olt float %240, %237
%242 = select i1 %241, float %240, float %237
%243 = fcmp ogt float %240, %239
%244 = select i1 %243, float %240, float %239
%245 = load float, float* %23
%246 = fcmp olt float %245, %242
%247 = select i1 %246, float %245, float %242
%248 = fcmp ogt float %245, %244
%249 = select i1 %248, float %245, float %244
%250 = load float, float* %24
%251 = fcmp olt float %250, %247
%252 = select i1 %251, float %250, float %247
%253 = fcmp ogt float %250, %249
%254 = select i1 %253, float %250, float %249
%255 = fsub float %254, %252
%256 = fdiv float 3.000000e+01, %255
br label %257
257: ; preds = %280, %171
%258 = phi float [ %175, %171 ], [ %282, %280 ]
%259 = phi i64 [ 1, %171 ], [ %278, %280 ]
%260 = fsub float %258, %252
%261 = fmul float %256, %260
%262 = fpext float %261 to double
%263 = fadd double %262, 5.000000e-01
%264 = fadd double %263, 1.000000e-03
%265 = fptosi double %264 to i32
%266 = trunc i64 %259 to i32
%267 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([5 x i8], [5 x i8]* @.str.6, i64 0, i64 0), i32 %266)
%268 = icmp slt i32 %265, 0
br i1 %268, label %276, label %269
269: ; preds = %257
%270 = add i32 %265, 1
br label %271
271: ; preds = %269, %271
%272 = phi i32 [ %274, %271 ], [ 1, %269 ]
%273 = call i32 @putchar(i32 42)
%274 = add nuw i32 %272, 1
%275 = icmp eq i32 %272, %270
br i1 %275, label %276, label %271
276: ; preds = %271, %257
%277 = call i32 @putchar(i32 10)
%278 = add nuw nsw i64 %259, 1
%279 = icmp eq i64 %278, 17
br i1 %279, label %26, label %280
280: ; preds = %276
%281 = getelementptr inbounds float, float* %3, i64 %278
%282 = load float, float* %281
br label %257
283: ; preds = %26, %0
%284 = call i32 @free_vector(float* %3, i32 1, i32 16)
ret i32 0
}