#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 *dvector(int, int);
int /*<<< orphan*/ fprintf(int /*<<< orphan*/, char *, ...);
int /*<<< orphan*/ free_dvector(double *, int, int);
int /*<<< orphan*/ ldl_dcmp(double **, int, double *, double *, double *, int,
                            int /*<<< orphan*/, int *);
double sqrt(double);
int /*<<< orphan*/ stderr;
int /*<<< orphan*/ stdout;
int sturm(double **K, double **M, int n, int m, double shift, double ws,
          int verbose) {
  double ws_shift, *d;
  int ok = 0, i, j, modes;
  d = dvector(1, n);
  modes = (int)((float)(0.5 * m) > (float)(m - 8.0) ? (int)(m / 2.0) : m - 8);
  ws_shift = ws + shift;
  for (i = 1; i <= n; i++)
    for (j = i; j <= n; j++)
      K[i][j] -= ws_shift * M[i][j];
  ldl_dcmp(K, n, d, d, d, 1, 0, &ok);
  if (verbose)
    fprintf(stdout, "  There are %d modes below %f Hz.", -ok,
            sqrt(ws) /
                (2.0 * 3.14159265358979323846264338327950288419716939937510));
  if ((-ok > modes) && (verbose)) {
    fprintf(stderr, " ... %d modes were not found.\n", -ok - modes);
    fprintf(stderr, " Try increasing the number of modes in \n");
    fprintf(stderr, " order to get the missing modes below %f Hz.\n",
            sqrt(ws) /
                (2.0 * 3.14159265358979323846264338327950288419716939937510));
  } else if (verbose)
    fprintf(stdout, "  All %d modes were found.\n", modes);
  for (i = 1; i <= n; i++)
    for (j = i; j <= n; j++)
      K[i][j] += ws_shift * M[i][j];
  free_dvector(d, 1, n);
  return ok;
}


