#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 */
int /*<<< orphan*/ assert(int);
double fabs(double);
double sqrt(double);
void ERI_Associated_Legendre_Polynomial(int l, int m, double x, double *P,
                                        double *dP) {
  const double cut0 = 1.0e-24;
  const double cut1 = 1.0e-12;
  double Pm, Pm1, f, p0, p1, tmp;
  int i, ll;
  assert(fabs(x) <= 1.0);
  assert(l >= 0 && m >= 0 && m <= l);
  if ((1.0 - cut0) < fabs(x)) {
    if (x < 0.0) {
      x = -(1.0 - cut0);
    } else {
      x = (1.0 - cut0);
    }
  }
  Pm = 1.0;
  if (m > 0) {
    f = 1.0;
    tmp = -sqrt((1.0 - x) * (1.0 + x));
    for (i = 1; i <= m; i++) {
      Pm *= f * tmp;
      f += 2.0;
    }
  }
  if (l == m) {
    p0 = Pm;
    p1 = 0.0;
  } else {
    Pm1 = x * (2.0 * (double)m + 1.0) * Pm;
    if (m < l - 1) {
      for (ll = m + 2; ll <= l; ll++) {
        tmp = (x * (2.0 * (double)ll - 1.0) * Pm1 -
               ((double)ll + (double)m - 1.0) * Pm) /
              (double)(ll - m);
        Pm = Pm1;
        Pm1 = tmp;
      }
    }
    p0 = Pm1;
    p1 = Pm;
  }
  *P = p0;
  *dP = 0.0;
  tmp = sqrt(1.0 - x * x);
  if (cut1 < tmp) {
    *dP = ((double)l * x * p0 - (double)(l + m) * p1) / tmp;
  }
}


