void Suggested_Param_Vanderbilt(num_states_psp, n_psp, l_psp, e_psp, fill_psp,
                                rcut_psp, rlocal, clocal) int *num_states_psp;
int n_psp[];
int l_psp[];
double e_psp[];
double fill_psp[];
double rcut_psp[];
double *rlocal, *clocal;
{
  int p, npsps;
  int i, l, lmax;
  int Nc, Nv, n;
  double rcmax, emax;
  Nc = Ncore_Atom();
  Nv = Nvalence_Atom();
  lmax = lmax_Atom();
  npsps = lmax + 2;
  for (p = 0; p < npsps; ++p) {
    rcut_psp[p] = 0.0;
    fill_psp[p] = 0.0;
    n_psp[p] = 0;
    l_psp[p] = p;
  }
  emax = 0.0;
  rcmax = 0.0;
  for (i = 0; i < Nc; ++i) {
    n = n_Atom(i);
    l = l_Atom(i);
    if (n == (l + 1))
      rcut_psp[l] = 4.0 * peak_Atom(i);
    else
      rcut_psp[l] = 3.0 * peak_Atom(i);
    rcmax = ((rcmax > rcut_psp[l]) ? rcmax : rcut_psp[l]);
    fill_psp[l] = 0.0;
    n_psp[l] = ((n_psp[l] > n) ? n_psp[l] : n);
    e_psp[l] = 0.0;
  }
  if (Nv > 0) {
    rcmax = 0.0;
    emax = -100.0;
    for (i = Nc; i < (Nc + Nv); ++i) {
      n = n_Atom(i);
      l = l_Atom(i);
      if (n == (l + 1))
        rcut_psp[l] = 1.5 * peak_Atom(i);
      else
        rcut_psp[l] = 1.5 * peak_Atom(i);
      n_psp[l] = n;
      fill_psp[l] = fill_Atom(i);
      e_psp[l] = eigenvalue_Atom(i);
      emax = ((emax > e_psp[l]) ? emax : e_psp[l]);
      rcmax = ((rcmax > rcut_psp[l]) ? rcmax : rcut_psp[l]);
    }
  }
  n_psp[npsps - 1] = l_psp[npsps - 1] + 1;
  for (p = 0; p < npsps; ++p) {
    if (fill_psp[p] == 0.0) {
      rcut_psp[p] = ((rcut_psp[p] > rcmax) ? rcut_psp[p] : rcmax);
      e_psp[p] = emax;
    }
  }
  *rlocal = rcmax;
  *clocal = emax;
  *num_states_psp = npsps;
}