x86 assembly (clang, -O0):
<sturm>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
movsd  %xmm0,-0x20(%rbp)
movsd  %xmm1,-0x28(%rbp)
mov    %r8d,-0x2c(%rbp)
movl   $0x0,-0x44(%rbp)
mov    -0x14(%rbp),%esi
mov    $0x1,%edi
call   1050 <dvector@plt>
mov    %rax,-0x40(%rbp)
cvtsi2sdl -0x18(%rbp),%xmm1
movsd  0xe6f(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
cvtsi2sdl -0x18(%rbp),%xmm1
movsd  0xe52(%rip),%xmm2
subsd  %xmm2,%xmm1
cvtsd2ss %xmm1,%xmm1
ucomiss %xmm1,%xmm0
jbe    11dc <sturm+0x8c>
cvtsi2sdl -0x18(%rbp),%xmm0
movsd  0xe44(%rip),%xmm1
divsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %eax,-0x54(%rbp)
jmp    11e5 <sturm+0x95>
mov    -0x18(%rbp),%eax
sub    $0x8,%eax
mov    %eax,-0x54(%rbp)
mov    -0x54(%rbp),%eax
mov    %eax,-0x50(%rbp)
movsd  -0x28(%rbp),%xmm0
addsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
movl   $0x1,-0x48(%rbp)
mov    -0x48(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     1293 <sturm+0x143>
mov    -0x48(%rbp),%eax
mov    %eax,-0x4c(%rbp)
mov    -0x4c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     1280 <sturm+0x130>
movsd  -0x38(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x48(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x4c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
mov    -0x8(%rbp),%rax
movslq -0x48(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x4c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movq   %xmm0,%rdx
movabs $0x8000000000000000,%rsi
xor    %rsi,%rdx
movq   %rdx,%xmm0
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x4c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x4c(%rbp)
jmp    1213 <sturm+0xc3>
jmp    1285 <sturm+0x135>
mov    -0x48(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x48(%rbp)
jmp    1201 <sturm+0xb1>
mov    -0x8(%rbp),%rdi
mov    -0x14(%rbp),%esi
mov    -0x40(%rbp),%rdx
mov    -0x40(%rbp),%rcx
mov    -0x40(%rbp),%r8
mov    $0x1,%r9d
xor    %eax,%eax
lea    -0x44(%rbp),%rax
movl   $0x0,(%rsp)
mov    %rax,0x8(%rsp)
call   1040 <ldl_dcmp@plt>
cmpl   $0x0,-0x2c(%rbp)
je     130b <sturm+0x1bb>
mov    0x2d04(%rip),%rax
mov    (%rax),%eax
mov    %eax,-0x5c(%rbp)
xor    %eax,%eax
sub    -0x44(%rbp),%eax
mov    %eax,-0x58(%rbp)
movsd  -0x28(%rbp),%xmm0
call   1070 <sqrt@plt>
mov    -0x5c(%rbp),%edi
mov    -0x58(%rbp),%edx
movsd  0xd1f(%rip),%xmm1
divsd  %xmm1,%xmm0
lea    0xd1c(%rip),%rsi
mov    $0x1,%al
call   1030 <fprintf@plt>
xor    %eax,%eax
sub    -0x44(%rbp),%eax
cmp    -0x50(%rbp),%eax
jle    1391 <sturm+0x241>
cmpl   $0x0,-0x2c(%rbp)
je     1391 <sturm+0x241>
mov    0x2cb6(%rip),%rax
mov    (%rax),%edi
xor    %edx,%edx
sub    -0x44(%rbp),%edx
sub    -0x50(%rbp),%edx
lea    0xd07(%rip),%rsi
mov    $0x0,%al
call   1030 <fprintf@plt>
mov    0x2c97(%rip),%rax
mov    (%rax),%edi
lea    0xd0f(%rip),%rsi
mov    $0x0,%al
call   1030 <fprintf@plt>
mov    0x2c80(%rip),%rax
mov    (%rax),%eax
mov    %eax,-0x60(%rbp)
movsd  -0x28(%rbp),%xmm0
call   1070 <sqrt@plt>
mov    -0x60(%rbp),%edi
movsd  0xc9e(%rip),%xmm1
divsd  %xmm1,%xmm0
lea    0xd05(%rip),%rsi
mov    $0x1,%al
call   1030 <fprintf@plt>
jmp    13ba <sturm+0x26a>
cmpl   $0x0,-0x2c(%rbp)
je     13b5 <sturm+0x265>
mov    0x2c36(%rip),%rax
mov    (%rax),%edi
mov    -0x50(%rbp),%edx
lea    0xd0a(%rip),%rsi
mov    $0x0,%al
call   1030 <fprintf@plt>
jmp    13ba <sturm+0x26a>
movl   $0x1,-0x48(%rbp)
mov    -0x48(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     143c <sturm+0x2ec>
mov    -0x48(%rbp),%eax
mov    %eax,-0x4c(%rbp)
mov    -0x4c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     1429 <sturm+0x2d9>
movsd  -0x38(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x48(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x4c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
mov    -0x8(%rbp),%rax
movslq -0x48(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x4c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x4c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x4c(%rbp)
jmp    13d3 <sturm+0x283>
jmp    142e <sturm+0x2de>
mov    -0x48(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x48(%rbp)
jmp    13c1 <sturm+0x271>
mov    -0x40(%rbp),%rdi
mov    -0x14(%rbp),%edx
mov    $0x1,%esi
call   1060 <free_dvector@plt>
mov    -0x44(%rbp),%eax
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<sturm>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %r8d,0x1c(%rsp)
movsd  %xmm1,0x8(%rsp)
movaps %xmm0,0x20(%rsp)
mov    %ecx,%ebx
mov    %edx,%ebp
mov    %rsi,%r12
mov    %rdi,0x10(%rsp)
movl   $0x0,(%rsp)
mov    $0x1,%edi
mov    %edx,%esi
call   1050 <dvector@plt>
movapd 0x20(%rsp),%xmm7
xorps  %xmm0,%xmm0
cvtsi2sd %ebx,%xmm0
movsd  0xe5e(%rip),%xmm1
mulsd  %xmm0,%xmm1
cvtsd2ss %xmm1,%xmm2
addsd  0xe56(%rip),%xmm0
cvtsd2ss %xmm0,%xmm0
add    $0xfffffff8,%ebx
ucomiss %xmm0,%xmm2
cvttsd2si %xmm1,%ecx
cmovbe %ebx,%ecx
mov    %ecx,0x18(%rsp)
mov    %rax,0x30(%rsp)
addsd  0x8(%rsp),%xmm7
mov    %ebp,%r13d
mov    %ebp,0x4(%rsp)
test   %ebp,%ebp
jle    13f7 <sturm+0x2a7>
movapd 0xe37(%rip),%xmm0
xorpd  %xmm7,%xmm0
lea    0x1(%r13),%rax
pshufd $0x44,%xmm0,%xmm1
mov    %r13,%r15
not    %r15
lea    -0x4(%r13),%r11
mov    $0x1,%r14d
mov    $0x7,%r8d
xor    %ebp,%ebp
mov    %r15,0x20(%rsp)
jmp    1239 <sturm+0xe9>
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x1,%r14
add    $0x1,%rbp
add    $0x1,%r8
add    $0xffffffffffffffff,%r11
cmp    %rax,%r14
je     13f7 <sturm+0x2a7>
mov    %rbp,%rdx
not    %rdx
lea    (%rdx,%rax,1),%r9
mov    (%r12,%r14,8),%rcx
mov    0x10(%rsp),%rsi
mov    (%rsi,%r14,8),%rbx
mov    %r14,%rsi
cmp    $0x4,%r9
jb     1390 <sturm+0x240>
lea    (%rbx,%r14,8),%rsi
lea    (%rcx,%rax,8),%rdi
cmp    %rdi,%rsi
jae    127e <sturm+0x12e>
lea    (%rbx,%rax,8),%r10
lea    (%rcx,%r14,8),%rdi
mov    %r14,%rsi
cmp    %r10,%rdi
jb     1390 <sturm+0x240>
mov    %r12,%rdi
add    %rax,%rdx
add    $0xfffffffffffffffc,%rdx
mov    %rdx,%r10
shr    $0x2,%r10
add    $0x1,%r10
cmp    $0x4,%rdx
jae    12a0 <sturm+0x150>
xor    %edx,%edx
jmp    133b <sturm+0x1eb>
mov    %r11,%rsi
shr    $0x2,%rsi
add    $0x1,%rsi
and    $0xfffffffffffffffe,%rsi
lea    (%rbx,%r8,8),%r12
lea    (%rcx,%r8,8),%r15
xor    %edx,%edx
nopl   0x0(%rax)
movupd -0x30(%r15,%rdx,8),%xmm2
movupd -0x20(%r15,%rdx,8),%xmm3
mulpd  %xmm1,%xmm2
movupd -0x30(%r12,%rdx,8),%xmm4
addpd  %xmm2,%xmm4
movupd -0x20(%r12,%rdx,8),%xmm2
movupd -0x10(%r12,%rdx,8),%xmm5
movupd (%r12,%rdx,8),%xmm6
mulpd  %xmm1,%xmm3
addpd  %xmm2,%xmm3
movupd %xmm4,-0x30(%r12,%rdx,8)
movupd %xmm3,-0x20(%r12,%rdx,8)
movupd -0x10(%r15,%rdx,8),%xmm2
movupd (%r15,%rdx,8),%xmm3
mulpd  %xmm1,%xmm2
addpd  %xmm5,%xmm2
mulpd  %xmm1,%xmm3
addpd  %xmm6,%xmm3
movupd %xmm2,-0x10(%r12,%rdx,8)
movupd %xmm3,(%r12,%rdx,8)
add    $0x8,%rdx
add    $0xfffffffffffffffe,%rsi
jne    12c0 <sturm+0x170>
mov    %r9,%rsi
and    $0xfffffffffffffffc,%rsi
test   $0x1,%r10b
je     137c <sturm+0x22c>
add    %r14,%rdx
movupd (%rcx,%rdx,8),%xmm2
movupd 0x10(%rcx,%rdx,8),%xmm3
movupd (%rbx,%rdx,8),%xmm4
movupd 0x10(%rbx,%rdx,8),%xmm5
mulpd  %xmm1,%xmm2
addpd  %xmm4,%xmm2
mulpd  %xmm1,%xmm3
addpd  %xmm5,%xmm3
movupd %xmm2,(%rbx,%rdx,8)
movupd %xmm3,0x10(%rbx,%rdx,8)
cmp    %rsi,%r9
mov    %rdi,%r12
mov    0x20(%rsp),%r15
je     1220 <sturm+0xd0>
add    %r14,%rsi
mov    %eax,%edi
sub    %esi,%edi
mov    %rsi,%rdx
test   $0x1,%dil
je     13b4 <sturm+0x264>
movsd  (%rcx,%rsi,8),%xmm2
mulsd  %xmm0,%xmm2
addsd  (%rbx,%rsi,8),%xmm2
movsd  %xmm2,(%rbx,%rsi,8)
lea    0x1(%rsi),%rdx
not    %rsi
cmp    %r15,%rsi
je     1220 <sturm+0xd0>
movsd  (%rcx,%rdx,8),%xmm2
mulsd  %xmm0,%xmm2
addsd  (%rbx,%rdx,8),%xmm2
movsd  %xmm2,(%rbx,%rdx,8)
movsd  0x8(%rcx,%rdx,8),%xmm2
mulsd  %xmm0,%xmm2
addsd  0x8(%rbx,%rdx,8),%xmm2
movsd  %xmm2,0x8(%rbx,%rdx,8)
add    $0x2,%rdx
cmp    %rdx,%rax
jne    13c0 <sturm+0x270>
jmp    1220 <sturm+0xd0>
movapd %xmm7,0x20(%rsp)
mov    %rsp,%rax
mov    0x10(%rsp),%rdi
mov    0x4(%rsp),%esi
mov    0x30(%rsp),%rcx
mov    %rcx,%rdx
mov    %rcx,%r8
mov    $0x1,%r9d
push   %rax
push   $0x0
call   1040 <ldl_dcmp@plt>
add    $0x10,%rsp
cmpl   $0x0,0x1c(%rsp)
je     14fd <sturm+0x3ad>
mov    0x2ba0(%rip),%r15
mov    (%r15),%ebp
xor    %ebx,%ebx
xor    %r14d,%r14d
xorpd  %xmm1,%xmm1
sub    (%rsp),%r14d
movsd  0x8(%rsp),%xmm0
ucomisd %xmm1,%xmm0
jb     145a <sturm+0x30a>
sqrtsd %xmm0,%xmm0
jmp    145f <sturm+0x30f>
call   1070 <sqrt@plt>
divsd  0xba9(%rip),%xmm0
lea    0xbc2(%rip),%rsi
mov    %ebp,%edi
mov    %r14d,%edx
mov    $0x1,%al
call   1030 <fprintf@plt>
sub    (%rsp),%ebx
mov    0x18(%rsp),%edx
cmp    %ebx,%edx
jge    14cc <sturm+0x37c>
mov    0x2b54(%rip),%rbp
mov    0x0(%rbp),%edi
sub    %edx,%ebx
lea    0xbba(%rip),%rsi
mov    %ebx,%edx
xor    %eax,%eax
call   1030 <fprintf@plt>
mov    0x0(%rbp),%edi
lea    0xbc6(%rip),%rsi
xor    %eax,%eax
call   1030 <fprintf@plt>
mov    0x0(%rbp),%r14d
xorpd  %xmm1,%xmm1
movsd  0x8(%rsp),%xmm0
ucomisd %xmm1,%xmm0
jb     14df <sturm+0x38f>
sqrtsd %xmm0,%xmm0
jmp    14e4 <sturm+0x394>
mov    (%r15),%edi
lea    0xbf2(%rip),%rsi
xor    %eax,%eax
call   1030 <fprintf@plt>
jmp    14fd <sturm+0x3ad>
call   1070 <sqrt@plt>
divsd  0xb24(%rip),%xmm0
lea    0xba7(%rip),%rsi
mov    %r14d,%edi
mov    $0x1,%al
call   1030 <fprintf@plt>
cmpl   $0x0,0x4(%rsp)
movapd 0x20(%rsp),%xmm6
jle    1728 <sturm+0x5d8>
lea    0x1(%r13),%rax
movapd %xmm6,%xmm0
unpcklpd %xmm6,%xmm0
mov    %r13,%r8
not    %r8
add    $0xfffffffffffffffc,%r13
mov    $0x1,%r15d
mov    $0x7,%r11d
xor    %r14d,%r14d
jmp    1559 <sturm+0x409>
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x1,%r15
add    $0x1,%r14
add    $0x1,%r11
add    $0xffffffffffffffff,%r13
cmp    %rax,%r15
je     1728 <sturm+0x5d8>
mov    %r14,%rcx
not    %rcx
lea    (%rcx,%rax,1),%r10
mov    (%r12,%r15,8),%rbp
mov    0x10(%rsp),%rdx
mov    (%rdx,%r15,8),%rbx
mov    %r15,%rdx
cmp    $0x4,%r10
jb     16b0 <sturm+0x560>
lea    (%rbx,%r15,8),%rdx
lea    0x0(,%rax,8),%rsi
add    %rbp,%rsi
cmp    %rsi,%rdx
jae    15ac <sturm+0x45c>
lea    (%rbx,%rax,8),%rsi
lea    0x0(,%r15,8),%rdi
add    %rbp,%rdi
mov    %r15,%rdx
cmp    %rsi,%rdi
jb     16b0 <sturm+0x560>
add    %rax,%rcx
add    $0xfffffffffffffffc,%rcx
mov    %rcx,%r9
shr    $0x2,%r9
add    $0x1,%r9
cmp    $0x4,%rcx
jae    15cb <sturm+0x47b>
xor    %ecx,%ecx
jmp    165f <sturm+0x50f>
mov    %r13,%rdx
shr    $0x2,%rdx
add    $0x1,%rdx
and    $0xfffffffffffffffe,%rdx
lea    (%rbx,%r11,8),%rdi
lea    0x0(,%r11,8),%rsi
add    %rbp,%rsi
xor    %ecx,%ecx
nopl   0x0(%rax,%rax,1)
movupd -0x30(%rsi,%rcx,8),%xmm1
movupd -0x20(%rsi,%rcx,8),%xmm2
mulpd  %xmm0,%xmm1
movupd -0x30(%rdi,%rcx,8),%xmm3
addpd  %xmm1,%xmm3
movupd -0x20(%rdi,%rcx,8),%xmm1
movupd -0x10(%rdi,%rcx,8),%xmm4
movupd (%rdi,%rcx,8),%xmm5
mulpd  %xmm0,%xmm2
addpd  %xmm1,%xmm2
movupd %xmm3,-0x30(%rdi,%rcx,8)
movupd %xmm2,-0x20(%rdi,%rcx,8)
movupd -0x10(%rsi,%rcx,8),%xmm1
movupd (%rsi,%rcx,8),%xmm2
mulpd  %xmm0,%xmm1
addpd  %xmm4,%xmm1
mulpd  %xmm0,%xmm2
addpd  %xmm5,%xmm2
movupd %xmm1,-0x10(%rdi,%rcx,8)
movupd %xmm2,(%rdi,%rcx,8)
add    $0x8,%rcx
add    $0xfffffffffffffffe,%rdx
jne    15f0 <sturm+0x4a0>
mov    %r10,%rdx
and    $0xfffffffffffffffc,%rdx
test   $0x1,%r9b
je     16a1 <sturm+0x551>
add    %r15,%rcx
movupd 0x0(%rbp,%rcx,8),%xmm1
movupd 0x10(%rbp,%rcx,8),%xmm2
movupd (%rbx,%rcx,8),%xmm3
movupd 0x10(%rbx,%rcx,8),%xmm4
mulpd  %xmm0,%xmm1
addpd  %xmm3,%xmm1
mulpd  %xmm0,%xmm2
addpd  %xmm4,%xmm2
movupd %xmm1,(%rbx,%rcx,8)
movupd %xmm2,0x10(%rbx,%rcx,8)
cmp    %rdx,%r10
je     1540 <sturm+0x3f0>
add    %r15,%rdx
nopl   (%rax)
mov    %eax,%esi
sub    %edx,%esi
mov    %rdx,%rcx
test   $0x1,%sil
je     16d5 <sturm+0x585>
movsd  0x0(%rbp,%rdx,8),%xmm1
mulsd  %xmm6,%xmm1
addsd  (%rbx,%rdx,8),%xmm1
movsd  %xmm1,(%rbx,%rdx,8)
lea    0x1(%rdx),%rcx
not    %rdx
cmp    %r8,%rdx
je     1540 <sturm+0x3f0>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  0x0(%rbp,%rcx,8),%xmm1
mulsd  %xmm6,%xmm1
addsd  (%rbx,%rcx,8),%xmm1
movsd  %xmm1,(%rbx,%rcx,8)
movsd  0x8(%rbp,%rcx,8),%xmm1
mulsd  %xmm6,%xmm1
addsd  0x8(%rbx,%rcx,8),%xmm1
movsd  %xmm1,0x8(%rbx,%rcx,8)
add    $0x2,%rcx
cmp    %rcx,%rax
jne    16f0 <sturm+0x5a0>
jmp    1540 <sturm+0x3f0>
mov    0x30(%rsp),%rdi
mov    $0x1,%esi
mov    0x4(%rsp),%edx
call   1060 <free_dvector@plt>
mov    (%rsp),%eax
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@stdout = global i32 0
@.str = [34 x i8] c" There are %d modes below %f Hz.\00"
@stderr = global i32 0
@.str.1 = [31 x i8] c" ... %d modes were not found.\0A\00"
@.str.2 = [41 x i8] c" Try increasing the number of modes in \0A\00"
@.str.3 = [46 x i8] c" order to get the missing modes below %f Hz.\0A\00"
@.str.4 = [28 x i8] c" All %d modes were found.\0A\00"
define i32 @sturm(double** %0, double** %1, i32 %2, i32 %3, double %4, double %5, i32 %6) {
%8 = alloca double**
%9 = alloca double**
%10 = alloca i32
%11 = alloca i32
%12 = alloca double
%13 = alloca double
%14 = alloca i32
%15 = alloca double
%16 = alloca double*
%17 = alloca i32
%18 = alloca i32
%19 = alloca i32
%20 = alloca i32
store double** %0, double*** %8
store double** %1, double*** %9
store i32 %2, i32* %10
store i32 %3, i32* %11
store double %4, double* %12
store double %5, double* %13
store i32 %6, i32* %14
store i32 0, i32* %17
%21 = load i32, i32* %10
%22 = call double* @dvector(i32 1, i32 %21)
store double* %22, double** %16
%23 = load i32, i32* %11
%24 = sitofp i32 %23 to double
%25 = fmul double 5.000000e-01, %24
%26 = fptrunc double %25 to float
%27 = load i32, i32* %11
%28 = sitofp i32 %27 to double
%29 = fsub double %28, 8.000000e+00
%30 = fptrunc double %29 to float
%31 = fcmp ogt float %26, %30
br i1 %31, label %32, label %37
32: ; preds = %7
%33 = load i32, i32* %11
%34 = sitofp i32 %33 to double
%35 = fdiv double %34, 2.000000e+00
%36 = fptosi double %35 to i32
br label %40
37: ; preds = %7
%38 = load i32, i32* %11
%39 = sub nsw i32 %38, 8
br label %40
40: ; preds = %37, %32
%41 = phi i32 [ %36, %32 ], [ %39, %37 ]
store i32 %41, i32* %20
%42 = load double, double* %13
%43 = load double, double* %12
%44 = fadd double %42, %43
store double %44, double* %15
store i32 1, i32* %18
br label %45
45: ; preds = %81, %40
%46 = load i32, i32* %18
%47 = load i32, i32* %10
%48 = icmp sle i32 %46, %47
br i1 %48, label %49, label %84
49: ; preds = %45
%50 = load i32, i32* %18
store i32 %50, i32* %19
br label %51
51: ; preds = %77, %49
%52 = load i32, i32* %19
%53 = load i32, i32* %10
%54 = icmp sle i32 %52, %53
br i1 %54, label %55, label %80
55: ; preds = %51
%56 = load double, double* %15
%57 = load double**, double*** %9
%58 = load i32, i32* %18
%59 = sext i32 %58 to i64
%60 = getelementptr inbounds double*, double** %57, i64 %59
%61 = load double*, double** %60
%62 = load i32, i32* %19
%63 = sext i32 %62 to i64
%64 = getelementptr inbounds double, double* %61, i64 %63
%65 = load double, double* %64
%66 = load double**, double*** %8
%67 = load i32, i32* %18
%68 = sext i32 %67 to i64
%69 = getelementptr inbounds double*, double** %66, i64 %68
%70 = load double*, double** %69
%71 = load i32, i32* %19
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds double, double* %70, i64 %72
%74 = load double, double* %73
%75 = fneg double %56
%76 = call double @llvm.fmuladd.f64(double %75, double %65, double %74)
store double %76, double* %73
br label %77
77: ; preds = %55
%78 = load i32, i32* %19
%79 = add nsw i32 %78, 1
store i32 %79, i32* %19
br label %51
80: ; preds = %51
br label %81
81: ; preds = %80
%82 = load i32, i32* %18
%83 = add nsw i32 %82, 1
store i32 %83, i32* %18
br label %45
84: ; preds = %45
%85 = load double**, double*** %8
%86 = load i32, i32* %10
%87 = load double*, double** %16
%88 = load double*, double** %16
%89 = load double*, double** %16
%90 = call i32 @ldl_dcmp(double** %85, i32 %86, double* %87, double* %88, double* %89, i32 1, i32 0, i32* %17)
%91 = load i32, i32* %14
%92 = icmp ne i32 %91, 0
br i1 %92, label %93, label %101
93: ; preds = %84
%94 = load i32, i32* @stdout
%95 = load i32, i32* %17
%96 = sub nsw i32 0, %95
%97 = load double, double* %13
%98 = call double @sqrt(double %97)
%99 = fdiv double %98, 0x401921FB54442D18
%100 = call i32 (i32, i8*, ...) @fprintf(i32 %94, i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0), i32 %96, double %99)
br label %101
101: ; preds = %93, %84
%102 = load i32, i32* %17
%103 = sub nsw i32 0, %102
%104 = load i32, i32* %20
%105 = icmp sgt i32 %103, %104
br i1 %105, label %106, label %123
106: ; preds = %101
%107 = load i32, i32* %14
%108 = icmp ne i32 %107, 0
br i1 %108, label %109, label %123
109: ; preds = %106
%110 = load i32, i32* @stderr
%111 = load i32, i32* %17
%112 = sub nsw i32 0, %111
%113 = load i32, i32* %20
%114 = sub nsw i32 %112, %113
%115 = call i32 (i32, i8*, ...) @fprintf(i32 %110, i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.1, i64 0, i64 0), i32 %114)
%116 = load i32, i32* @stderr
%117 = call i32 (i32, i8*, ...) @fprintf(i32 %116, i8* getelementptr inbounds ([41 x i8], [41 x i8]* @.str.2, i64 0, i64 0))
%118 = load i32, i32* @stderr
%119 = load double, double* %13
%120 = call double @sqrt(double %119)
%121 = fdiv double %120, 0x401921FB54442D18
%122 = call i32 (i32, i8*, ...) @fprintf(i32 %118, i8* getelementptr inbounds ([46 x i8], [46 x i8]* @.str.3, i64 0, i64 0), double %121)
br label %131
123: ; preds = %106, %101
%124 = load i32, i32* %14
%125 = icmp ne i32 %124, 0
br i1 %125, label %126, label %130
126: ; preds = %123
%127 = load i32, i32* @stdout
%128 = load i32, i32* %20
%129 = call i32 (i32, i8*, ...) @fprintf(i32 %127, i8* getelementptr inbounds ([28 x i8], [28 x i8]* @.str.4, i64 0, i64 0), i32 %128)
br label %130
130: ; preds = %126, %123
br label %131
131: ; preds = %130, %109
store i32 1, i32* %18
br label %132
132: ; preds = %167, %131
%133 = load i32, i32* %18
%134 = load i32, i32* %10
%135 = icmp sle i32 %133, %134
br i1 %135, label %136, label %170
136: ; preds = %132
%137 = load i32, i32* %18
store i32 %137, i32* %19
br label %138
138: ; preds = %163, %136
%139 = load i32, i32* %19
%140 = load i32, i32* %10
%141 = icmp sle i32 %139, %140
br i1 %141, label %142, label %166
142: ; preds = %138
%143 = load double, double* %15
%144 = load double**, double*** %9
%145 = load i32, i32* %18
%146 = sext i32 %145 to i64
%147 = getelementptr inbounds double*, double** %144, i64 %146
%148 = load double*, double** %147
%149 = load i32, i32* %19
%150 = sext i32 %149 to i64
%151 = getelementptr inbounds double, double* %148, i64 %150
%152 = load double, double* %151
%153 = load double**, double*** %8
%154 = load i32, i32* %18
%155 = sext i32 %154 to i64
%156 = getelementptr inbounds double*, double** %153, i64 %155
%157 = load double*, double** %156
%158 = load i32, i32* %19
%159 = sext i32 %158 to i64
%160 = getelementptr inbounds double, double* %157, i64 %159
%161 = load double, double* %160
%162 = call double @llvm.fmuladd.f64(double %143, double %152, double %161)
store double %162, double* %160
br label %163
163: ; preds = %142
%164 = load i32, i32* %19
%165 = add nsw i32 %164, 1
store i32 %165, i32* %19
br label %138
166: ; preds = %138
br label %167
167: ; preds = %166
%168 = load i32, i32* %18
%169 = add nsw i32 %168, 1
store i32 %169, i32* %18
br label %132
170: ; preds = %132
%171 = load double*, double** %16
%172 = load i32, i32* %10
%173 = call i32 @free_dvector(double* %171, i32 1, i32 %172)
%174 = load i32, i32* %17
ret i32 %174
}

LLVM IR (-O2):
@stdout = global i32 0
@.str = [34 x i8] c" There are %d modes below %f Hz.\00"
@stderr = global i32 0
@.str.1 = [31 x i8] c" ... %d modes were not found.\0A\00"
@.str.2 = [41 x i8] c" Try increasing the number of modes in \0A\00"
@.str.3 = [46 x i8] c" order to get the missing modes below %f Hz.\0A\00"
@.str.4 = [28 x i8] c" All %d modes were found.\0A\00"
define i32 @sturm(double** %0, double** nocapture %1, i32 %2, i32 %3, double %4, double %5, i32 %6) {
%8 = alloca i32
%9 = bitcast i32* %8 to i8*
store i32 0, i32* %8
%10 = tail call double* @dvector(i32 1, i32 %2)
%11 = sitofp i32 %3 to double
%12 = fmul double %11, 5.000000e-01
%13 = fptrunc double %12 to float
%14 = fadd double %11, -8.000000e+00
%15 = fptrunc double %14 to float
%16 = fcmp ogt float %13, %15
%17 = fptosi double %12 to i32
%18 = add nsw i32 %3, -8
%19 = select i1 %16, i32 %17, i32 %18
%20 = fadd double %4, %5
%21 = icmp slt i32 %2, 1
br i1 %21, label %160, label %22
22: ; preds = %7
%23 = fneg double %20
%24 = add nuw i32 %2, 1
%25 = zext i32 %24 to i64
%26 = insertelement <2 x double> poison, double %23, i64 0
%27 = shufflevector <2 x double> %26, <2 x double> poison, <2 x i32> zeroinitializer
%28 = insertelement <2 x double> poison, double %23, i64 0
%29 = shufflevector <2 x double> %28, <2 x double> poison, <2 x i32> zeroinitializer
%30 = sub nsw i64 0, %25
br label %31
31: ; preds = %156, %22
%32 = phi i64 [ %159, %156 ], [ 0, %22 ]
%33 = phi i64 [ %157, %156 ], [ 1, %22 ]
%34 = xor i64 %32, -1
%35 = add i64 %34, %25
%36 = add i64 %35, -4
%37 = lshr i64 %36, 2
%38 = add nuw nsw i64 %37, 1
%39 = xor i64 %32, -1
%40 = add i64 %39, %25
%41 = getelementptr inbounds double*, double** %1, i64 %33
%42 = load double*, double** %41
%43 = getelementptr inbounds double*, double** %0, i64 %33
%44 = load double*, double** %43
%45 = icmp ult i64 %40, 4
br i1 %45, label %125, label %46
46: ; preds = %31
%47 = getelementptr double, double* %44, i64 %33
%48 = getelementptr double, double* %44, i64 %25
%49 = getelementptr double, double* %42, i64 %33
%50 = getelementptr double, double* %42, i64 %25
%51 = icmp ult double* %47, %50
%52 = icmp ult double* %49, %48
%53 = and i1 %51, %52
br i1 %53, label %125, label %54
54: ; preds = %46
%55 = and i64 %40, -4
%56 = add i64 %33, %55
%57 = and i64 %38, 1
%58 = icmp ult i64 %36, 4
br i1 %58, label %102, label %59
59: ; preds = %54
%60 = and i64 %38, 9223372036854775806
br label %61
61: ; preds = %61, %59
%62 = phi i64 [ 0, %59 ], [ %99, %61 ]
%63 = phi i64 [ 0, %59 ], [ %100, %61 ]
%64 = add i64 %33, %62
%65 = getelementptr inbounds double, double* %42, i64 %64
%66 = bitcast double* %65 to <2 x double>*
%67 = load <2 x double>, <2 x double>* %66
%68 = getelementptr inbounds double, double* %65, i64 2
%69 = bitcast double* %68 to <2 x double>*
%70 = load <2 x double>, <2 x double>* %69
%71 = getelementptr inbounds double, double* %44, i64 %64
%72 = bitcast double* %71 to <2 x double>*
%73 = load <2 x double>, <2 x double>* %72
%74 = getelementptr inbounds double, double* %71, i64 2
%75 = bitcast double* %74 to <2 x double>*
%76 = load <2 x double>, <2 x double>* %75
%77 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %27, <2 x double> %67, <2 x double> %73)
%78 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %29, <2 x double> %70, <2 x double> %76)
%79 = bitcast double* %71 to <2 x double>*
store <2 x double> %77, <2 x double>* %79
%80 = bitcast double* %74 to <2 x double>*
store <2 x double> %78, <2 x double>* %80
%81 = or i64 %62, 4
%82 = add i64 %33, %81
%83 = getelementptr inbounds double, double* %42, i64 %82
%84 = bitcast double* %83 to <2 x double>*
%85 = load <2 x double>, <2 x double>* %84
%86 = getelementptr inbounds double, double* %83, i64 2
%87 = bitcast double* %86 to <2 x double>*
%88 = load <2 x double>, <2 x double>* %87
%89 = getelementptr inbounds double, double* %44, i64 %82
%90 = bitcast double* %89 to <2 x double>*
%91 = load <2 x double>, <2 x double>* %90
%92 = getelementptr inbounds double, double* %89, i64 2
%93 = bitcast double* %92 to <2 x double>*
%94 = load <2 x double>, <2 x double>* %93
%95 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %27, <2 x double> %85, <2 x double> %91)
%96 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %29, <2 x double> %88, <2 x double> %94)
%97 = bitcast double* %89 to <2 x double>*
store <2 x double> %95, <2 x double>* %97
%98 = bitcast double* %92 to <2 x double>*
store <2 x double> %96, <2 x double>* %98
%99 = add nuw i64 %62, 8
%100 = add i64 %63, 2
%101 = icmp eq i64 %100, %60
br i1 %101, label %102, label %61
102: ; preds = %61, %54
%103 = phi i64 [ 0, %54 ], [ %99, %61 ]
%104 = icmp eq i64 %57, 0
br i1 %104, label %123, label %105
105: ; preds = %102
%106 = add i64 %33, %103
%107 = getelementptr inbounds double, double* %42, i64 %106
%108 = bitcast double* %107 to <2 x double>*
%109 = load <2 x double>, <2 x double>* %108
%110 = getelementptr inbounds double, double* %107, i64 2
%111 = bitcast double* %110 to <2 x double>*
%112 = load <2 x double>, <2 x double>* %111
%113 = getelementptr inbounds double, double* %44, i64 %106
%114 = bitcast double* %113 to <2 x double>*
%115 = load <2 x double>, <2 x double>* %114
%116 = getelementptr inbounds double, double* %113, i64 2
%117 = bitcast double* %116 to <2 x double>*
%118 = load <2 x double>, <2 x double>* %117
%119 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %27, <2 x double> %109, <2 x double> %115)
%120 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %29, <2 x double> %112, <2 x double> %118)
%121 = bitcast double* %113 to <2 x double>*
store <2 x double> %119, <2 x double>* %121
%122 = bitcast double* %116 to <2 x double>*
store <2 x double> %120, <2 x double>* %122
br label %123
123: ; preds = %102, %105
%124 = icmp eq i64 %40, %55
br i1 %124, label %156, label %125
125: ; preds = %46, %31, %123
%126 = phi i64 [ %33, %46 ], [ %33, %31 ], [ %56, %123 ]
%127 = sub i64 %25, %126
%128 = xor i64 %126, -1
%129 = and i64 %127, 1
%130 = icmp eq i64 %129, 0
br i1 %130, label %138, label %131
131: ; preds = %125
%132 = getelementptr inbounds double, double* %42, i64 %126
%133 = load double, double* %132
%134 = getelementptr inbounds double, double* %44, i64 %126
%135 = load double, double* %134
%136 = tail call double @llvm.fmuladd.f64(double %23, double %133, double %135)
store double %136, double* %134
%137 = add nuw nsw i64 %126, 1
br label %138
138: ; preds = %131, %125
%139 = phi i64 [ %126, %125 ], [ %137, %131 ]
%140 = icmp eq i64 %128, %30
br i1 %140, label %156, label %141
141: ; preds = %138, %141
%142 = phi i64 [ %154, %141 ], [ %139, %138 ]
%143 = getelementptr inbounds double, double* %42, i64 %142
%144 = load double, double* %143
%145 = getelementptr inbounds double, double* %44, i64 %142
%146 = load double, double* %145
%147 = tail call double @llvm.fmuladd.f64(double %23, double %144, double %146)
store double %147, double* %145
%148 = add nuw nsw i64 %142, 1
%149 = getelementptr inbounds double, double* %42, i64 %148
%150 = load double, double* %149
%151 = getelementptr inbounds double, double* %44, i64 %148
%152 = load double, double* %151
%153 = tail call double @llvm.fmuladd.f64(double %23, double %150, double %152)
store double %153, double* %151
%154 = add nuw nsw i64 %142, 2
%155 = icmp eq i64 %154, %25
br i1 %155, label %156, label %141
156: ; preds = %138, %141, %123
%157 = add nuw nsw i64 %33, 1
%158 = icmp eq i64 %157, %25
%159 = add i64 %32, 1
br i1 %158, label %160, label %31
160: ; preds = %156, %7
%161 = call i32 @ldl_dcmp(double** %0, i32 %2, double* %10, double* %10, double* %10, i32 1, i32 0, i32* %8)
%162 = icmp eq i32 %6, 0
br i1 %162, label %186, label %163
163: ; preds = %160
%164 = load i32, i32* @stdout
%165 = load i32, i32* %8
%166 = sub nsw i32 0, %165
%167 = call double @sqrt(double %5)
%168 = fdiv double %167, 0x401921FB54442D18
%169 = call i32 (i32, i8*, ...) @fprintf(i32 %164, i8* getelementptr inbounds ([34 x i8], [34 x i8]* @.str, i64 0, i64 0), i32 %166, double %168)
%170 = load i32, i32* %8
%171 = sub nsw i32 0, %170
%172 = icmp slt i32 %19, %171
br i1 %172, label %173, label %183
173: ; preds = %163
%174 = load i32, i32* @stderr
%175 = sub nsw i32 %171, %19
%176 = call i32 (i32, i8*, ...) @fprintf(i32 %174, i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.1, i64 0, i64 0), i32 %175)
%177 = load i32, i32* @stderr
%178 = call i32 (i32, i8*, ...) @fprintf(i32 %177, i8* getelementptr inbounds ([41 x i8], [41 x i8]* @.str.2, i64 0, i64 0))
%179 = load i32, i32* @stderr
%180 = call double @sqrt(double %5)
%181 = fdiv double %180, 0x401921FB54442D18
%182 = call i32 (i32, i8*, ...) @fprintf(i32 %179, i8* getelementptr inbounds ([46 x i8], [46 x i8]* @.str.3, i64 0, i64 0), double %181)
br label %186
183: ; preds = %163
%184 = load i32, i32* @stdout
%185 = call i32 (i32, i8*, ...) @fprintf(i32 %184, i8* getelementptr inbounds ([28 x i8], [28 x i8]* @.str.4, i64 0, i64 0), i32 %19)
br label %186
186: ; preds = %160, %183, %173
br i1 %21, label %324, label %187
187: ; preds = %186
%188 = add nuw i32 %2, 1
%189 = zext i32 %188 to i64
%190 = insertelement <2 x double> poison, double %20, i64 0
%191 = shufflevector <2 x double> %190, <2 x double> poison, <2 x i32> zeroinitializer
%192 = insertelement <2 x double> poison, double %20, i64 0
%193 = shufflevector <2 x double> %192, <2 x double> poison, <2 x i32> zeroinitializer
%194 = sub nsw i64 0, %189
br label %195
195: ; preds = %320, %187
%196 = phi i64 [ %323, %320 ], [ 0, %187 ]
%197 = phi i64 [ %321, %320 ], [ 1, %187 ]
%198 = xor i64 %196, -1
%199 = add i64 %198, %189
%200 = add i64 %199, -4
%201 = lshr i64 %200, 2
%202 = add nuw nsw i64 %201, 1
%203 = xor i64 %196, -1
%204 = add i64 %203, %189
%205 = getelementptr inbounds double*, double** %1, i64 %197
%206 = load double*, double** %205
%207 = getelementptr inbounds double*, double** %0, i64 %197
%208 = load double*, double** %207
%209 = icmp ult i64 %204, 4
br i1 %209, label %289, label %210
210: ; preds = %195
%211 = getelementptr double, double* %208, i64 %197
%212 = getelementptr double, double* %208, i64 %189
%213 = getelementptr double, double* %206, i64 %197
%214 = getelementptr double, double* %206, i64 %189
%215 = icmp ult double* %211, %214
%216 = icmp ult double* %213, %212
%217 = and i1 %215, %216
br i1 %217, label %289, label %218
218: ; preds = %210
%219 = and i64 %204, -4
%220 = add i64 %197, %219
%221 = and i64 %202, 1
%222 = icmp ult i64 %200, 4
br i1 %222, label %266, label %223
223: ; preds = %218
%224 = and i64 %202, 9223372036854775806
br label %225
225: ; preds = %225, %223
%226 = phi i64 [ 0, %223 ], [ %263, %225 ]
%227 = phi i64 [ 0, %223 ], [ %264, %225 ]
%228 = add i64 %197, %226
%229 = getelementptr inbounds double, double* %206, i64 %228
%230 = bitcast double* %229 to <2 x double>*
%231 = load <2 x double>, <2 x double>* %230
%232 = getelementptr inbounds double, double* %229, i64 2
%233 = bitcast double* %232 to <2 x double>*
%234 = load <2 x double>, <2 x double>* %233
%235 = getelementptr inbounds double, double* %208, i64 %228
%236 = bitcast double* %235 to <2 x double>*
%237 = load <2 x double>, <2 x double>* %236
%238 = getelementptr inbounds double, double* %235, i64 2
%239 = bitcast double* %238 to <2 x double>*
%240 = load <2 x double>, <2 x double>* %239
%241 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %191, <2 x double> %231, <2 x double> %237)
%242 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %193, <2 x double> %234, <2 x double> %240)
%243 = bitcast double* %235 to <2 x double>*
store <2 x double> %241, <2 x double>* %243
%244 = bitcast double* %238 to <2 x double>*
store <2 x double> %242, <2 x double>* %244
%245 = or i64 %226, 4
%246 = add i64 %197, %245
%247 = getelementptr inbounds double, double* %206, i64 %246
%248 = bitcast double* %247 to <2 x double>*
%249 = load <2 x double>, <2 x double>* %248
%250 = getelementptr inbounds double, double* %247, i64 2
%251 = bitcast double* %250 to <2 x double>*
%252 = load <2 x double>, <2 x double>* %251
%253 = getelementptr inbounds double, double* %208, i64 %246
%254 = bitcast double* %253 to <2 x double>*
%255 = load <2 x double>, <2 x double>* %254
%256 = getelementptr inbounds double, double* %253, i64 2
%257 = bitcast double* %256 to <2 x double>*
%258 = load <2 x double>, <2 x double>* %257
%259 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %191, <2 x double> %249, <2 x double> %255)
%260 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %193, <2 x double> %252, <2 x double> %258)
%261 = bitcast double* %253 to <2 x double>*
store <2 x double> %259, <2 x double>* %261
%262 = bitcast double* %256 to <2 x double>*
store <2 x double> %260, <2 x double>* %262
%263 = add nuw i64 %226, 8
%264 = add i64 %227, 2
%265 = icmp eq i64 %264, %224
br i1 %265, label %266, label %225
266: ; preds = %225, %218
%267 = phi i64 [ 0, %218 ], [ %263, %225 ]
%268 = icmp eq i64 %221, 0
br i1 %268, label %287, label %269
269: ; preds = %266
%270 = add i64 %197, %267
%271 = getelementptr inbounds double, double* %206, i64 %270
%272 = bitcast double* %271 to <2 x double>*
%273 = load <2 x double>, <2 x double>* %272
%274 = getelementptr inbounds double, double* %271, i64 2
%275 = bitcast double* %274 to <2 x double>*
%276 = load <2 x double>, <2 x double>* %275
%277 = getelementptr inbounds double, double* %208, i64 %270
%278 = bitcast double* %277 to <2 x double>*
%279 = load <2 x double>, <2 x double>* %278
%280 = getelementptr inbounds double, double* %277, i64 2
%281 = bitcast double* %280 to <2 x double>*
%282 = load <2 x double>, <2 x double>* %281
%283 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %191, <2 x double> %273, <2 x double> %279)
%284 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %193, <2 x double> %276, <2 x double> %282)
%285 = bitcast double* %277 to <2 x double>*
store <2 x double> %283, <2 x double>* %285
%286 = bitcast double* %280 to <2 x double>*
store <2 x double> %284, <2 x double>* %286
br label %287
287: ; preds = %266, %269
%288 = icmp eq i64 %204, %219
br i1 %288, label %320, label %289
289: ; preds = %210, %195, %287
%290 = phi i64 [ %197, %210 ], [ %197, %195 ], [ %220, %287 ]
%291 = sub i64 %189, %290
%292 = xor i64 %290, -1
%293 = and i64 %291, 1
%294 = icmp eq i64 %293, 0
br i1 %294, label %302, label %295
295: ; preds = %289
%296 = getelementptr inbounds double, double* %206, i64 %290
%297 = load double, double* %296
%298 = getelementptr inbounds double, double* %208, i64 %290
%299 = load double, double* %298
%300 = call double @llvm.fmuladd.f64(double %20, double %297, double %299)
store double %300, double* %298
%301 = add nuw nsw i64 %290, 1
br label %302
302: ; preds = %295, %289
%303 = phi i64 [ %290, %289 ], [ %301, %295 ]
%304 = icmp eq i64 %292, %194
br i1 %304, label %320, label %305
305: ; preds = %302, %305
%306 = phi i64 [ %318, %305 ], [ %303, %302 ]
%307 = getelementptr inbounds double, double* %206, i64 %306
%308 = load double, double* %307
%309 = getelementptr inbounds double, double* %208, i64 %306
%310 = load double, double* %309
%311 = call double @llvm.fmuladd.f64(double %20, double %308, double %310)
store double %311, double* %309
%312 = add nuw nsw i64 %306, 1
%313 = getelementptr inbounds double, double* %206, i64 %312
%314 = load double, double* %313
%315 = getelementptr inbounds double, double* %208, i64 %312
%316 = load double, double* %315
%317 = call double @llvm.fmuladd.f64(double %20, double %314, double %316)
store double %317, double* %315
%318 = add nuw nsw i64 %306, 2
%319 = icmp eq i64 %318, %189
br i1 %319, label %320, label %305
320: ; preds = %302, %305, %287
%321 = add nuw nsw i64 %197, 1
%322 = icmp eq i64 %321, %189
%323 = add i64 %196, 1
br i1 %322, label %324, label %195
324: ; preds = %320, %186
%325 = call i32 @free_dvector(double* %10, i32 1, i32 %2)
%326 = load i32, i32* %8
ret i32 %326
}