#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);
double fabs(double);
void CalcParms(int r, int Ext[], double Grid[], double D[], double W[],
               double ad[], double x[], double y[]) {
  int i, j, k, ld;
  double sign, xi, delta, denom, numer;
  for (i = 0; i <= r; i++)
    x[i] = cos(6.2831853071795865 * Grid[Ext[i]]);
  ld = (r - 1) / 15 + 1;
  for (i = 0; i <= r; i++) {
    denom = 1.0;
    xi = x[i];
    for (j = 0; j < ld; j++) {
      for (k = j; k <= r; k += ld)
        if (k != i)
          denom *= 2.0 * (xi - x[k]);
    }
    if (fabs(denom) < 0.00001)
      denom = 0.00001;
    ad[i] = 1.0 / denom;
  }
  numer = denom = 0;
  sign = 1;
  for (i = 0; i <= r; i++) {
    numer += ad[i] * D[Ext[i]];
    denom += sign * ad[i] / W[Ext[i]];
    sign = -sign;
  }
  delta = numer / denom;
  sign = 1;
  for (i = 0; i <= r; i++) {
    y[i] = D[Ext[i]] - sign * delta / W[Ext[i]];
    sign = -sign;
  }
}


x86 assembly (clang, -O0):
<CalcParms>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    0x18(%rbp),%rax
mov    0x10(%rbp),%rax
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x4(%rbp),%eax
jg     1187 <CalcParms+0x77>
mov    -0x18(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x34(%rbp),%rdx
movslq (%rcx,%rdx,4),%rcx
movsd  0xeb6(%rip),%xmm0
mulsd  (%rax,%rcx,8),%xmm0
call   1030 <cos@plt>
mov    0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    113e <CalcParms+0x2e>
mov    -0x4(%rbp),%eax
sub    $0x1,%eax
mov    $0xf,%ecx
cltd
idiv   %ecx
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x4(%rbp),%eax
jg     12a3 <CalcParms+0x193>
movsd  0xe4a(%rip),%xmm0
movsd  %xmm0,-0x60(%rbp)
mov    0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x50(%rbp)
movl   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%eax
cmp    -0x40(%rbp),%eax
jge    124c <CalcParms+0x13c>
mov    -0x38(%rbp),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x4(%rbp),%eax
jg     1239 <CalcParms+0x129>
mov    -0x3c(%rbp),%eax
cmp    -0x34(%rbp),%eax
je     1226 <CalcParms+0x116>
movsd  -0x50(%rbp),%xmm1
mov    0x10(%rbp),%rax
movslq -0x3c(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm1
movsd  0xdf8(%rip),%xmm0
mulsd  %xmm1,%xmm0
mulsd  -0x60(%rbp),%xmm0
movsd  %xmm0,-0x60(%rbp)
jmp    122b <CalcParms+0x11b>
mov    -0x40(%rbp),%eax
add    -0x3c(%rbp),%eax
mov    %eax,-0x3c(%rbp)
jmp    11e6 <CalcParms+0xd6>
jmp    123e <CalcParms+0x12e>
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    11d4 <CalcParms+0xc4>
movsd  -0x60(%rbp),%xmm1
movaps 0xdc8(%rip),%xmm0
pand   %xmm0,%xmm1
movsd  0xda4(%rip),%xmm0
ucomisd %xmm1,%xmm0
jbe    127b <CalcParms+0x16b>
movsd  0xd92(%rip),%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  0xd7d(%rip),%xmm0
divsd  -0x60(%rbp),%xmm0
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    11a2 <CalcParms+0x92>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x60(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x68(%rbp)
movsd  0xd45(%rip),%xmm0
movsd  %xmm0,-0x48(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x4(%rbp),%eax
jg     1367 <CalcParms+0x257>
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x34(%rbp),%rdx
movslq (%rcx,%rdx,4),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x68(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x68(%rbp)
movsd  -0x48(%rbp),%xmm0
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x34(%rbp),%rdx
movslq (%rcx,%rdx,4),%rcx
divsd  (%rax,%rcx,8),%xmm0
addsd  -0x60(%rbp),%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x48(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    12c7 <CalcParms+0x1b7>
movsd  -0x68(%rbp),%xmm0
divsd  -0x60(%rbp),%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  0xc82(%rip),%xmm0
movsd  %xmm0,-0x48(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x4(%rbp),%eax
jg     140a <CalcParms+0x2fa>
mov    -0x20(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x34(%rbp),%rdx
movslq (%rcx,%rdx,4),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  -0x48(%rbp),%xmm1
mulsd  -0x58(%rbp),%xmm1
mov    -0x28(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x34(%rbp),%rdx
movslq (%rcx,%rdx,4),%rcx
divsd  (%rax,%rcx,8),%xmm1
subsd  %xmm1,%xmm0
mov    0x18(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x48(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    138a <CalcParms+0x27a>
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<CalcParms>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
mov    %r9,0x18(%rsp)
mov    %rcx,(%rsp)
test   %edi,%edi
js     1404 <CalcParms+0x2f4>
mov    %rdx,%rbp
mov    %edi,%r13d
mov    %edi,%r14d
lea    0x1(%r14),%r15
test   %edi,%edi
mov    %r8,0x20(%rsp)
mov    %r15,0x10(%rsp)
je     11b2 <CalcParms+0xa2>
mov    %rsi,%rbx
and    $0xfffffffe,%r15d
mov    %r15,0x8(%rsp)
xor    %r12d,%r12d
nopl   0x0(%rax)
movslq (%rbx,%r12,4),%rax
movsd  0x0(%rbp,%rax,8),%xmm0
movsd  0xe8e(%rip),%xmm1
mulsd  %xmm1,%xmm0
call   1030 <cos@plt>
mov    0x60(%rsp),%r15
movsd  %xmm0,(%r15,%r12,8)
movslq 0x4(%rbx,%r12,4),%rax
movsd  0x0(%rbp,%rax,8),%xmm0
mulsd  0xe67(%rip),%xmm0
call   1030 <cos@plt>
movsd  %xmm0,0x8(%r15,%r12,8)
add    $0x2,%r12
cmp    %r12,0x8(%rsp)
jne    1160 <CalcParms+0x50>
jmp    11b8 <CalcParms+0xa8>
xor    %r12d,%r12d
mov    %rsi,%rbx
mov    0x10(%rsp),%rax
test   $0x1,%al
je     11e3 <CalcParms+0xd3>
movslq (%rbx,%r12,4),%rax
movsd  0x0(%rbp,%rax,8),%xmm0
mulsd  0xe2d(%rip),%xmm0
call   1030 <cos@plt>
mov    0x60(%rsp),%rax
movsd  %xmm0,(%rax,%r12,8)
test   %r13d,%r13d
mov    0x20(%rsp),%r12
js     1404 <CalcParms+0x2f4>
mov    %rbx,0x8(%rsp)
mov    0x68(%rsp),%r8
lea    -0x1(%r13),%eax
cltq
imul   $0xffffffff88888889,%rax,%rax
shr    $0x20,%rax
add    %r13d,%eax
add    $0xffffffff,%eax
mov    %eax,%ecx
shr    $0x1f,%ecx
sar    $0x3,%eax
add    %ecx,%eax
cltq
xor    %r10d,%r10d
test   %eax,%eax
mov    $0x0,%r11d
cmovg  %eax,%r11d
lea    0x1(%rax),%rsi
add    $0x1,%r11d
lea    0x1(%r13),%r9d
lea    0x8(,%rax,8),%rbp
movsd  0xdbf(%rip),%xmm0
movapd 0xdcf(%rip),%xmm1
movsd  0xdb7(%rip),%xmm2
movsd  0xdb7(%rip),%xmm3
jmp    1288 <CalcParms+0x178>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    0x18(%rsp),%rax
movsd  %xmm5,(%rax,%r10,8)
add    $0x1,%r10
cmp    %r9,%r10
je     1313 <CalcParms+0x203>
mov    0x60(%rsp),%r15
movsd  (%r15,%r10,8),%xmm5
mov    %r10,%rcx
xor    %edi,%edi
movapd %xmm0,%xmm4
jmp    12b1 <CalcParms+0x1a1>
xchg   %ax,%ax
add    $0x1,%rdi
add    $0xffffffffffffffff,%rcx
add    $0x8,%r15
cmp    %r11,%rdi
je     12f0 <CalcParms+0x1e0>
cmp    %r13d,%edi
jg     12a0 <CalcParms+0x190>
mov    %r15,%rax
xor    %edx,%edx
jmp    12cf <CalcParms+0x1bf>
nopl   (%rax)
add    %rsi,%rdx
add    %rbp,%rax
lea    (%rdi,%rdx,1),%rbx
cmp    %r14,%rbx
jg     12a0 <CalcParms+0x190>
cmp    %rdx,%rcx
je     12c0 <CalcParms+0x1b0>
movapd %xmm5,%xmm6
subsd  (%rax),%xmm6
addsd  %xmm6,%xmm6
mulsd  %xmm6,%xmm4
jmp    12c0 <CalcParms+0x1b0>
cs nopw 0x0(%rax,%rax,1)
movapd %xmm4,%xmm5
andpd  %xmm1,%xmm5
ucomisd %xmm5,%xmm3
movapd %xmm2,%xmm5
ja     1270 <CalcParms+0x160>
movapd %xmm0,%xmm5
divsd  %xmm4,%xmm5
jmp    1270 <CalcParms+0x160>
test   %r13d,%r13d
mov    0x8(%rsp),%rdi
mov    0x10(%rsp),%rbp
js     1404 <CalcParms+0x2f4>
movsd  0xcda(%rip),%xmm1
xorpd  %xmm0,%xmm0
xor    %eax,%eax
movapd 0xcf4(%rip),%xmm3
xorpd  %xmm2,%xmm2
mov    (%rsp),%rdx
mov    0x18(%rsp),%rsi
nopl   0x0(%rax)
movsd  (%rsi,%rax,8),%xmm4
movslq (%rdi,%rax,4),%rcx
movapd %xmm1,%xmm5
mulsd  %xmm4,%xmm5
mulsd  (%rdx,%rcx,8),%xmm4
addsd  %xmm4,%xmm0
divsd  (%r12,%rcx,8),%xmm5
addsd  %xmm5,%xmm2
xorpd  %xmm3,%xmm1
add    $0x1,%rax
cmp    %rax,%rbp
jne    1350 <CalcParms+0x240>
test   %r13d,%r13d
js     1404 <CalcParms+0x2f4>
divsd  %xmm2,%xmm0
test   %r14,%r14
je     1413 <CalcParms+0x303>
mov    %ebp,%ecx
and    $0xfffffffe,%ecx
xor    %eax,%eax
mov    (%rsp),%rsi
xchg   %ax,%ax
movslq (%rdi,%rax,4),%rdx
movapd %xmm0,%xmm1
divsd  (%r12,%rdx,8),%xmm1
movsd  (%rsi,%rdx,8),%xmm2
subsd  %xmm1,%xmm2
movsd  %xmm2,(%r8,%rax,8)
movslq 0x4(%rdi,%rax,4),%rdx
movapd %xmm0,%xmm1
divsd  (%r12,%rdx,8),%xmm1
addsd  (%rsi,%rdx,8),%xmm1
movsd  %xmm1,0x8(%r8,%rax,8)
add    $0x2,%rax
cmp    %rax,%rcx
jne    13a0 <CalcParms+0x290>
test   $0x1,%bpl
je     1404 <CalcParms+0x2f4>
movslq (%rdi,%rax,4),%rcx
mov    (%rsp),%rdx
movsd  (%rdx,%rcx,8),%xmm1
divsd  (%r12,%rcx,8),%xmm0
subsd  %xmm0,%xmm1
movsd  %xmm1,(%r8,%rax,8)
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
xor    %eax,%eax
test   $0x1,%bpl
jne    13e7 <CalcParms+0x2d7>
jmp    1404 <CalcParms+0x2f4>

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

LLVM IR (-O2):
define void @CalcParms(i32 %0, i32* nocapture %1, double* nocapture %2, double* nocapture %3, double* nocapture %4, double* nocapture %5, double* nocapture %6, double* nocapture writeonly %7) {
%9 = icmp slt i32 %0, 0
br i1 %9, label %173, label %10
10: ; preds = %8
%11 = add nuw i32 %0, 1
%12 = zext i32 %11 to i64
%13 = add nsw i64 %12, -1
%14 = and i64 %12, 1
%15 = icmp eq i64 %13, 0
br i1 %15, label %41, label %16
16: ; preds = %10
%17 = and i64 %12, 4294967294
br label %18
18: ; preds = %18, %16
%19 = phi i64 [ 0, %16 ], [ %38, %18 ]
%20 = phi i64 [ 0, %16 ], [ %39, %18 ]
%21 = getelementptr inbounds i32, i32* %1, i64 %19
%22 = load i32, i32* %21
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds double, double* %2, i64 %23
%25 = load double, double* %24
%26 = fmul double %25, 0x401921FB54442D18
%27 = tail call double @cos(double %26)
%28 = getelementptr inbounds double, double* %6, i64 %19
store double %27, double* %28
%29 = or i64 %19, 1
%30 = getelementptr inbounds i32, i32* %1, i64 %29
%31 = load i32, i32* %30
%32 = sext i32 %31 to i64
%33 = getelementptr inbounds double, double* %2, i64 %32
%34 = load double, double* %33
%35 = fmul double %34, 0x401921FB54442D18
%36 = tail call double @cos(double %35)
%37 = getelementptr inbounds double, double* %6, i64 %29
store double %36, double* %37
%38 = add nuw nsw i64 %19, 2
%39 = add i64 %20, 2
%40 = icmp eq i64 %39, %17
br i1 %40, label %41, label %18
41: ; preds = %18, %10
%42 = phi i64 [ 0, %10 ], [ %38, %18 ]
%43 = icmp eq i64 %14, 0
br i1 %43, label %53, label %44
44: ; preds = %41
%45 = getelementptr inbounds i32, i32* %1, i64 %42
%46 = load i32, i32* %45
%47 = sext i32 %46 to i64
%48 = getelementptr inbounds double, double* %2, i64 %47
%49 = load double, double* %48
%50 = fmul double %49, 0x401921FB54442D18
%51 = tail call double @cos(double %50)
%52 = getelementptr inbounds double, double* %6, i64 %42
store double %51, double* %52
br label %53
53: ; preds = %41, %44
%54 = add nsw i32 %0, -1
%55 = sdiv i32 %54, 15
br i1 %9, label %173, label %56
56: ; preds = %53
%57 = add nsw i32 %55, 1
%58 = sext i32 %57 to i64
%59 = zext i32 %0 to i64
%60 = call i32 @llvm.smax.i32(i32 %55, i32 0)
%61 = add nuw nsw i32 %60, 1
%62 = add nuw nsw i32 %0, 1
%63 = zext i32 %62 to i64
%64 = zext i32 %61 to i64
br label %69
65: ; preds = %96
br i1 %9, label %173, label %66
66: ; preds = %65
%67 = add nuw nsw i32 %0, 1
%68 = zext i32 %67 to i64
br label %104
69: ; preds = %96, %56
%70 = phi i64 [ 0, %56 ], [ %102, %96 ]
%71 = getelementptr inbounds double, double* %6, i64 %70
%72 = load double, double* %71
br label %73
73: ; preds = %69, %92
%74 = phi i64 [ 0, %69 ], [ %94, %92 ]
%75 = phi double [ 1.000000e+00, %69 ], [ %93, %92 ]
%76 = trunc i64 %74 to i32
%77 = icmp sgt i32 %76, %0
br i1 %77, label %92, label %78
78: ; preds = %73, %88
%79 = phi i64 [ %90, %88 ], [ %74, %73 ]
%80 = phi double [ %89, %88 ], [ %75, %73 ]
%81 = icmp eq i64 %79, %70
br i1 %81, label %88, label %82
82: ; preds = %78
%83 = getelementptr inbounds double, double* %6, i64 %79
%84 = load double, double* %83
%85 = fsub double %72, %84
%86 = fmul double %85, 2.000000e+00
%87 = fmul double %80, %86
br label %88
88: ; preds = %78, %82
%89 = phi double [ %87, %82 ], [ %80, %78 ]
%90 = add nsw i64 %79, %58
%91 = icmp sgt i64 %90, %59
br i1 %91, label %92, label %78
92: ; preds = %88, %73
%93 = phi double [ %75, %73 ], [ %89, %88 ]
%94 = add nuw nsw i64 %74, 1
%95 = icmp eq i64 %94, %64
br i1 %95, label %96, label %73
96: ; preds = %92
%97 = tail call double @llvm.fabs.f64(double %93)
%98 = fcmp olt double %97, 1.000000e-05
%99 = fdiv double 1.000000e+00, %93
%100 = select i1 %98, double 0x40F869FFFFFFFFFF, double %99
%101 = getelementptr inbounds double, double* %5, i64 %70
store double %100, double* %101
%102 = add nuw nsw i64 %70, 1
%103 = icmp eq i64 %102, %63
br i1 %103, label %65, label %69
104: ; preds = %66, %104
%105 = phi i64 [ 0, %66 ], [ %123, %104 ]
%106 = phi double [ 0.000000e+00, %66 ], [ %116, %104 ]
%107 = phi double [ 0.000000e+00, %66 ], [ %121, %104 ]
%108 = phi double [ 1.000000e+00, %66 ], [ %122, %104 ]
%109 = getelementptr inbounds double, double* %5, i64 %105
%110 = load double, double* %109
%111 = getelementptr inbounds i32, i32* %1, i64 %105
%112 = load i32, i32* %111
%113 = sext i32 %112 to i64
%114 = getelementptr inbounds double, double* %3, i64 %113
%115 = load double, double* %114
%116 = tail call double @llvm.fmuladd.f64(double %110, double %115, double %106)
%117 = fmul double %108, %110
%118 = getelementptr inbounds double, double* %4, i64 %113
%119 = load double, double* %118
%120 = fdiv double %117, %119
%121 = fadd double %107, %120
%122 = fneg double %108
%123 = add nuw nsw i64 %105, 1
%124 = icmp eq i64 %123, %68
br i1 %124, label %125, label %104
125: ; preds = %104
%126 = fdiv double %116, %121
br i1 %9, label %173, label %127
127: ; preds = %125
%128 = and i64 %12, 1
%129 = icmp eq i64 %13, 0
br i1 %129, label %159, label %130
130: ; preds = %127
%131 = and i64 %12, 4294967294
br label %132
132: ; preds = %132, %130
%133 = phi i64 [ 0, %130 ], [ %156, %132 ]
%134 = phi i64 [ 0, %130 ], [ %157, %132 ]
%135 = getelementptr inbounds i32, i32* %1, i64 %133
%136 = load i32, i32* %135
%137 = sext i32 %136 to i64
%138 = getelementptr inbounds double, double* %3, i64 %137
%139 = load double, double* %138
%140 = getelementptr inbounds double, double* %4, i64 %137
%141 = load double, double* %140
%142 = fdiv double %126, %141
%143 = fsub double %139, %142
%144 = getelementptr inbounds double, double* %7, i64 %133
store double %143, double* %144
%145 = or i64 %133, 1
%146 = getelementptr inbounds i32, i32* %1, i64 %145
%147 = load i32, i32* %146
%148 = sext i32 %147 to i64
%149 = getelementptr inbounds double, double* %3, i64 %148
%150 = load double, double* %149
%151 = getelementptr inbounds double, double* %4, i64 %148
%152 = load double, double* %151
%153 = fdiv double %126, %152
%154 = fadd double %150, %153
%155 = getelementptr inbounds double, double* %7, i64 %145
store double %154, double* %155
%156 = add nuw nsw i64 %133, 2
%157 = add i64 %134, 2
%158 = icmp eq i64 %157, %131
br i1 %158, label %159, label %132
159: ; preds = %132, %127
%160 = phi i64 [ 0, %127 ], [ %156, %132 ]
%161 = icmp eq i64 %128, 0
br i1 %161, label %173, label %162
162: ; preds = %159
%163 = getelementptr inbounds i32, i32* %1, i64 %160
%164 = load i32, i32* %163
%165 = sext i32 %164 to i64
%166 = getelementptr inbounds double, double* %3, i64 %165
%167 = load double, double* %166
%168 = getelementptr inbounds double, double* %4, i64 %165
%169 = load double, double* %168
%170 = fdiv double %126, %169
%171 = fsub double %167, %170
%172 = getelementptr inbounds double, double* %7, i64 %160
store double %171, double* %172
br label %173
173: ; preds = %162, %159, %8, %53, %65, %125
ret void
}