int tpd5(int inverse, const int i[], const double p[], int Nhat,
         const double rawcrd[], double *discrd) {
  double r, s, u, v;
  if (i[3 + inverse] != 24 || 2 < Nhat) {
    return 1;
  }
  u = rawcrd[0];
  v = rawcrd[1];
  if (i[5]) {
    r = p[0] + p[1] * u + p[2] * v;
    v = p[3] + p[4] * u + p[5] * v;
    u = r;
    p += 6;
  }
  if (inverse)
    p += i[3];
  *discrd =
      p[0] + u * (p[1] + u * (p[4] + u * (p[7] + u * (p[12] + u * (p[17])))));
  if (Nhat == 1)
    return 0;
  *discrd += v * (p[2] + v * (p[6] + v * (p[10] + v * (p[16] + v * (p[22]))))) +
             u *
                 (p[5] + v * (p[9] + v * (p[15] + v * (p[21]))) +
                  u * (p[8] + v * (p[14] + v * (p[20])) +
                       u * (p[13] + v * (p[19]) + u * (p[18])))) *
                 v;
  if (i[6]) {
    s = u * u + v * v;
    r = sqrt(s);
    *discrd += r * (p[3] + s * (p[11] + s * (p[23])));
  }
  return 0;
}


x86 assembly (clang, -O0):
<tpd5>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %edi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x8(%rbp),%ecx
add    $0x3,%ecx
movslq %ecx,%rcx
cmpl   $0x18,(%rax,%rcx,4)
jne    1153 <tpd5+0x43>
mov    $0x2,%eax
cmp    -0x1c(%rbp),%eax
jge    115f <tpd5+0x4f>
movl   $0x1,-0x4(%rbp)
jmp    14e3 <tpd5+0x3d3>
mov    -0x28(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x28(%rbp),%rax
movsd  0x8(%rax),%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x10(%rbp),%rax
cmpl   $0x0,0x14(%rax)
je     1211 <tpd5+0x101>
mov    -0x18(%rbp),%rax
movsd  (%rax),%xmm0
mov    -0x18(%rbp),%rax
movsd  0x8(%rax),%xmm1
movsd  -0x48(%rbp),%xmm2
mulsd  %xmm2,%xmm1
addsd  %xmm0,%xmm1
mov    -0x18(%rbp),%rax
movsd  0x10(%rax),%xmm0
movsd  -0x50(%rbp),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x18(%rbp),%rax
movsd  0x18(%rax),%xmm0
mov    -0x18(%rbp),%rax
movsd  0x20(%rax),%xmm1
movsd  -0x48(%rbp),%xmm2
mulsd  %xmm2,%xmm1
addsd  %xmm0,%xmm1
mov    -0x18(%rbp),%rax
movsd  0x28(%rax),%xmm0
movsd  -0x50(%rbp),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x18(%rbp),%rax
add    $0x30,%rax
mov    %rax,-0x18(%rbp)
cmpl   $0x0,-0x8(%rbp)
je     1234 <tpd5+0x124>
mov    -0x10(%rbp),%rax
mov    0xc(%rax),%ecx
mov    -0x18(%rbp),%rax
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
movsd  (%rax),%xmm1
movsd  -0x48(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movsd  0x8(%rax),%xmm3
movsd  -0x48(%rbp),%xmm2
mov    -0x18(%rbp),%rax
movsd  0x20(%rax),%xmm5
movsd  -0x48(%rbp),%xmm4
mov    -0x18(%rbp),%rax
movsd  0x38(%rax),%xmm7
movsd  -0x48(%rbp),%xmm6
mov    -0x18(%rbp),%rax
movsd  0x60(%rax),%xmm9
movsd  -0x48(%rbp),%xmm8
mov    -0x18(%rbp),%rax
movsd  0x88(%rax),%xmm10
mulsd  %xmm10,%xmm8
addsd  %xmm9,%xmm8
mulsd  %xmm8,%xmm6
addsd  %xmm7,%xmm6
mulsd  %xmm6,%xmm4
addsd  %xmm5,%xmm4
mulsd  %xmm4,%xmm2
addsd  %xmm3,%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
movsd  %xmm0,(%rax)
cmpl   $0x1,-0x1c(%rbp)
jne    12d1 <tpd5+0x1c1>
movl   $0x0,-0x4(%rbp)
jmp    14e3 <tpd5+0x3d3>
movsd  -0x50(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movsd  0x10(%rax),%xmm1
movsd  -0x50(%rbp),%xmm2
mov    -0x18(%rbp),%rax
movsd  0x30(%rax),%xmm4
movsd  -0x50(%rbp),%xmm3
mov    -0x18(%rbp),%rax
movsd  0x50(%rax),%xmm6
movsd  -0x50(%rbp),%xmm5
mov    -0x18(%rbp),%rax
movsd  0x80(%rax),%xmm8
movsd  -0x50(%rbp),%xmm7
mov    -0x18(%rbp),%rax
movsd  0xb0(%rax),%xmm9
mulsd  %xmm9,%xmm7
addsd  %xmm8,%xmm7
mulsd  %xmm7,%xmm5
addsd  %xmm6,%xmm5
mulsd  %xmm5,%xmm3
addsd  %xmm4,%xmm3
mulsd  %xmm3,%xmm2
addsd  %xmm1,%xmm2
movsd  -0x48(%rbp),%xmm1
mov    -0x18(%rbp),%rax
movsd  0x28(%rax),%xmm3
movsd  -0x50(%rbp),%xmm4
mov    -0x18(%rbp),%rax
movsd  0x48(%rax),%xmm6
movsd  -0x50(%rbp),%xmm5
mov    -0x18(%rbp),%rax
movsd  0x78(%rax),%xmm8
movsd  -0x50(%rbp),%xmm7
mov    -0x18(%rbp),%rax
movsd  0xa8(%rax),%xmm9
mulsd  %xmm9,%xmm7
addsd  %xmm8,%xmm7
mulsd  %xmm7,%xmm5
addsd  %xmm6,%xmm5
mulsd  %xmm5,%xmm4
addsd  %xmm3,%xmm4
movsd  -0x48(%rbp),%xmm3
mov    -0x18(%rbp),%rax
movsd  0x40(%rax),%xmm5
movsd  -0x50(%rbp),%xmm6
mov    -0x18(%rbp),%rax
movsd  0x70(%rax),%xmm8
movsd  -0x50(%rbp),%xmm7
mov    -0x18(%rbp),%rax
movsd  0xa0(%rax),%xmm9
mulsd  %xmm9,%xmm7
addsd  %xmm8,%xmm7
mulsd  %xmm7,%xmm6
addsd  %xmm5,%xmm6
movsd  -0x48(%rbp),%xmm5
mov    -0x18(%rbp),%rax
movsd  0x68(%rax),%xmm7
movsd  -0x50(%rbp),%xmm8
mov    -0x18(%rbp),%rax
movsd  0x98(%rax),%xmm9
mulsd  %xmm9,%xmm8
addsd  %xmm7,%xmm8
movsd  -0x48(%rbp),%xmm7
mov    -0x18(%rbp),%rax
movsd  0x90(%rax),%xmm9
mulsd  %xmm9,%xmm7
addsd  %xmm8,%xmm7
mulsd  %xmm7,%xmm5
addsd  %xmm6,%xmm5
mulsd  %xmm5,%xmm3
addsd  %xmm4,%xmm3
mulsd  %xmm3,%xmm1
mulsd  -0x50(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
addsd  (%rax),%xmm0
movsd  %xmm0,(%rax)
mov    -0x10(%rbp),%rax
cmpl   $0x0,0x18(%rax)
je     14dc <tpd5+0x3cc>
movsd  -0x48(%rbp),%xmm0
movsd  -0x48(%rbp),%xmm2
movsd  -0x50(%rbp),%xmm1
mulsd  -0x50(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x40(%rbp),%xmm0
call   1030 <sqrt@plt>
movsd  %xmm0,-0x38(%rbp)
movsd  -0x38(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movsd  0x18(%rax),%xmm1
movsd  -0x40(%rbp),%xmm2
mov    -0x18(%rbp),%rax
movsd  0x58(%rax),%xmm4
movsd  -0x40(%rbp),%xmm3
mov    -0x18(%rbp),%rax
movsd  0xb8(%rax),%xmm5
mulsd  %xmm5,%xmm3
addsd  %xmm4,%xmm3
mulsd  %xmm3,%xmm2
addsd  %xmm1,%xmm2
mov    -0x30(%rbp),%rax
movsd  (%rax),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rax)
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<tpd5>:
push   %rbp
push   %r14
push   %rbx
sub    $0x10,%rsp
mov    $0x1,%ebp
cmp    $0x2,%ecx
jg     12f0 <tpd5+0x1e0>
movslq %edi,%rax
cmpl   $0x18,0xc(%rsi,%rax,4)
jne    12f0 <tpd5+0x1e0>
mov    %r9,%r14
mov    %rdx,%rbx
movupd (%r8),%xmm7
cmpl   $0x0,0x14(%rsi)
je     1182 <tpd5+0x72>
movsd  (%rbx),%xmm0
movsd  0x8(%rbx),%xmm1
movhpd 0x20(%rbx),%xmm1
movsd  0x10(%rbx),%xmm2
movapd %xmm7,%xmm3
unpcklpd %xmm7,%xmm3
movhpd 0x18(%rbx),%xmm0
mulpd  %xmm1,%xmm3
addpd  %xmm3,%xmm0
movhpd 0x28(%rbx),%xmm2
unpckhpd %xmm7,%xmm7
mulpd  %xmm2,%xmm7
addpd  %xmm0,%xmm7
add    $0x30,%rbx
test   %edi,%edi
je     118e <tpd5+0x7e>
movslq 0xc(%rsi),%rax
lea    (%rbx,%rax,8),%rbx
movsd  0x88(%rbx),%xmm0
mulsd  %xmm7,%xmm0
addsd  0x60(%rbx),%xmm0
mulsd  %xmm7,%xmm0
addsd  0x38(%rbx),%xmm0
mulsd  %xmm7,%xmm0
addsd  0x20(%rbx),%xmm0
mulsd  %xmm7,%xmm0
addsd  0x8(%rbx),%xmm0
mulsd  %xmm7,%xmm0
addsd  (%rbx),%xmm0
movsd  %xmm0,(%r14)
xor    %ebp,%ebp
cmp    $0x1,%ecx
je     12f0 <tpd5+0x1e0>
movapd %xmm7,%xmm1
unpckhpd %xmm7,%xmm1
movsd  0xb0(%rbx),%xmm2
mulsd  %xmm1,%xmm2
addsd  0x80(%rbx),%xmm2
mulsd  %xmm1,%xmm2
addsd  0x50(%rbx),%xmm2
mulsd  %xmm1,%xmm2
addsd  0x30(%rbx),%xmm2
mulsd  %xmm1,%xmm2
addsd  0x10(%rbx),%xmm2
movsd  0xa8(%rbx),%xmm3
mulsd  %xmm1,%xmm3
addsd  0x78(%rbx),%xmm3
mulsd  %xmm1,%xmm3
addsd  0x48(%rbx),%xmm3
mulsd  %xmm1,%xmm3
addsd  0x28(%rbx),%xmm3
movsd  0xa0(%rbx),%xmm4
mulsd  %xmm1,%xmm4
addsd  0x70(%rbx),%xmm4
mulsd  %xmm1,%xmm4
addsd  0x40(%rbx),%xmm4
movsd  0x98(%rbx),%xmm5
mulsd  %xmm1,%xmm5
addsd  0x68(%rbx),%xmm5
movsd  0x90(%rbx),%xmm6
mulsd  %xmm7,%xmm6
addsd  %xmm5,%xmm6
mulsd  %xmm7,%xmm6
addsd  %xmm4,%xmm6
mulsd  %xmm7,%xmm6
addsd  %xmm3,%xmm6
mulsd  %xmm7,%xmm6
mulsd  %xmm1,%xmm6
mulsd  %xmm1,%xmm2
addsd  %xmm6,%xmm2
addsd  %xmm2,%xmm0
movsd  %xmm0,(%r14)
cmpl   $0x0,0x18(%rsi)
je     12f0 <tpd5+0x1e0>
mulsd  %xmm1,%xmm1
mulsd  %xmm7,%xmm7
addsd  %xmm1,%xmm7
xorpd  %xmm0,%xmm0
ucomisd %xmm0,%xmm7
jb     12b5 <tpd5+0x1a5>
xorps  %xmm0,%xmm0
sqrtsd %xmm7,%xmm0
jmp    12c8 <tpd5+0x1b8>
movapd %xmm7,%xmm0
movapd %xmm7,(%rsp)
call   1030 <sqrt@plt>
movapd (%rsp),%xmm7
movsd  0xb8(%rbx),%xmm1
mulsd  %xmm7,%xmm1
addsd  0x58(%rbx),%xmm1
mulsd  %xmm7,%xmm1
addsd  0x18(%rbx),%xmm1
mulsd  %xmm0,%xmm1
addsd  (%r14),%xmm1
movsd  %xmm1,(%r14)
mov    %ebp,%eax
add    $0x10,%rsp
pop    %rbx
pop    %r14
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @tpd5(i32 %0, i32* nocapture %1, double* %2, i32 %3, double* nocapture %4, double* nocapture %5) {
%7 = add nsw i32 %0, 3
%8 = sext i32 %7 to i64
%9 = getelementptr inbounds i32, i32* %1, i64 %8
%10 = load i32, i32* %9
%11 = icmp ne i32 %10, 24
%12 = icmp sgt i32 %3, 2
%13 = or i1 %12, %11
br i1 %13, label %138, label %14
14: ; preds = %6
%15 = bitcast double* %4 to <2 x double>*
%16 = load <2 x double>, <2 x double>* %15
%17 = getelementptr inbounds i32, i32* %1, i64 5
%18 = load i32, i32* %17
%19 = icmp eq i32 %18, 0
br i1 %19, label %43, label %20
20: ; preds = %14
%21 = load double, double* %2
%22 = getelementptr inbounds double, double* %2, i64 1
%23 = load double, double* %22
%24 = getelementptr inbounds double, double* %2, i64 2
%25 = load double, double* %24
%26 = getelementptr inbounds double, double* %2, i64 3
%27 = load double, double* %26
%28 = getelementptr inbounds double, double* %2, i64 4
%29 = load double, double* %28
%30 = insertelement <2 x double> poison, double %23, i64 0
%31 = insertelement <2 x double> %30, double %29, i64 1
%32 = shufflevector <2 x double> %16, <2 x double> undef, <2 x i32> zeroinitializer
%33 = insertelement <2 x double> poison, double %21, i64 0
%34 = insertelement <2 x double> %33, double %27, i64 1
%35 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %31, <2 x double> %32, <2 x double> %34)
%36 = getelementptr inbounds double, double* %2, i64 5
%37 = load double, double* %36
%38 = insertelement <2 x double> poison, double %25, i64 0
%39 = insertelement <2 x double> %38, double %37, i64 1
%40 = shufflevector <2 x double> %16, <2 x double> undef, <2 x i32> <i32 1, i32 1>
%41 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %39, <2 x double> %40, <2 x double> %35)
%42 = getelementptr inbounds double, double* %2, i64 6
br label %43
43: ; preds = %20, %14
%44 = phi double* [ %42, %20 ], [ %2, %14 ]
%45 = phi <2 x double> [ %41, %20 ], [ %16, %14 ]
%46 = icmp eq i32 %0, 0
br i1 %46, label %52, label %47
47: ; preds = %43
%48 = getelementptr inbounds i32, i32* %1, i64 3
%49 = load i32, i32* %48
%50 = sext i32 %49 to i64
%51 = getelementptr inbounds double, double* %44, i64 %50
br label %52
52: ; preds = %47, %43
%53 = phi double* [ %51, %47 ], [ %44, %43 ]
%54 = load double, double* %53
%55 = getelementptr inbounds double, double* %53, i64 1
%56 = load double, double* %55
%57 = getelementptr inbounds double, double* %53, i64 4
%58 = load double, double* %57
%59 = getelementptr inbounds double, double* %53, i64 7
%60 = load double, double* %59
%61 = getelementptr inbounds double, double* %53, i64 12
%62 = load double, double* %61
%63 = getelementptr inbounds double, double* %53, i64 17
%64 = load double, double* %63
%65 = extractelement <2 x double> %45, i64 0
%66 = tail call double @llvm.fmuladd.f64(double %65, double %64, double %62)
%67 = tail call double @llvm.fmuladd.f64(double %65, double %66, double %60)
%68 = tail call double @llvm.fmuladd.f64(double %65, double %67, double %58)
%69 = tail call double @llvm.fmuladd.f64(double %65, double %68, double %56)
%70 = tail call double @llvm.fmuladd.f64(double %65, double %69, double %54)
store double %70, double* %5
%71 = icmp eq i32 %3, 1
br i1 %71, label %138, label %72
72: ; preds = %52
%73 = getelementptr inbounds double, double* %53, i64 2
%74 = load double, double* %73
%75 = getelementptr inbounds double, double* %53, i64 6
%76 = load double, double* %75
%77 = getelementptr inbounds double, double* %53, i64 10
%78 = load double, double* %77
%79 = getelementptr inbounds double, double* %53, i64 16
%80 = load double, double* %79
%81 = getelementptr inbounds double, double* %53, i64 22
%82 = load double, double* %81
%83 = extractelement <2 x double> %45, i64 1
%84 = tail call double @llvm.fmuladd.f64(double %83, double %82, double %80)
%85 = tail call double @llvm.fmuladd.f64(double %83, double %84, double %78)
%86 = tail call double @llvm.fmuladd.f64(double %83, double %85, double %76)
%87 = tail call double @llvm.fmuladd.f64(double %83, double %86, double %74)
%88 = getelementptr inbounds double, double* %53, i64 5
%89 = load double, double* %88
%90 = getelementptr inbounds double, double* %53, i64 9
%91 = load double, double* %90
%92 = getelementptr inbounds double, double* %53, i64 15
%93 = load double, double* %92
%94 = getelementptr inbounds double, double* %53, i64 21
%95 = load double, double* %94
%96 = tail call double @llvm.fmuladd.f64(double %83, double %95, double %93)
%97 = tail call double @llvm.fmuladd.f64(double %83, double %96, double %91)
%98 = tail call double @llvm.fmuladd.f64(double %83, double %97, double %89)
%99 = getelementptr inbounds double, double* %53, i64 8
%100 = load double, double* %99
%101 = getelementptr inbounds double, double* %53, i64 14
%102 = load double, double* %101
%103 = getelementptr inbounds double, double* %53, i64 20
%104 = load double, double* %103
%105 = tail call double @llvm.fmuladd.f64(double %83, double %104, double %102)
%106 = tail call double @llvm.fmuladd.f64(double %83, double %105, double %100)
%107 = getelementptr inbounds double, double* %53, i64 13
%108 = load double, double* %107
%109 = getelementptr inbounds double, double* %53, i64 19
%110 = load double, double* %109
%111 = tail call double @llvm.fmuladd.f64(double %83, double %110, double %108)
%112 = getelementptr inbounds double, double* %53, i64 18
%113 = load double, double* %112
%114 = tail call double @llvm.fmuladd.f64(double %65, double %113, double %111)
%115 = tail call double @llvm.fmuladd.f64(double %65, double %114, double %106)
%116 = tail call double @llvm.fmuladd.f64(double %65, double %115, double %98)
%117 = fmul double %65, %116
%118 = fmul double %83, %117
%119 = tail call double @llvm.fmuladd.f64(double %83, double %87, double %118)
%120 = fadd double %70, %119
store double %120, double* %5
%121 = getelementptr inbounds i32, i32* %1, i64 6
%122 = load i32, i32* %121
%123 = icmp eq i32 %122, 0
br i1 %123, label %138, label %124
124: ; preds = %72
%125 = fmul double %83, %83
%126 = tail call double @llvm.fmuladd.f64(double %65, double %65, double %125)
%127 = tail call double @sqrt(double %126)
%128 = getelementptr inbounds double, double* %53, i64 3
%129 = load double, double* %128
%130 = getelementptr inbounds double, double* %53, i64 11
%131 = load double, double* %130
%132 = getelementptr inbounds double, double* %53, i64 23
%133 = load double, double* %132
%134 = tail call double @llvm.fmuladd.f64(double %126, double %133, double %131)
%135 = tail call double @llvm.fmuladd.f64(double %126, double %134, double %129)
%136 = load double, double* %5
%137 = tail call double @llvm.fmuladd.f64(double %127, double %135, double %136)
store double %137, double* %5
br label %138
138: ; preds = %72, %124, %52, %6
%139 = phi i32 [ 1, %6 ], [ 0, %52 ], [ 0, %124 ], [ 0, %72 ]
ret i32 %139
}