x86 assembly (clang, -O0):
<Suggested_Param_Vanderbilt>:
push   %rbp
mov    %rsp,%rbp
sub    $0x90,%rsp
mov    0x18(%rbp),%rax
mov    0x10(%rbp),%rax
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
mov    $0x0,%al
call   1070 <Ncore_Atom@plt>
mov    %eax,-0x48(%rbp)
mov    $0x0,%al
call   1060 <Nvalence_Atom@plt>
mov    %eax,-0x4c(%rbp)
mov    $0x0,%al
call   1080 <lmax_Atom@plt>
mov    %eax,-0x44(%rbp)
mov    -0x44(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x38(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x38(%rbp),%eax
jge    1230 <Suggested_Param_Vanderbilt+0xb0>
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%rax
movslq -0x34(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
movslq -0x34(%rbp),%rcx
movl   $0x0,(%rax,%rcx,4)
mov    -0x34(%rbp),%edx
mov    -0x18(%rbp),%rax
movslq -0x34(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    11d9 <Suggested_Param_Vanderbilt+0x59>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x60(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x58(%rbp)
movl   $0x0,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x48(%rbp),%eax
jge    137d <Suggested_Param_Vanderbilt+0x1fd>
mov    -0x3c(%rbp),%edi
mov    $0x0,%al
call   10a0 <n_Atom@plt>
mov    %eax,-0x50(%rbp)
mov    -0x3c(%rbp),%edi
mov    $0x0,%al
call   1040 <l_Atom@plt>
mov    %eax,-0x40(%rbp)
mov    -0x50(%rbp),%eax
mov    -0x40(%rbp),%ecx
add    $0x1,%ecx
cmp    %ecx,%eax
jne    12aa <Suggested_Param_Vanderbilt+0x12a>
mov    -0x3c(%rbp),%edi
mov    $0x0,%al
call   1050 <peak_Atom@plt>
cvtsi2sd %eax,%xmm1
movsd  0xd84(%rip),%xmm0
mulsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movslq -0x40(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
jmp    12d1 <Suggested_Param_Vanderbilt+0x151>
mov    -0x3c(%rbp),%edi
mov    $0x0,%al
call   1050 <peak_Atom@plt>
cvtsi2sd %eax,%xmm1
movsd  0xd50(%rip),%xmm0
mulsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movslq -0x40(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x58(%rbp),%xmm0
mov    -0x30(%rbp),%rax
movslq -0x40(%rbp),%rcx
ucomisd (%rax,%rcx,8),%xmm0
jbe    12f8 <Suggested_Param_Vanderbilt+0x178>
movsd  -0x58(%rbp),%xmm0
movsd  %xmm0,-0x68(%rbp)
jmp    130a <Suggested_Param_Vanderbilt+0x18a>
mov    -0x30(%rbp),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x68(%rbp)
movsd  -0x68(%rbp),%xmm0
movsd  %xmm0,-0x58(%rbp)
mov    -0x28(%rbp),%rax
movslq -0x40(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
movslq -0x40(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
cmp    -0x50(%rbp),%eax
jle    134b <Suggested_Param_Vanderbilt+0x1cb>
mov    -0x10(%rbp),%rax
movslq -0x40(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x6c(%rbp)
jmp    1351 <Suggested_Param_Vanderbilt+0x1d1>
mov    -0x50(%rbp),%eax
mov    %eax,-0x6c(%rbp)
mov    -0x6c(%rbp),%edx
mov    -0x10(%rbp),%rax
movslq -0x40(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x20(%rbp),%rax
movslq -0x40(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    1247 <Suggested_Param_Vanderbilt+0xc7>
cmpl   $0x0,-0x4c(%rbp)
jle    150e <Suggested_Param_Vanderbilt+0x38e>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  0xc69(%rip),%xmm0
movsd  %xmm0,-0x60(%rbp)
mov    -0x48(%rbp),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
mov    -0x48(%rbp),%ecx
add    -0x4c(%rbp),%ecx
cmp    %ecx,%eax
jge    1509 <Suggested_Param_Vanderbilt+0x389>
mov    -0x3c(%rbp),%edi
mov    $0x0,%al
call   10a0 <n_Atom@plt>
mov    %eax,-0x50(%rbp)
mov    -0x3c(%rbp),%edi
mov    $0x0,%al
call   1040 <l_Atom@plt>
mov    %eax,-0x40(%rbp)
mov    -0x50(%rbp),%eax
mov    -0x40(%rbp),%ecx
add    $0x1,%ecx
cmp    %ecx,%eax
jne    140a <Suggested_Param_Vanderbilt+0x28a>
mov    -0x3c(%rbp),%edi
mov    $0x0,%al
call   1050 <peak_Atom@plt>
cvtsi2sd %eax,%xmm1
movsd  0xc14(%rip),%xmm0
mulsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movslq -0x40(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
jmp    1431 <Suggested_Param_Vanderbilt+0x2b1>
mov    -0x3c(%rbp),%edi
mov    $0x0,%al
call   1050 <peak_Atom@plt>
cvtsi2sd %eax,%xmm1
movsd  0xbe8(%rip),%xmm0
mulsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movslq -0x40(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x50(%rbp),%edx
mov    -0x10(%rbp),%rax
movslq -0x40(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x3c(%rbp),%edi
mov    $0x0,%al
call   1030 <fill_Atom@plt>
cvtsi2sd %eax,%xmm0
mov    -0x28(%rbp),%rax
movslq -0x40(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%edi
mov    $0x0,%al
call   1090 <eigenvalue_Atom@plt>
cvtsi2sd %eax,%xmm0
mov    -0x20(%rbp),%rax
movslq -0x40(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x60(%rbp),%xmm0
mov    -0x20(%rbp),%rax
movslq -0x40(%rbp),%rcx
ucomisd (%rax,%rcx,8),%xmm0
jbe    149c <Suggested_Param_Vanderbilt+0x31c>
movsd  -0x60(%rbp),%xmm0
movsd  %xmm0,-0x78(%rbp)
jmp    14ae <Suggested_Param_Vanderbilt+0x32e>
mov    -0x20(%rbp),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x78(%rbp)
movsd  -0x78(%rbp),%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x58(%rbp),%xmm0
mov    -0x30(%rbp),%rax
movslq -0x40(%rbp),%rcx
ucomisd (%rax,%rcx,8),%xmm0
jbe    14df <Suggested_Param_Vanderbilt+0x35f>
movsd  -0x58(%rbp),%xmm0
movsd  %xmm0,-0x80(%rbp)
jmp    14f1 <Suggested_Param_Vanderbilt+0x371>
mov    -0x30(%rbp),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x80(%rbp)
movsd  -0x80(%rbp),%xmm0
movsd  %xmm0,-0x58(%rbp)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    13a2 <Suggested_Param_Vanderbilt+0x222>
jmp    150e <Suggested_Param_Vanderbilt+0x38e>
mov    -0x18(%rbp),%rax
mov    -0x38(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%edx
add    $0x1,%edx
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    %edx,(%rax,%rcx,4)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x38(%rbp),%eax
jge    15dd <Suggested_Param_Vanderbilt+0x45d>
mov    -0x28(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    15ca <Suggested_Param_Vanderbilt+0x44a>
jp     15ca <Suggested_Param_Vanderbilt+0x44a>
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd -0x58(%rbp),%xmm0
jbe    1596 <Suggested_Param_Vanderbilt+0x416>
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
jmp    15a3 <Suggested_Param_Vanderbilt+0x423>
movsd  -0x58(%rbp),%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
movsd  -0x88(%rbp),%xmm0
ff
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x60(%rbp),%xmm0
mov    -0x20(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
jmp    15cf <Suggested_Param_Vanderbilt+0x44f>
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    1538 <Suggested_Param_Vanderbilt+0x3b8>
movsd  -0x58(%rbp),%xmm0
mov    0x10(%rbp),%rax
movsd  %xmm0,(%rax)
movsd  -0x60(%rbp),%xmm0
mov    0x18(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x38(%rbp),%ecx
mov    -0x8(%rbp),%rax
mov    %ecx,(%rax)
add    $0x90,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<Suggested_Param_Vanderbilt>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x48,%rsp
mov    %r9,%r12
mov    %r8,(%rsp)
mov    %rcx,0x10(%rsp)
mov    %rdx,0x8(%rsp)
mov    %rsi,%r14
mov    %rdi,0x38(%rsp)
xor    %eax,%eax
call   1070 <Ncore_Atom@plt>
mov    %eax,0x18(%rsp)
xor    %eax,%eax
call   1060 <Nvalence_Atom@plt>
mov    %eax,0x28(%rsp)
xor    %eax,%eax
call   1080 <lmax_Atom@plt>
lea    0x2(%rax),%r9d
mov    %rax,0x30(%rsp)
cmp    $0xffffffff,%eax
jl     1437 <Suggested_Param_Vanderbilt+0x2b7>
cmp    $0x2,%r9d
mov    $0x1,%r8d
cmovge %r9d,%r8d
cmp    $0x4,%r8d
jae    12b6 <Suggested_Param_Vanderbilt+0x136>
xor    %ecx,%ecx
mov    %rcx,%rdx
not    %rdx
test   $0x1,%r8b
je     1224 <Suggested_Param_Vanderbilt+0xa4>
movq   $0x0,(%r12,%rcx,8)
mov    (%rsp),%rax
movq   $0x0,(%rax,%rcx,8)
movl   $0x0,(%r14,%rcx,4)
mov    0x8(%rsp),%rax
mov    %ecx,(%rax,%rcx,4)
or     $0x1,%rcx
add    %r8,%rdx
je     1437 <Suggested_Param_Vanderbilt+0x2b7>
mov    0x8(%rsp),%rax
lea    (%rax,%rcx,4),%rdx
add    $0x4,%rdx
lea    0x4(%r14,%rcx,4),%rsi
mov    (%rsp),%rax
lea    (%rax,%rcx,8),%rdi
add    $0x8,%rdi
lea    (%r12,%rcx,8),%rbp
add    $0x8,%rbp
xor    %ebx,%ebx
cs nopw 0x0(%rax,%rax,1)
nop
movq   $0x0,-0x8(%rbp,%rbx,8)
movq   $0x0,-0x8(%rdi,%rbx,8)
movl   $0x0,-0x4(%rsi,%rbx,4)
lea    (%rcx,%rbx,1),%rax
mov    %eax,-0x4(%rdx,%rbx,4)
movq   $0x0,0x0(%rbp,%rbx,8)
movq   $0x0,(%rdi,%rbx,8)
movl   $0x0,(%rsi,%rbx,4)
add    $0x1,%eax
mov    %eax,(%rdx,%rbx,4)
lea    (%rcx,%rbx,1),%rax
add    $0x2,%rax
add    $0x2,%rbx
cmp    %r8,%rax
jne    1260 <Suggested_Param_Vanderbilt+0xe0>
jmp    1437 <Suggested_Param_Vanderbilt+0x2b7>
lea    (%r12,%r8,8),%rcx
mov    (%rsp),%rbp
lea    0x0(,%r8,8),%rdx
add    %rbp,%rdx
lea    (%r14,%r8,4),%rsi
cmp    %r12,%rdx
seta   %dil
mov    0x8(%rsp),%rax
lea    (%rax,%r8,4),%rdx
cmp    %rbp,%rcx
seta   %bl
cmp    %r14,%rdx
seta   %dl
cmp    %rax,%rsi
seta   %sil
xor    %ecx,%ecx
test   %bl,%dil
jne    11f0 <Suggested_Param_Vanderbilt+0x70>
and    %sil,%dl
jne    11f0 <Suggested_Param_Vanderbilt+0x70>
mov    %r8d,%ecx
and    $0x7ffffffc,%ecx
lea    -0x4(%rcx),%rdx
mov    %rdx,%rsi
shr    $0x2,%rsi
add    $0x1,%rsi
test   %rdx,%rdx
je     16d5 <Suggested_Param_Vanderbilt+0x555>
mov    %rsi,%rdi
and    $0xfffffffffffffffe,%rdi
movdqa 0xccc(%rip),%xmm0
xor    %edx,%edx
movdqa 0xcd2(%rip),%xmm1
xorpd  %xmm2,%xmm2
movdqa 0xcd6(%rip),%xmm3
movdqa 0xcde(%rip),%xmm4
movdqa 0xce6(%rip),%xmm5
mov    0x8(%rsp),%rax
mov    (%rsp),%rbp
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movdqa %xmm0,%xmm6
paddd  %xmm1,%xmm6
movupd %xmm2,(%r12,%rdx,8)
movupd %xmm2,0x10(%r12,%rdx,8)
movupd %xmm2,0x0(%rbp,%rdx,8)
movupd %xmm2,0x10(%rbp,%rdx,8)
movupd %xmm2,(%r14,%rdx,4)
movdqa %xmm0,%xmm7
punpcklqdq %xmm6,%xmm7
movdqu %xmm7,(%rax,%rdx,4)
movdqa %xmm0,%xmm6
paddd  %xmm3,%xmm6
movdqa %xmm0,%xmm7
paddd  %xmm4,%xmm7
punpcklqdq %xmm7,%xmm6
movupd %xmm2,0x20(%r12,%rdx,8)
movupd %xmm2,0x30(%r12,%rdx,8)
movupd %xmm2,0x20(%rbp,%rdx,8)
movupd %xmm2,0x30(%rbp,%rdx,8)
movupd %xmm2,0x10(%r14,%rdx,4)
movdqu %xmm6,0x10(%rax,%rdx,4)
add    $0x8,%rdx
paddd  %xmm5,%xmm0
add    $0xfffffffffffffffe,%rdi
jne    1370 <Suggested_Param_Vanderbilt+0x1f0>
test   $0x1,%sil
je     142e <Suggested_Param_Vanderbilt+0x2ae>
movdqa 0xc15(%rip),%xmm1
paddd  %xmm0,%xmm1
xorpd  %xmm2,%xmm2
movupd %xmm2,(%r12,%rdx,8)
movupd %xmm2,0x10(%r12,%rdx,8)
mov    (%rsp),%rsi
movupd %xmm2,(%rsi,%rdx,8)
movupd %xmm2,0x10(%rsi,%rdx,8)
movupd %xmm2,(%r14,%rdx,4)
punpcklqdq %xmm1,%xmm0
movdqu %xmm0,(%rax,%rdx,4)
cmp    %r8,%rcx
jne    11f0 <Suggested_Param_Vanderbilt+0x70>
mov    %r9d,0x2c(%rsp)
pxor   %xmm3,%xmm3
mov    0x18(%rsp),%edx
test   %edx,%edx
jle    14f8 <Suggested_Param_Vanderbilt+0x378>
pxor   %xmm3,%xmm3
xor    %ebp,%ebp
mov    %r14,0x40(%rsp)
mov    0x40(%rsp),%r14
nopl   0x0(%rax)
movq   %xmm3,0x20(%rsp)
mov    %ebp,%edi
xor    %eax,%eax
call   10a0 <n_Atom@plt>
mov    %eax,%r15d
mov    %ebp,%edi
xor    %eax,%eax
call   1040 <l_Atom@plt>
mov    %r12,%r13
mov    %eax,%r12d
lea    0x1(%r12),%eax
xor    %ebx,%ebx
cmp    %eax,%r15d
sete   %bl
mov    %ebp,%edi
xor    %eax,%eax
call   1050 <peak_Atom@plt>
movsd  0x20(%rsp),%xmm3
mov    0x18(%rsp),%edx
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
lea    0xba1(%rip),%rax
mulsd  (%rax,%rbx,8),%xmm0
movslq %r12d,%rax
mov    %r13,%r12
mov    (%rsp),%rcx
movsd  %xmm0,0x0(%r13,%rax,8)
maxsd  %xmm0,%xmm3
movq   $0x0,(%rcx,%rax,8)
mov    (%r14,%rax,4),%ecx
cmp    %r15d,%ecx
cmovg  %ecx,%r15d
mov    %r15d,(%r14,%rax,4)
mov    0x10(%rsp),%rcx
movq   $0x0,(%rcx,%rax,8)
add    $0x1,%ebp
cmp    %ebp,%edx
jne    1460 <Suggested_Param_Vanderbilt+0x2e0>
mov    0x28(%rsp),%r13d
test   %r13d,%r13d
xorpd  %xmm2,%xmm2
jle    15c6 <Suggested_Param_Vanderbilt+0x446>
add    %edx,%r13d
pxor   %xmm3,%xmm3
movsd  0xb47(%rip),%xmm2
nopl   0x0(%rax)
movq   %xmm3,0x20(%rsp)
movsd  %xmm2,0x18(%rsp)
mov    %edx,%r15d
mov    %edx,%edi
xor    %eax,%eax
call   10a0 <n_Atom@plt>
mov    %eax,%ebp
mov    %r15d,%edi
xor    %eax,%eax
call   1040 <l_Atom@plt>
mov    %eax,%ebx
mov    %r15d,%edi
xor    %eax,%eax
call   1050 <peak_Atom@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
mulsd  0xb09(%rip),%xmm0
movslq %ebx,%rbx
movsd  %xmm0,(%r12,%rbx,8)
mov    %ebp,(%r14,%rbx,4)
mov    %r15d,%edi
xor    %eax,%eax
call   1030 <fill_Atom@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
mov    (%rsp),%rax
movsd  %xmm0,(%rax,%rbx,8)
mov    %r15d,%edi
xor    %eax,%eax
call   1090 <eigenvalue_Atom@plt>
movsd  0x20(%rsp),%xmm3
movsd  0x18(%rsp),%xmm2
mov    %r15d,%edx
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
mov    0x10(%rsp),%rax
movsd  %xmm0,(%rax,%rbx,8)
maxsd  %xmm0,%xmm2
maxsd  (%r12,%rbx,8),%xmm3
add    $0x1,%edx
cmp    %r13d,%edx
jl     1520 <Suggested_Param_Vanderbilt+0x3a0>
mov    0x88(%rsp),%rax
mov    0x80(%rsp),%rcx
mov    0x30(%rsp),%rdi
movslq %edi,%rdx
mov    0x8(%rsp),%rsi
mov    0x4(%rsi,%rdx,4),%esi
add    $0x1,%esi
mov    %esi,0x4(%r14,%rdx,4)
cmp    $0xffffffff,%edi
mov    0x2c(%rsp),%ebp
jl     1642 <Suggested_Param_Vanderbilt+0x4c2>
cmp    $0x2,%ebp
mov    $0x1,%esi
cmovge %ebp,%esi
cmp    $0x7ffffffd,%edi
jbe    1660 <Suggested_Param_Vanderbilt+0x4e0>
xor    %edx,%edx
test   $0x1,%sil
je     1642 <Suggested_Param_Vanderbilt+0x4c2>
mov    (%rsp),%rsi
movsd  (%rsi,%rdx,8),%xmm0
pxor   %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    1642 <Suggested_Param_Vanderbilt+0x4c2>
jp     1642 <Suggested_Param_Vanderbilt+0x4c2>
movsd  (%r12,%rdx,8),%xmm0
maxsd  %xmm3,%xmm0
movsd  %xmm0,(%r12,%rdx,8)
mov    0x10(%rsp),%rsi
movsd  %xmm2,(%rsi,%rdx,8)
movsd  %xmm3,(%rcx)
movsd  %xmm2,(%rax)
mov    0x38(%rsp),%rax
mov    %ebp,(%rax)
add    $0x48,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
mov    %esi,%edi
and    $0x7ffffffe,%edi
xor    %edx,%edx
pxor   %xmm0,%xmm0
jmp    1679 <Suggested_Param_Vanderbilt+0x4f9>
add    $0x2,%rdx
cmp    %rdx,%rdi
je     160d <Suggested_Param_Vanderbilt+0x48d>
mov    (%rsp),%rbx
movsd  (%rbx,%rdx,8),%xmm1
ucomisd %xmm0,%xmm1
jne    16a4 <Suggested_Param_Vanderbilt+0x524>
jp     16a4 <Suggested_Param_Vanderbilt+0x524>
movsd  (%r12,%rdx,8),%xmm1
maxsd  %xmm3,%xmm1
movsd  %xmm1,(%r12,%rdx,8)
mov    0x10(%rsp),%rbx
movsd  %xmm2,(%rbx,%rdx,8)
mov    (%rsp),%rbx
movsd  0x8(%rbx,%rdx,8),%xmm1
ucomisd %xmm0,%xmm1
jne    1670 <Suggested_Param_Vanderbilt+0x4f0>
jp     1670 <Suggested_Param_Vanderbilt+0x4f0>
movsd  0x8(%r12,%rdx,8),%xmm1
maxsd  %xmm3,%xmm1
movsd  %xmm1,0x8(%r12,%rdx,8)
mov    0x10(%rsp),%rbx
movsd  %xmm2,0x8(%rbx,%rdx,8)
jmp    1670 <Suggested_Param_Vanderbilt+0x4f0>
movdqa 0x923(%rip),%xmm0
xor    %edx,%edx
mov    0x8(%rsp),%rax
test   $0x1,%sil
jne    13f3 <Suggested_Param_Vanderbilt+0x273>
jmp    142e <Suggested_Param_Vanderbilt+0x2ae>

LLVM IR (-O0):
define void @Suggested_Param_Vanderbilt(i32* %0, i32* %1, i32* %2, double* %3, double* %4, double* %5, double* %6, double* %7) {
%9 = alloca i32*
%10 = alloca i32*
%11 = alloca i32*
%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 i32
%22 = alloca i32
%23 = alloca i32
%24 = alloca i32
%25 = alloca double
%26 = alloca double
store i32* %0, i32** %9
store i32* %1, i32** %10
store i32* %2, i32** %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
%27 = call i32 (...) @Ncore_Atom()
store i32 %27, i32* %22
%28 = call i32 (...) @Nvalence_Atom()
store i32 %28, i32* %23
%29 = call i32 (...) @lmax_Atom()
store i32 %29, i32* %21
%30 = load i32, i32* %21
%31 = add nsw i32 %30, 2
store i32 %31, i32* %18
store i32 0, i32* %17
br label %32
32: ; preds = %54, %8
%33 = load i32, i32* %17
%34 = load i32, i32* %18
%35 = icmp slt i32 %33, %34
br i1 %35, label %36, label %57
36: ; preds = %32
%37 = load double*, double** %14
%38 = load i32, i32* %17
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds double, double* %37, i64 %39
store double 0.000000e+00, double* %40
%41 = load double*, double** %13
%42 = load i32, i32* %17
%43 = sext i32 %42 to i64
%44 = getelementptr inbounds double, double* %41, i64 %43
store double 0.000000e+00, double* %44
%45 = load i32*, i32** %10
%46 = load i32, i32* %17
%47 = sext i32 %46 to i64
%48 = getelementptr inbounds i32, i32* %45, i64 %47
store i32 0, i32* %48
%49 = load i32, i32* %17
%50 = load i32*, i32** %11
%51 = load i32, i32* %17
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds i32, i32* %50, i64 %52
store i32 %49, i32* %53
br label %54
54: ; preds = %36
%55 = load i32, i32* %17
%56 = add nsw i32 %55, 1
store i32 %56, i32* %17
br label %32
57: ; preds = %32
store double 0.000000e+00, double* %26
store double 0.000000e+00, double* %25
store i32 0, i32* %19
br label %58
58: ; preds = %136, %57
%59 = load i32, i32* %19
%60 = load i32, i32* %22
%61 = icmp slt i32 %59, %60
br i1 %61, label %62, label %139
62: ; preds = %58
%63 = load i32, i32* %19
%64 = call i32 (i32, ...) bitcast (i32 (...)* @n_Atom to i32 (i32, ...)*)(i32 %63)
store i32 %64, i32* %24
%65 = load i32, i32* %19
%66 = call i32 (i32, ...) bitcast (i32 (...)* @l_Atom to i32 (i32, ...)*)(i32 %65)
store i32 %66, i32* %20
%67 = load i32, i32* %24
%68 = load i32, i32* %20
%69 = add nsw i32 %68, 1
%70 = icmp eq i32 %67, %69
br i1 %70, label %71, label %80
71: ; preds = %62
%72 = load i32, i32* %19
%73 = call i32 (i32, ...) bitcast (i32 (...)* @peak_Atom to i32 (i32, ...)*)(i32 %72)
%74 = sitofp i32 %73 to double
%75 = fmul double 4.000000e+00, %74
%76 = load double*, double** %14
%77 = load i32, i32* %20
%78 = sext i32 %77 to i64
%79 = getelementptr inbounds double, double* %76, i64 %78
store double %75, double* %79
br label %89
80: ; preds = %62
%81 = load i32, i32* %19
%82 = call i32 (i32, ...) bitcast (i32 (...)* @peak_Atom to i32 (i32, ...)*)(i32 %81)
%83 = sitofp i32 %82 to double
%84 = fmul double 3.000000e+00, %83
%85 = load double*, double** %14
%86 = load i32, i32* %20
%87 = sext i32 %86 to i64
%88 = getelementptr inbounds double, double* %85, i64 %87
store double %84, double* %88
br label %89
89: ; preds = %80, %71
%90 = load double, double* %25
%91 = load double*, double** %14
%92 = load i32, i32* %20
%93 = sext i32 %92 to i64
%94 = getelementptr inbounds double, double* %91, i64 %93
%95 = load double, double* %94
%96 = fcmp ogt double %90, %95
br i1 %96, label %97, label %99
97: ; preds = %89
%98 = load double, double* %25
br label %105
99: ; preds = %89
%100 = load double*, double** %14
%101 = load i32, i32* %20
%102 = sext i32 %101 to i64
%103 = getelementptr inbounds double, double* %100, i64 %102
%104 = load double, double* %103
br label %105
105: ; preds = %99, %97
%106 = phi double [ %98, %97 ], [ %104, %99 ]
store double %106, double* %25
%107 = load double*, double** %13
%108 = load i32, i32* %20
%109 = sext i32 %108 to i64
%110 = getelementptr inbounds double, double* %107, i64 %109
store double 0.000000e+00, double* %110
%111 = load i32*, i32** %10
%112 = load i32, i32* %20
%113 = sext i32 %112 to i64
%114 = getelementptr inbounds i32, i32* %111, i64 %113
%115 = load i32, i32* %114
%116 = load i32, i32* %24
%117 = icmp sgt i32 %115, %116
br i1 %117, label %118, label %124
118: ; preds = %105
%119 = load i32*, i32** %10
%120 = load i32, i32* %20
%121 = sext i32 %120 to i64
%122 = getelementptr inbounds i32, i32* %119, i64 %121
%123 = load i32, i32* %122
br label %126
124: ; preds = %105
%125 = load i32, i32* %24
br label %126
126: ; preds = %124, %118
%127 = phi i32 [ %123, %118 ], [ %125, %124 ]
%128 = load i32*, i32** %10
%129 = load i32, i32* %20
%130 = sext i32 %129 to i64
%131 = getelementptr inbounds i32, i32* %128, i64 %130
store i32 %127, i32* %131
%132 = load double*, double** %12
%133 = load i32, i32* %20
%134 = sext i32 %133 to i64
%135 = getelementptr inbounds double, double* %132, i64 %134
store double 0.000000e+00, double* %135
br label %136
136: ; preds = %126
%137 = load i32, i32* %19
%138 = add nsw i32 %137, 1
store i32 %138, i32* %19
br label %58
139: ; preds = %58
%140 = load i32, i32* %23
%141 = icmp sgt i32 %140, 0
br i1 %141, label %142, label %235
142: ; preds = %139
store double 0.000000e+00, double* %25
store double -1.000000e+02, double* %26
%143 = load i32, i32* %22
store i32 %143, i32* %19
br label %144
144: ; preds = %231, %142
%145 = load i32, i32* %19
%146 = load i32, i32* %22
%147 = load i32, i32* %23
%148 = add nsw i32 %146, %147
%149 = icmp slt i32 %145, %148
br i1 %149, label %150, label %234
150: ; preds = %144
%151 = load i32, i32* %19
%152 = call i32 (i32, ...) bitcast (i32 (...)* @n_Atom to i32 (i32, ...)*)(i32 %151)
store i32 %152, i32* %24
%153 = load i32, i32* %19
%154 = call i32 (i32, ...) bitcast (i32 (...)* @l_Atom to i32 (i32, ...)*)(i32 %153)
store i32 %154, i32* %20
%155 = load i32, i32* %24
%156 = load i32, i32* %20
%157 = add nsw i32 %156, 1
%158 = icmp eq i32 %155, %157
br i1 %158, label %159, label %168
159: ; preds = %150
%160 = load i32, i32* %19
%161 = call i32 (i32, ...) bitcast (i32 (...)* @peak_Atom to i32 (i32, ...)*)(i32 %160)
%162 = sitofp i32 %161 to double
%163 = fmul double 1.500000e+00, %162
%164 = load double*, double** %14
%165 = load i32, i32* %20
%166 = sext i32 %165 to i64
%167 = getelementptr inbounds double, double* %164, i64 %166
store double %163, double* %167
br label %177
168: ; preds = %150
%169 = load i32, i32* %19
%170 = call i32 (i32, ...) bitcast (i32 (...)* @peak_Atom to i32 (i32, ...)*)(i32 %169)
%171 = sitofp i32 %170 to double
%172 = fmul double 1.500000e+00, %171
%173 = load double*, double** %14
%174 = load i32, i32* %20
%175 = sext i32 %174 to i64
%176 = getelementptr inbounds double, double* %173, i64 %175
store double %172, double* %176
br label %177
177: ; preds = %168, %159
%178 = load i32, i32* %24
%179 = load i32*, i32** %10
%180 = load i32, i32* %20
%181 = sext i32 %180 to i64
%182 = getelementptr inbounds i32, i32* %179, i64 %181
store i32 %178, i32* %182
%183 = load i32, i32* %19
%184 = call i32 (i32, ...) bitcast (i32 (...)* @fill_Atom to i32 (i32, ...)*)(i32 %183)
%185 = sitofp i32 %184 to double
%186 = load double*, double** %13
%187 = load i32, i32* %20
%188 = sext i32 %187 to i64
%189 = getelementptr inbounds double, double* %186, i64 %188
store double %185, double* %189
%190 = load i32, i32* %19
%191 = call i32 (i32, ...) bitcast (i32 (...)* @eigenvalue_Atom to i32 (i32, ...)*)(i32 %190)
%192 = sitofp i32 %191 to double
%193 = load double*, double** %12
%194 = load i32, i32* %20
%195 = sext i32 %194 to i64
%196 = getelementptr inbounds double, double* %193, i64 %195
store double %192, double* %196
%197 = load double, double* %26
%198 = load double*, double** %12
%199 = load i32, i32* %20
%200 = sext i32 %199 to i64
%201 = getelementptr inbounds double, double* %198, i64 %200
%202 = load double, double* %201
%203 = fcmp ogt double %197, %202
br i1 %203, label %204, label %206
204: ; preds = %177
%205 = load double, double* %26
br label %212
206: ; preds = %177
%207 = load double*, double** %12
%208 = load i32, i32* %20
%209 = sext i32 %208 to i64
%210 = getelementptr inbounds double, double* %207, i64 %209
%211 = load double, double* %210
br label %212
212: ; preds = %206, %204
%213 = phi double [ %205, %204 ], [ %211, %206 ]
store double %213, double* %26
%214 = load double, double* %25
%215 = load double*, double** %14
%216 = load i32, i32* %20
%217 = sext i32 %216 to i64
%218 = getelementptr inbounds double, double* %215, i64 %217
%219 = load double, double* %218
%220 = fcmp ogt double %214, %219
br i1 %220, label %221, label %223
221: ; preds = %212
%222 = load double, double* %25
br label %229
223: ; preds = %212
%224 = load double*, double** %14
%225 = load i32, i32* %20
%226 = sext i32 %225 to i64
%227 = getelementptr inbounds double, double* %224, i64 %226
%228 = load double, double* %227
br label %229
229: ; preds = %223, %221
%230 = phi double [ %222, %221 ], [ %228, %223 ]
store double %230, double* %25
br label %231
231: ; preds = %229
%232 = load i32, i32* %19
%233 = add nsw i32 %232, 1
store i32 %233, i32* %19
br label %144
234: ; preds = %144
br label %235
235: ; preds = %234, %139
%236 = load i32*, i32** %11
%237 = load i32, i32* %18
%238 = sub nsw i32 %237, 1
%239 = sext i32 %238 to i64
%240 = getelementptr inbounds i32, i32* %236, i64 %239
%241 = load i32, i32* %240
%242 = add nsw i32 %241, 1
%243 = load i32*, i32** %10
%244 = load i32, i32* %18
%245 = sub nsw i32 %244, 1
%246 = sext i32 %245 to i64
%247 = getelementptr inbounds i32, i32* %243, i64 %246
store i32 %242, i32* %247
store i32 0, i32* %17
br label %248
248: ; preds = %287, %235
%249 = load i32, i32* %17
%250 = load i32, i32* %18
%251 = icmp slt i32 %249, %250
br i1 %251, label %252, label %290
252: ; preds = %248
%253 = load double*, double** %13
%254 = load i32, i32* %17
%255 = sext i32 %254 to i64
%256 = getelementptr inbounds double, double* %253, i64 %255
%257 = load double, double* %256
%258 = fcmp oeq double %257, 0.000000e+00
br i1 %258, label %259, label %286
259: ; preds = %252
%260 = load double*, double** %14
%261 = load i32, i32* %17
%262 = sext i32 %261 to i64
%263 = getelementptr inbounds double, double* %260, i64 %262
%264 = load double, double* %263
%265 = load double, double* %25
%266 = fcmp ogt double %264, %265
br i1 %266, label %267, label %273
267: ; preds = %259
%268 = load double*, double** %14
%269 = load i32, i32* %17
%270 = sext i32 %269 to i64
%271 = getelementptr inbounds double, double* %268, i64 %270
%272 = load double, double* %271
br label %275
273: ; preds = %259
%274 = load double, double* %25
br label %275
275: ; preds = %273, %267
%276 = phi double [ %272, %267 ], [ %274, %273 ]
%277 = load double*, double** %14
%278 = load i32, i32* %17
%279 = sext i32 %278 to i64
%280 = getelementptr inbounds double, double* %277, i64 %279
store double %276, double* %280
%281 = load double, double* %26
%282 = load double*, double** %12
%283 = load i32, i32* %17
%284 = sext i32 %283 to i64
%285 = getelementptr inbounds double, double* %282, i64 %284
store double %281, double* %285
br label %286
286: ; preds = %275, %252
br label %287
287: ; preds = %286
%288 = load i32, i32* %17
%289 = add nsw i32 %288, 1
store i32 %289, i32* %17
br label %248
290: ; preds = %248
%291 = load double, double* %25
%292 = load double*, double** %15
store double %291, double* %292
%293 = load double, double* %26
%294 = load double*, double** %16
store double %293, double* %294
%295 = load i32, i32* %18
%296 = load i32*, i32** %9
store i32 %295, i32* %296
ret void
}

LLVM IR (-O2):
define void @Suggested_Param_Vanderbilt(i32* nocapture writeonly %0, i32* nocapture %1, i32* nocapture %2, double* nocapture writeonly %3, double* nocapture %4, double* nocapture %5, double* nocapture writeonly %6, double* nocapture writeonly %7) {
%9 = tail call i32 (...) @Ncore_Atom()
%10 = tail call i32 (...) @Nvalence_Atom()
%11 = tail call i32 (...) @lmax_Atom()
%12 = add i32 %11, 2
%13 = icmp sgt i32 %11, -2
br i1 %13, label %14, label %123
14: ; preds = %8
%15 = tail call i32 @llvm.smax.i32(i32 %12, i32 1)
%16 = zext i32 %15 to i64
%17 = icmp ult i32 %15, 4
br i1 %17, label %107, label %18
18: ; preds = %14
%19 = getelementptr double, double* %5, i64 %16
%20 = getelementptr double, double* %4, i64 %16
%21 = getelementptr i32, i32* %1, i64 %16
%22 = getelementptr i32, i32* %2, i64 %16
%23 = icmp ugt double* %20, %5
%24 = icmp ugt double* %19, %4
%25 = and i1 %23, %24
%26 = icmp ugt i32* %22, %1
%27 = icmp ugt i32* %21, %2
%28 = and i1 %26, %27
%29 = or i1 %25, %28
br i1 %29, label %107, label %30
30: ; preds = %18
%31 = and i64 %16, 2147483644
%32 = add nsw i64 %31, -4
%33 = lshr exact i64 %32, 2
%34 = add nuw nsw i64 %33, 1
%35 = and i64 %34, 1
%36 = icmp eq i64 %32, 0
br i1 %36, label %83, label %37
37: ; preds = %30
%38 = and i64 %34, 9223372036854775806
br label %39
39: ; preds = %39, %37
%40 = phi i64 [ 0, %37 ], [ %79, %39 ]
%41 = phi <2 x i32> [ <i32 0, i32 1>, %37 ], [ %80, %39 ]
%42 = phi i64 [ 0, %37 ], [ %81, %39 ]
%43 = add <2 x i32> %41, <i32 2, i32 2>
%44 = getelementptr inbounds double, double* %5, i64 %40
%45 = bitcast double* %44 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %45
%46 = getelementptr inbounds double, double* %44, i64 2
%47 = bitcast double* %46 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %47
%48 = getelementptr inbounds double, double* %4, i64 %40
%49 = bitcast double* %48 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %49
%50 = getelementptr inbounds double, double* %48, i64 2
%51 = bitcast double* %50 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %51
%52 = getelementptr inbounds i32, i32* %1, i64 %40
%53 = bitcast i32* %52 to <2 x i32>*
store <2 x i32> zeroinitializer, <2 x i32>* %53
%54 = getelementptr inbounds i32, i32* %52, i64 2
%55 = bitcast i32* %54 to <2 x i32>*
store <2 x i32> zeroinitializer, <2 x i32>* %55
%56 = getelementptr inbounds i32, i32* %2, i64 %40
%57 = bitcast i32* %56 to <2 x i32>*
store <2 x i32> %41, <2 x i32>* %57
%58 = getelementptr inbounds i32, i32* %56, i64 2
%59 = bitcast i32* %58 to <2 x i32>*
store <2 x i32> %43, <2 x i32>* %59
%60 = or i64 %40, 4
%61 = add <2 x i32> %41, <i32 4, i32 4>
%62 = add <2 x i32> %41, <i32 6, i32 6>
%63 = getelementptr inbounds double, double* %5, i64 %60
%64 = bitcast double* %63 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %64
%65 = getelementptr inbounds double, double* %63, i64 2
%66 = bitcast double* %65 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %66
%67 = getelementptr inbounds double, double* %4, i64 %60
%68 = bitcast double* %67 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %68
%69 = getelementptr inbounds double, double* %67, i64 2
%70 = bitcast double* %69 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %70
%71 = getelementptr inbounds i32, i32* %1, i64 %60
%72 = bitcast i32* %71 to <2 x i32>*
store <2 x i32> zeroinitializer, <2 x i32>* %72
%73 = getelementptr inbounds i32, i32* %71, i64 2
%74 = bitcast i32* %73 to <2 x i32>*
store <2 x i32> zeroinitializer, <2 x i32>* %74
%75 = getelementptr inbounds i32, i32* %2, i64 %60
%76 = bitcast i32* %75 to <2 x i32>*
store <2 x i32> %61, <2 x i32>* %76
%77 = getelementptr inbounds i32, i32* %75, i64 2
%78 = bitcast i32* %77 to <2 x i32>*
store <2 x i32> %62, <2 x i32>* %78
%79 = add nuw i64 %40, 8
%80 = add <2 x i32> %41, <i32 8, i32 8>
%81 = add i64 %42, 2
%82 = icmp eq i64 %81, %38
br i1 %82, label %83, label %39
83: ; preds = %39, %30
%84 = phi i64 [ 0, %30 ], [ %79, %39 ]
%85 = phi <2 x i32> [ <i32 0, i32 1>, %30 ], [ %80, %39 ]
%86 = icmp eq i64 %35, 0
br i1 %86, label %105, label %87
87: ; preds = %83
%88 = add <2 x i32> %85, <i32 2, i32 2>
%89 = getelementptr inbounds double, double* %5, i64 %84
%90 = bitcast double* %89 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %90
%91 = getelementptr inbounds double, double* %89, i64 2
%92 = bitcast double* %91 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %92
%93 = getelementptr inbounds double, double* %4, i64 %84
%94 = bitcast double* %93 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %94
%95 = getelementptr inbounds double, double* %93, i64 2
%96 = bitcast double* %95 to <2 x double>*
store <2 x double> zeroinitializer, <2 x double>* %96
%97 = getelementptr inbounds i32, i32* %1, i64 %84
%98 = bitcast i32* %97 to <2 x i32>*
store <2 x i32> zeroinitializer, <2 x i32>* %98
%99 = getelementptr inbounds i32, i32* %97, i64 2
%100 = bitcast i32* %99 to <2 x i32>*
store <2 x i32> zeroinitializer, <2 x i32>* %100
%101 = getelementptr inbounds i32, i32* %2, i64 %84
%102 = bitcast i32* %101 to <2 x i32>*
store <2 x i32> %85, <2 x i32>* %102
%103 = getelementptr inbounds i32, i32* %101, i64 2
%104 = bitcast i32* %103 to <2 x i32>*
store <2 x i32> %88, <2 x i32>* %104
br label %105
105: ; preds = %83, %87
%106 = icmp eq i64 %31, %16
br i1 %106, label %123, label %107
107: ; preds = %18, %14, %105
%108 = phi i64 [ 0, %18 ], [ 0, %14 ], [ %31, %105 ]
%109 = xor i64 %108, -1
%110 = and i64 %16, 1
%111 = icmp eq i64 %110, 0
br i1 %111, label %119, label %112
112: ; preds = %107
%113 = getelementptr inbounds double, double* %5, i64 %108
store double 0.000000e+00, double* %113
%114 = getelementptr inbounds double, double* %4, i64 %108
store double 0.000000e+00, double* %114
%115 = getelementptr inbounds i32, i32* %1, i64 %108
store i32 0, i32* %115
%116 = getelementptr inbounds i32, i32* %2, i64 %108
%117 = trunc i64 %108 to i32
store i32 %117, i32* %116
%118 = or i64 %108, 1
br label %119
119: ; preds = %112, %107
%120 = phi i64 [ %108, %107 ], [ %118, %112 ]
%121 = sub nsw i64 0, %16
%122 = icmp eq i64 %109, %121
br i1 %122, label %123, label %125
123: ; preds = %119, %125, %105, %8
%124 = icmp sgt i32 %9, 0
br i1 %124, label %140, label %163
125: ; preds = %119, %125
%126 = phi i64 [ %138, %125 ], [ %120, %119 ]
%127 = getelementptr inbounds double, double* %5, i64 %126
store double 0.000000e+00, double* %127
%128 = getelementptr inbounds double, double* %4, i64 %126
store double 0.000000e+00, double* %128
%129 = getelementptr inbounds i32, i32* %1, i64 %126
store i32 0, i32* %129
%130 = getelementptr inbounds i32, i32* %2, i64 %126
%131 = trunc i64 %126 to i32
store i32 %131, i32* %130
%132 = add nuw nsw i64 %126, 1
%133 = getelementptr inbounds double, double* %5, i64 %132
store double 0.000000e+00, double* %133
%134 = getelementptr inbounds double, double* %4, i64 %132
store double 0.000000e+00, double* %134
%135 = getelementptr inbounds i32, i32* %1, i64 %132
store i32 0, i32* %135
%136 = getelementptr inbounds i32, i32* %2, i64 %132
%137 = trunc i64 %132 to i32
store i32 %137, i32* %136
%138 = add nuw nsw i64 %126, 2
%139 = icmp eq i64 %138, %16
br i1 %139, label %123, label %125
140: ; preds = %123, %140
%141 = phi double [ %154, %140 ], [ 0.000000e+00, %123 ]
%142 = phi i32 [ %161, %140 ], [ 0, %123 ]
%143 = tail call i32 (i32, ...) bitcast (i32 (...)* @n_Atom to i32 (i32, ...)*)(i32 %142)
%144 = tail call i32 (i32, ...) bitcast (i32 (...)* @l_Atom to i32 (i32, ...)*)(i32 %142)
%145 = add nsw i32 %144, 1
%146 = icmp eq i32 %143, %145
%147 = tail call i32 (i32, ...) bitcast (i32 (...)* @peak_Atom to i32 (i32, ...)*)(i32 %142)
%148 = sitofp i32 %147 to double
%149 = select i1 %146, double 4.000000e+00, double 3.000000e+00
%150 = fmul double %149, %148
%151 = sext i32 %144 to i64
%152 = getelementptr inbounds double, double* %5, i64 %151
store double %150, double* %152
%153 = fcmp ogt double %141, %150
%154 = select i1 %153, double %141, double %150
%155 = getelementptr inbounds double, double* %4, i64 %151
store double 0.000000e+00, double* %155
%156 = getelementptr inbounds i32, i32* %1, i64 %151
%157 = load i32, i32* %156
%158 = icmp sgt i32 %157, %143
%159 = select i1 %158, i32 %157, i32 %143
store i32 %159, i32* %156
%160 = getelementptr inbounds double, double* %3, i64 %151
store double 0.000000e+00, double* %160
%161 = add nuw nsw i32 %142, 1
%162 = icmp eq i32 %161, %9
br i1 %162, label %163, label %140
163: ; preds = %140, %123
%164 = phi double [ 0.000000e+00, %123 ], [ %154, %140 ]
%165 = icmp sgt i32 %10, 0
br i1 %165, label %166, label %193
166: ; preds = %163
%167 = add nsw i32 %10, %9
br label %168
168: ; preds = %166, %168
%169 = phi double [ %187, %168 ], [ -1.000000e+02, %166 ]
%170 = phi double [ %190, %168 ], [ 0.000000e+00, %166 ]
%171 = phi i32 [ %191, %168 ], [ %9, %166 ]
%172 = tail call i32 (i32, ...) bitcast (i32 (...)* @n_Atom to i32 (i32, ...)*)(i32 %171)
%173 = tail call i32 (i32, ...) bitcast (i32 (...)* @l_Atom to i32 (i32, ...)*)(i32 %171)
%174 = tail call i32 (i32, ...) bitcast (i32 (...)* @peak_Atom to i32 (i32, ...)*)(i32 %171)
%175 = sitofp i32 %174 to double
%176 = fmul double %175, 1.500000e+00
%177 = sext i32 %173 to i64
%178 = getelementptr inbounds double, double* %5, i64 %177
store double %176, double* %178
%179 = getelementptr inbounds i32, i32* %1, i64 %177
store i32 %172, i32* %179
%180 = tail call i32 (i32, ...) bitcast (i32 (...)* @fill_Atom to i32 (i32, ...)*)(i32 %171)
%181 = sitofp i32 %180 to double
%182 = getelementptr inbounds double, double* %4, i64 %177
store double %181, double* %182
%183 = tail call i32 (i32, ...) bitcast (i32 (...)* @eigenvalue_Atom to i32 (i32, ...)*)(i32 %171)
%184 = sitofp i32 %183 to double
%185 = getelementptr inbounds double, double* %3, i64 %177
store double %184, double* %185
%186 = fcmp ogt double %169, %184
%187 = select i1 %186, double %169, double %184
%188 = load double, double* %178
%189 = fcmp ogt double %170, %188
%190 = select i1 %189, double %170, double %188
%191 = add nsw i32 %171, 1
%192 = icmp slt i32 %191, %167
br i1 %192, label %168, label %193
193: ; preds = %168, %163
%194 = phi double [ %164, %163 ], [ %190, %168 ]
%195 = phi double [ 0.000000e+00, %163 ], [ %187, %168 ]
%196 = add nsw i32 %11, 1
%197 = sext i32 %196 to i64
%198 = getelementptr inbounds i32, i32* %2, i64 %197
%199 = load i32, i32* %198
%200 = add nsw i32 %199, 1
%201 = getelementptr inbounds i32, i32* %1, i64 %197
store i32 %200, i32* %201
br i1 %13, label %202, label %249
202: ; preds = %193
%203 = tail call i32 @llvm.smax.i32(i32 %12, i32 1)
%204 = zext i32 %203 to i64
%205 = and i64 %204, 1
%206 = icmp ugt i32 %11, 2147483645
br i1 %206, label %236, label %207
207: ; preds = %202
%208 = and i64 %204, 2147483646
br label %209
209: ; preds = %232, %207
%210 = phi i64 [ 0, %207 ], [ %233, %232 ]
%211 = phi i64 [ 0, %207 ], [ %234, %232 ]
%212 = getelementptr inbounds double, double* %4, i64 %210
%213 = load double, double* %212
%214 = fcmp oeq double %213, 0.000000e+00
br i1 %214, label %215, label %221
215: ; preds = %209
%216 = getelementptr inbounds double, double* %5, i64 %210
%217 = load double, double* %216
%218 = fcmp ogt double %217, %194
%219 = select i1 %218, double %217, double %194
store double %219, double* %216
%220 = getelementptr inbounds double, double* %3, i64 %210
store double %195, double* %220
br label %221
221: ; preds = %209, %215
%222 = or i64 %210, 1
%223 = getelementptr inbounds double, double* %4, i64 %222
%224 = load double, double* %223
%225 = fcmp oeq double %224, 0.000000e+00
br i1 %225, label %226, label %232
226: ; preds = %221
%227 = getelementptr inbounds double, double* %5, i64 %222
%228 = load double, double* %227
%229 = fcmp ogt double %228, %194
%230 = select i1 %229, double %228, double %194
store double %230, double* %227
%231 = getelementptr inbounds double, double* %3, i64 %222
store double %195, double* %231
br label %232
232: ; preds = %226, %221
%233 = add nuw nsw i64 %210, 2
%234 = add i64 %211, 2
%235 = icmp eq i64 %234, %208
br i1 %235, label %236, label %209
236: ; preds = %232, %202
%237 = phi i64 [ 0, %202 ], [ %233, %232 ]
%238 = icmp eq i64 %205, 0
br i1 %238, label %249, label %239
239: ; preds = %236
%240 = getelementptr inbounds double, double* %4, i64 %237
%241 = load double, double* %240
%242 = fcmp oeq double %241, 0.000000e+00
br i1 %242, label %243, label %249
243: ; preds = %239
%244 = getelementptr inbounds double, double* %5, i64 %237
%245 = load double, double* %244
%246 = fcmp ogt double %245, %194
%247 = select i1 %246, double %245, double %194
store double %247, double* %244
%248 = getelementptr inbounds double, double* %3, i64 %237
store double %195, double* %248
br label %249
249: ; preds = %236, %243, %239, %193
store double %194, double* %6
store double %195, double* %7
store i32 %12, i32* %0
ret void
}