x86 assembly (clang, -O0):
<ERI_Associated_Legendre_Polynomial>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
movsd  %xmm0,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
movsd  0xecd(%rip),%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  0xeb8(%rip),%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x10(%rbp),%xmm1
movaps 0xecf(%rip),%xmm0
pand   %xmm0,%xmm1
movsd  0xe93(%rip),%xmm0
ucomisd %xmm1,%xmm0
setae  %al
and    $0x1,%al
movzbl %al,%edi
call   1030 <assert@plt>
xor    %eax,%eax
cmpl   $0x0,-0x4(%rbp)
mov    %al,-0x69(%rbp)
jl     11a8 <ERI_Associated_Legendre_Polynomial+0x88>
xor    %eax,%eax
cmpl   $0x0,-0x8(%rbp)
mov    %al,-0x69(%rbp)
jl     11a8 <ERI_Associated_Legendre_Polynomial+0x88>
mov    -0x8(%rbp),%eax
cmp    -0x4(%rbp),%eax
setle  %al
mov    %al,-0x69(%rbp)
mov    -0x69(%rbp),%al
and    $0x1,%al
movzbl %al,%edi
call   1030 <assert@plt>
movsd  -0x10(%rbp),%xmm0
movaps 0xe6f(%rip),%xmm1
pand   %xmm1,%xmm0
movsd  0xe33(%rip),%xmm1
ucomisd %xmm1,%xmm0
jbe    1209 <ERI_Associated_Legendre_Polynomial+0xe9>
xorps  %xmm0,%xmm0
ucomisd -0x10(%rbp),%xmm0
jbe    11f7 <ERI_Associated_Legendre_Polynomial+0xd7>
movsd  0xe2b(%rip),%xmm0
movsd  %xmm0,-0x10(%rbp)
jmp    1204 <ERI_Associated_Legendre_Polynomial+0xe4>
movsd  0xe01(%rip),%xmm0
movsd  %xmm0,-0x10(%rbp)
jmp    1209 <ERI_Associated_Legendre_Polynomial+0xe9>
movsd  0xdef(%rip),%xmm0
movsd  %xmm0,-0x38(%rbp)
cmpl   $0x0,-0x8(%rbp)
jle    12b8 <ERI_Associated_Legendre_Polynomial+0x198>
movsd  0xdd8(%rip),%xmm0
movsd  %xmm0,-0x48(%rbp)
movsd  0xdcb(%rip),%xmm0
subsd  -0x10(%rbp),%xmm0
movsd  0xdbe(%rip),%xmm1
addsd  -0x10(%rbp),%xmm1
mulsd  %xmm1,%xmm0
call   1040 <sqrt@plt>
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x60(%rbp)
movl   $0x1,-0x64(%rbp)
mov    -0x64(%rbp),%eax
cmp    -0x8(%rbp),%eax
jg     12b3 <ERI_Associated_Legendre_Polynomial+0x193>
movsd  -0x48(%rbp),%xmm0
mulsd  -0x60(%rbp),%xmm0
mulsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  0xd85(%rip),%xmm0
addsd  -0x48(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x64(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x64(%rbp)
jmp    1273 <ERI_Associated_Legendre_Polynomial+0x153>
jmp    12b8 <ERI_Associated_Legendre_Polynomial+0x198>
mov    -0x4(%rbp),%eax
cmp    -0x8(%rbp),%eax
jne    12db <ERI_Associated_Legendre_Polynomial+0x1bb>
movsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x58(%rbp)
jmp    13d8 <ERI_Associated_Legendre_Polynomial+0x2b8>
movsd  -0x10(%rbp),%xmm0
cvtsi2sdl -0x8(%rbp),%xmm1
addsd  %xmm1,%xmm1
movsd  0xd0f(%rip),%xmm2
addsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
mulsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x8(%rbp),%eax
mov    -0x4(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    13c4 <ERI_Associated_Legendre_Polynomial+0x2a4>
mov    -0x8(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x68(%rbp)
mov    -0x68(%rbp),%eax
cmp    -0x4(%rbp),%eax
jg     13bf <ERI_Associated_Legendre_Polynomial+0x29f>
movsd  -0x10(%rbp),%xmm0
cvtsi2sdl -0x68(%rbp),%xmm1
addsd  %xmm1,%xmm1
movsd  0xcd9(%rip),%xmm2
addsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
movsd  -0x40(%rbp),%xmm2
cvtsi2sdl -0x68(%rbp),%xmm1
cvtsi2sdl -0x8(%rbp),%xmm3
addsd  %xmm3,%xmm1
movsd  0xc9e(%rip),%xmm3
subsd  %xmm3,%xmm1
mulsd  -0x38(%rbp),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x68(%rbp),%eax
sub    -0x8(%rbp),%eax
cvtsi2sd %eax,%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x60(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x68(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x68(%rbp)
jmp    131d <ERI_Associated_Legendre_Polynomial+0x1fd>
jmp    13c4 <ERI_Associated_Legendre_Polynomial+0x2a4>
movsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  -0x50(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x20(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax)
movsd  -0x10(%rbp),%xmm0
movsd  -0x10(%rbp),%xmm1
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  %xmm1,%xmm0
movsd  0xbe3(%rip),%xmm1
addsd  %xmm1,%xmm0
call   1040 <sqrt@plt>
movsd  %xmm0,-0x60(%rbp)
movsd  -0x60(%rbp),%xmm0
movsd  0xbd0(%rip),%xmm1
ucomisd %xmm1,%xmm0
jbe    148c <ERI_Associated_Legendre_Polynomial+0x36c>
cvtsi2sdl -0x4(%rbp),%xmm0
mulsd  -0x10(%rbp),%xmm0
movsd  -0x50(%rbp),%xmm2
mov    -0x4(%rbp),%eax
add    -0x8(%rbp),%eax
cvtsi2sd %eax,%xmm1
mulsd  -0x58(%rbp),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
divsd  -0x60(%rbp),%xmm0
mov    -0x20(%rbp),%rax
movsd  %xmm0,(%rax)
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ERI_Associated_Legendre_Polynomial>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
movapd %xmm0,(%rsp)
xorpd  %xmm1,%xmm1
xor    %ebp,%ebp
ucomisd %xmm0,%xmm1
seta   %bpl
mov    %rcx,%r14
mov    %rdx,%r12
mov    %esi,%ebx
mov    %edi,%r15d
movapd 0xeac(%rip),%xmm1
andpd  %xmm0,%xmm1
movapd %xmm1,0x10(%rsp)
movsd  0xeca(%rip),%xmm0
xor    %edi,%edi
ucomisd %xmm1,%xmm0
setae  %dil
call   1030 <assert@plt>
mov    %ebx,%r13d
sub    %r15d,%r13d
setle  %al
mov    %ebx,%ecx
or     %r15d,%ecx
setns  %cl
and    %al,%cl
movzbl %cl,%edi
call   1030 <assert@plt>
movsd  0xe98(%rip),%xmm5
lea    0xe71(%rip),%rax
movsd  (%rax,%rbp,8),%xmm0
movapd %xmm5,%xmm4
cmpltsd 0x10(%rsp),%xmm4
andpd  %xmm4,%xmm0
andnpd (%rsp),%xmm4
orpd   %xmm0,%xmm4
test   %ebx,%ebx
jle    12b5 <ERI_Associated_Legendre_Polynomial+0x195>
movsd  0xe64(%rip),%xmm6
movapd %xmm6,%xmm1
subsd  %xmm4,%xmm1
movapd %xmm4,%xmm0
addsd  %xmm6,%xmm0
mulsd  %xmm1,%xmm0
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jb     11f0 <ERI_Associated_Legendre_Polynomial+0xd0>
sqrtsd %xmm0,%xmm0
jmp    1207 <ERI_Associated_Legendre_Polynomial+0xe7>
movapd %xmm4,(%rsp)
call   1040 <sqrt@plt>
movsd  0xe2e(%rip),%xmm6
movapd (%rsp),%xmm4
xorpd  0xe11(%rip),%xmm0
lea    -0x1(%rbx),%ecx
mov    %ebx,%eax
and    $0x3,%eax
movapd %xmm6,%xmm5
cmp    $0x3,%ecx
jb     1285 <ERI_Associated_Legendre_Polynomial+0x165>
mov    %ebx,%ecx
and    $0xfffffffc,%ecx
movsd  0xe03(%rip),%xmm6
movsd  0xe03(%rip),%xmm1
movapd %xmm6,%xmm5
nopl   0x0(%rax)
movapd %xmm6,%xmm2
mulsd  %xmm0,%xmm2
mulsd  %xmm5,%xmm2
addsd  %xmm1,%xmm6
movapd %xmm6,%xmm3
mulsd  %xmm0,%xmm3
mulsd  %xmm2,%xmm3
addsd  %xmm1,%xmm6
movapd %xmm6,%xmm2
mulsd  %xmm0,%xmm2
mulsd  %xmm3,%xmm2
addsd  %xmm1,%xmm6
movapd %xmm6,%xmm5
mulsd  %xmm0,%xmm5
mulsd  %xmm2,%xmm5
addsd  %xmm1,%xmm6
add    $0xfffffffc,%ecx
jne    1240 <ERI_Associated_Legendre_Polynomial+0x120>
test   %eax,%eax
je     12b5 <ERI_Associated_Legendre_Polynomial+0x195>
movsd  0xda7(%rip),%xmm1
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movapd %xmm6,%xmm2
mulsd  %xmm0,%xmm2
mulsd  %xmm2,%xmm5
addsd  %xmm1,%xmm6
add    $0xffffffff,%eax
jne    12a0 <ERI_Associated_Legendre_Polynomial+0x180>
cmp    %ebx,%r15d
jne    12c7 <ERI_Associated_Legendre_Polynomial+0x1a7>
movapd %xmm5,%xmm6
xorpd  %xmm3,%xmm3
jmp    1366 <ERI_Associated_Legendre_Polynomial+0x246>
xorps  %xmm0,%xmm0
cvtsi2sd %ebx,%xmm0
movapd %xmm0,%xmm6
addsd  %xmm0,%xmm6
addsd  0xd52(%rip),%xmm6
mulsd  %xmm4,%xmm6
mulsd  %xmm5,%xmm6
lea    -0x1(%r15),%eax
cmp    %ebx,%eax
jle    1362 <ERI_Associated_Legendre_Polynomial+0x242>
lea    0x2(%rbx),%eax
cmp    %r15d,%eax
jg     1362 <ERI_Associated_Legendre_Polynomial+0x242>
mov    $0x2,%eax
movsd  0xd3d(%rip),%xmm1
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movapd %xmm6,%xmm3
lea    (%rbx,%rax,1),%ecx
xorps  %xmm6,%xmm6
cvtsi2sd %ecx,%xmm6
movapd %xmm0,%xmm2
addsd  %xmm6,%xmm2
addsd  %xmm6,%xmm6
addsd  %xmm1,%xmm6
mulsd  %xmm4,%xmm6
addsd  %xmm1,%xmm2
mulsd  %xmm5,%xmm2
mulsd  %xmm3,%xmm6
subsd  %xmm2,%xmm6
xorps  %xmm2,%xmm2
cvtsi2sd %eax,%xmm2
divsd  %xmm2,%xmm6
lea    (%rax,%r13,1),%ecx
add    $0x1,%ecx
add    $0x1,%eax
movapd %xmm3,%xmm5
cmp    $0x1,%ecx
jne    1310 <ERI_Associated_Legendre_Polynomial+0x1f0>
jmp    1366 <ERI_Associated_Legendre_Polynomial+0x246>
movapd %xmm5,%xmm3
movsd  %xmm6,(%r12)
movq   $0x0,(%r14)
movapd %xmm4,%xmm1
mulsd  %xmm4,%xmm1
movsd  0xcad(%rip),%xmm0
subsd  %xmm1,%xmm0
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jb     13a1 <ERI_Associated_Legendre_Polynomial+0x281>
sqrtsd %xmm0,%xmm0
ucomisd 0xcab(%rip),%xmm0
ja     13d2 <ERI_Associated_Legendre_Polynomial+0x2b2>
jmp    13fd <ERI_Associated_Legendre_Polynomial+0x2dd>
movapd %xmm4,(%rsp)
movsd  %xmm3,0x10(%rsp)
movsd  %xmm6,0x20(%rsp)
call   1040 <sqrt@plt>
movsd  0x20(%rsp),%xmm6
movsd  0x10(%rsp),%xmm3
movapd (%rsp),%xmm4
ucomisd 0xc78(%rip),%xmm0
jbe    13fd <ERI_Associated_Legendre_Polynomial+0x2dd>
xorps  %xmm1,%xmm1
cvtsi2sd %r15d,%xmm1
mulsd  %xmm1,%xmm4
add    %r15d,%ebx
xorps  %xmm1,%xmm1
cvtsi2sd %ebx,%xmm1
mulsd  %xmm3,%xmm1
mulsd  %xmm6,%xmm4
subsd  %xmm1,%xmm4
divsd  %xmm0,%xmm4
movsd  %xmm4,(%r14)
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define void @ERI_Associated_Legendre_Polynomial(i32 %0, i32 %1, double %2, double* nocapture writeonly %3, double* nocapture writeonly %4) {
%6 = tail call double @llvm.fabs.f64(double %2)
%7 = fcmp ole double %6, 1.000000e+00
%8 = zext i1 %7 to i32
%9 = tail call i32 @assert(i32 %8)
%10 = or i32 %1, %0
%11 = icmp sle i32 %1, %0
%12 = icmp sgt i32 %10, -1
%13 = and i1 %11, %12
%14 = zext i1 %13 to i32
%15 = tail call i32 @assert(i32 %14)
%16 = fcmp ogt double %6, 1.000000e+00
%17 = fcmp olt double %2, 0.000000e+00
%18 = select i1 %17, double -1.000000e+00, double 1.000000e+00
%19 = select i1 %16, double %18, double %2
%20 = icmp sgt i32 %1, 0
br i1 %20, label %21, label %64
21: ; preds = %5
%22 = fsub double 1.000000e+00, %19
%23 = fadd double %19, 1.000000e+00
%24 = fmul double %22, %23
%25 = tail call double @sqrt(double %24)
%26 = fneg double %25
%27 = add i32 %1, -1
%28 = and i32 %1, 3
%29 = icmp ult i32 %27, 3
br i1 %29, label %50, label %30
30: ; preds = %21
%31 = and i32 %1, -4
br label %32
32: ; preds = %32, %30
%33 = phi double [ 1.000000e+00, %30 ], [ %47, %32 ]
%34 = phi double [ 1.000000e+00, %30 ], [ %46, %32 ]
%35 = phi i32 [ 0, %30 ], [ %48, %32 ]
%36 = fmul double %33, %26
%37 = fmul double %34, %36
%38 = fadd double %33, 2.000000e+00
%39 = fmul double %38, %26
%40 = fmul double %37, %39
%41 = fadd double %38, 2.000000e+00
%42 = fmul double %41, %26
%43 = fmul double %40, %42
%44 = fadd double %41, 2.000000e+00
%45 = fmul double %44, %26
%46 = fmul double %43, %45
%47 = fadd double %44, 2.000000e+00
%48 = add i32 %35, 4
%49 = icmp eq i32 %48, %31
br i1 %49, label %50, label %32
50: ; preds = %32, %21
%51 = phi double [ undef, %21 ], [ %46, %32 ]
%52 = phi double [ 1.000000e+00, %21 ], [ %47, %32 ]
%53 = phi double [ 1.000000e+00, %21 ], [ %46, %32 ]
%54 = icmp eq i32 %28, 0
br i1 %54, label %64, label %55
55: ; preds = %50, %55
%56 = phi double [ %61, %55 ], [ %52, %50 ]
%57 = phi double [ %60, %55 ], [ %53, %50 ]
%58 = phi i32 [ %62, %55 ], [ 0, %50 ]
%59 = fmul double %56, %26
%60 = fmul double %57, %59
%61 = fadd double %56, 2.000000e+00
%62 = add i32 %58, 1
%63 = icmp eq i32 %62, %28
br i1 %63, label %64, label %55
64: ; preds = %50, %55, %5
%65 = phi double [ 1.000000e+00, %5 ], [ %51, %50 ], [ %60, %55 ]
%66 = icmp eq i32 %0, %1
br i1 %66, label %94, label %67
67: ; preds = %64
%68 = sitofp i32 %1 to double
%69 = tail call double @llvm.fmuladd.f64(double %68, double 2.000000e+00, double 1.000000e+00)
%70 = fmul double %69, %19
%71 = fmul double %70, %65
%72 = add nsw i32 %0, -1
%73 = icmp sle i32 %72, %1
%74 = add nsw i32 %1, 2
%75 = icmp sgt i32 %74, %0
%76 = select i1 %73, i1 true, i1 %75
br i1 %76, label %94, label %77
77: ; preds = %67, %77
%78 = phi i32 [ %92, %77 ], [ %74, %67 ]
%79 = phi double [ %91, %77 ], [ %71, %67 ]
%80 = phi double [ %79, %77 ], [ %65, %67 ]
%81 = sitofp i32 %78 to double
%82 = tail call double @llvm.fmuladd.f64(double %81, double 2.000000e+00, double -1.000000e+00)
%83 = fmul double %19, %82
%84 = fadd double %68, %81
%85 = fadd double %84, -1.000000e+00
%86 = fneg double %85
%87 = fmul double %80, %86
%88 = tail call double @llvm.fmuladd.f64(double %83, double %79, double %87)
%89 = sub nsw i32 %78, %1
%90 = sitofp i32 %89 to double
%91 = fdiv double %88, %90
%92 = add i32 %78, 1
%93 = icmp eq i32 %78, %0
br i1 %93, label %94, label %77
94: ; preds = %77, %67, %64
%95 = phi double [ %65, %64 ], [ %71, %67 ], [ %91, %77 ]
%96 = phi double [ 0.000000e+00, %64 ], [ %65, %67 ], [ %79, %77 ]
store double %95, double* %3
store double 0.000000e+00, double* %4
%97 = fneg double %19
%98 = tail call double @llvm.fmuladd.f64(double %97, double %19, double 1.000000e+00)
%99 = tail call double @sqrt(double %98)
%100 = fcmp ogt double %99, 0x3D719799812DEA11
br i1 %100, label %101, label %110
101: ; preds = %94
%102 = sitofp i32 %0 to double
%103 = fmul double %19, %102
%104 = add nsw i32 %1, %0
%105 = sitofp i32 %104 to double
%106 = fneg double %96
%107 = fmul double %105, %106
%108 = tail call double @llvm.fmuladd.f64(double %103, double %95, double %107)
%109 = fdiv double %108, %99
store double %109, double* %4
br label %110
110: ; preds = %101, %94
ret void
}