#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*/ isinf(double);
int /*<<< orphan*/ isnan(double);
void dchisqr_sysrem(double p[], double xi[], int numlc, int numJD, double **mag,
                    double **sig, double *mag_ave, double sigma_clip,
                    double saturation) {
  int j, k;
  int n, num;
  long double S;
  num = 0;
  for (n = 1; n <= numlc + numJD; n++) {
    S = 0;
    if (n <= numlc) {
      j = n - 1;
      for (k = 0; k < numJD; k++) {
        if (!isnan(mag[j][k]) && !isinf(mag[j][k]) && mag[j][k] > saturation &&
            (((mag[j][k] - mag_ave[j]) > 0 ? (mag[j][k] - mag_ave[j])
                                           : (-(mag[j][k] - mag_ave[j]))) /
                     sig[j][k] <
                 sigma_clip ||
             sigma_clip < 0))
          S += -2.0 * (p[numlc + k + 1] *
                       (mag[j][k] - mag_ave[j] - p[n] * p[numlc + k + 1]) /
                       (sig[j][k] * sig[j][k]));
      }
    } else {
      k = n - numlc - 1;
      for (j = 0; j < numlc; j++) {
        if (!isnan(mag[j][k]) && !isinf(mag[j][k]) && mag[j][k] > saturation &&
            (((mag[j][k] - mag_ave[j]) > 0 ? (mag[j][k] - mag_ave[j])
                                           : (-(mag[j][k] - mag_ave[j]))) /
                     sig[j][k] <
                 sigma_clip ||
             sigma_clip < 0))
          S += -2.0 * (p[j + 1] * (mag[j][k] - mag_ave[j] - p[j + 1] * p[n]) /
                       (sig[j][k] * sig[j][k]));
      }
    }
    xi[n] = (double)(S / ((double)numJD * numlc));
  }
}


x86 assembly (clang, -O0):
<dchisqr_sysrem>:
push   %rbp
mov    %rsp,%rbp
sub    $0x90,%rsp
mov    0x10(%rbp),%rax
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
mov    %r8,-0x20(%rbp)
mov    %r9,-0x28(%rbp)
movsd  %xmm0,-0x30(%rbp)
movsd  %xmm1,-0x38(%rbp)
movl   $0x0,-0x48(%rbp)
movl   $0x1,-0x44(%rbp)
mov    -0x44(%rbp),%eax
mov    -0x14(%rbp),%ecx
add    -0x18(%rbp),%ecx
cmp    %ecx,%eax
jg     1597 <dchisqr_sysrem+0x477>
fldz
fstpt  -0x60(%rbp)
mov    -0x44(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     136e <dchisqr_sysrem+0x24e>
mov    -0x44(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x3c(%rbp)
movl   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%eax
cmp    -0x18(%rbp),%eax
jge    1369 <dchisqr_sysrem+0x249>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
call   1030 <isnan@plt>
cmp    $0x0,%eax
jne    1356 <dchisqr_sysrem+0x236>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
call   1040 <isinf@plt>
cmp    $0x0,%eax
jne    1356 <dchisqr_sysrem+0x236>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd -0x38(%rbp),%xmm0
jbe    1356 <dchisqr_sysrem+0x236>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    0x10(%rbp),%rax
movslq -0x3c(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jbe    125f <dchisqr_sysrem+0x13f>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    0x10(%rbp),%rax
movslq -0x3c(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
jmp    12a0 <dchisqr_sysrem+0x180>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    0x10(%rbp),%rax
movslq -0x3c(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
movsd  -0x88(%rbp),%xmm1
ff
mov    -0x28(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
divsd  (%rax,%rcx,8),%xmm1
movsd  -0x30(%rbp),%xmm0
ucomisd %xmm1,%xmm0
ja     12da <dchisqr_sysrem+0x1ba>
xorps  %xmm0,%xmm0
ucomisd -0x30(%rbp),%xmm0
jbe    1356 <dchisqr_sysrem+0x236>
mov    -0x8(%rbp),%rax
mov    -0x14(%rbp),%edx
movslq -0x40(%rbp),%rcx
mov    %ecx,%esi
add    %esi,%edx
movslq %edx,%rdx
movsd  0x8(%rax,%rdx,8),%xmm0
mov    -0x20(%rbp),%rsi
movslq -0x3c(%rbp),%rdx
mov    (%rsi,%rdx,8),%rsi
movsd  (%rsi,%rcx,8),%xmm1
mov    0x10(%rbp),%rsi
movsd  (%rsi,%rdx,8),%xmm2
subsd  %xmm2,%xmm1
movslq -0x44(%rbp),%rsi
movsd  (%rax,%rsi,8),%xmm2
mulsd  %xmm0,%xmm2
subsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
mov    -0x28(%rbp),%rax
mov    (%rax,%rdx,8),%rax
movsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm1,%xmm1
divsd  %xmm1,%xmm0
movsd  0xcbe(%rip),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x80(%rbp)
fldl   -0x80(%rbp)
fldt   -0x60(%rbp)
faddp  %st,%st(1)
fstpt  -0x60(%rbp)
jmp    135b <dchisqr_sysrem+0x23b>
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    118f <dchisqr_sysrem+0x6f>
jmp    1559 <dchisqr_sysrem+0x439>
mov    -0x44(%rbp),%eax
sub    -0x14(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x40(%rbp)
movl   $0x0,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    1554 <dchisqr_sysrem+0x434>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
call   1030 <isnan@plt>
cmp    $0x0,%eax
jne    1541 <dchisqr_sysrem+0x421>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
call   1040 <isinf@plt>
cmp    $0x0,%eax
jne    1541 <dchisqr_sysrem+0x421>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd -0x38(%rbp),%xmm0
jbe    1541 <dchisqr_sysrem+0x421>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    0x10(%rbp),%rax
movslq -0x3c(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jbe    1451 <dchisqr_sysrem+0x331>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    0x10(%rbp),%rax
movslq -0x3c(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x90(%rbp)
ff
jmp    1492 <dchisqr_sysrem+0x372>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    0x10(%rbp),%rax
movslq -0x3c(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x90(%rbp)
ff
movsd  -0x90(%rbp),%xmm1
ff
mov    -0x28(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x40(%rbp),%rcx
divsd  (%rax,%rcx,8),%xmm1
movsd  -0x30(%rbp),%xmm0
ucomisd %xmm1,%xmm0
ja     14cc <dchisqr_sysrem+0x3ac>
xorps  %xmm0,%xmm0
ucomisd -0x30(%rbp),%xmm0
jbe    1541 <dchisqr_sysrem+0x421>
mov    -0x8(%rbp),%rax
movslq -0x3c(%rbp),%rdx
movsd  0x8(%rax,%rdx,8),%xmm0
mov    -0x20(%rbp),%rcx
mov    (%rcx,%rdx,8),%rsi
movslq -0x40(%rbp),%rcx
movsd  (%rsi,%rcx,8),%xmm1
mov    0x10(%rbp),%rsi
movsd  (%rsi,%rdx,8),%xmm2
subsd  %xmm2,%xmm1
movslq -0x44(%rbp),%rsi
movsd  (%rax,%rsi,8),%xmm3
movaps %xmm0,%xmm2
mulsd  %xmm3,%xmm2
subsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
mov    -0x28(%rbp),%rax
mov    (%rax,%rdx,8),%rax
movsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm1,%xmm1
divsd  %xmm1,%xmm0
movsd  0xad3(%rip),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x68(%rbp)
fldl   -0x68(%rbp)
fldt   -0x60(%rbp)
faddp  %st,%st(1)
fstpt  -0x60(%rbp)
jmp    1546 <dchisqr_sysrem+0x426>
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    1381 <dchisqr_sysrem+0x261>
jmp    1559 <dchisqr_sysrem+0x439>
fldt   -0x60(%rbp)
cvtsi2sdl -0x18(%rbp),%xmm0
cvtsi2sdl -0x14(%rbp),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x70(%rbp)
fldl   -0x70(%rbp)
fdivrp %st,%st(1)
fstpl  -0x78(%rbp)
movsd  -0x78(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x44(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x44(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x44(%rbp)
jmp    115d <dchisqr_sysrem+0x3d>
add    $0x90,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<dchisqr_sysrem>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0xa8,%rsp
movsd  %xmm1,0x50(%rsp)
mov    %r9,0x48(%rsp)
mov    %rsi,0x70(%rsp)
mov    %rdi,0x38(%rsp)
mov    %rcx,%rax
mov    %rcx,0x30(%rsp)
mov    %rdx,0x28(%rsp)
lea    (%rcx,%rdx,1),%eax
mov    %rax,0x10(%rsp)
test   %eax,%eax
jle    1465 <dchisqr_sysrem+0x345>
mov    %r8,%r13
mov    0x28(%rsp),%rcx
mov    %ecx,%edx
mov    0x30(%rsp),%rax
cvtsi2sd %eax,%xmm2
not    %edx
mov    %rdx,0x58(%rsp)
xorps  %xmm1,%xmm1
cvtsi2sd %ecx,%xmm1
mulsd  %xmm2,%xmm1
movsd  %xmm1,0x90(%rsp)
fldl   0x90(%rsp)
fstpt  0x9c(%rsp)
movslq %ecx,%rdx
mov    0x10(%rsp),%rcx
add    $0x1,%ecx
mov    %rcx,0x10(%rsp)
mov    %eax,%eax
mov    %rax,0x78(%rsp)
mov    %edx,%r12d
mov    %rdx,0x68(%rsp)
lea    0x1(%rdx),%eax
mov    %rax,0x60(%rsp)
mov    $0x1,%r15d
fldz
fstpt  0x1c(%rsp)
movsd  %xmm0,0x40(%rsp)
jmp    1205 <dchisqr_sysrem+0xe5>
nopw   0x0(%rax,%rax,1)
fldt   0x9c(%rsp)
fldt   0x4(%rsp)
fdivp  %st,%st(1)
mov    0x70(%rsp),%rax
fstpl  (%rax,%r15,8)
add    $0x1,%r15
cmp    0x10(%rsp),%r15
je     1465 <dchisqr_sysrem+0x345>
cmp    0x68(%rsp),%r15
jle    1240 <dchisqr_sysrem+0x120>
fldt   0x1c(%rsp)
fstpt  0x4(%rsp)
cmpl   $0x0,0x28(%rsp)
jle    11e0 <dchisqr_sysrem+0xc0>
mov    0x58(%rsp),%rax
add    %r15d,%eax
movslq %eax,%rbp
xor    %ebx,%ebx
fldt   0x1c(%rsp)
fstpt  0x4(%rsp)
jmp    12bd <dchisqr_sysrem+0x19d>
cs nopw 0x0(%rax,%rax,1)
nop
fldt   0x1c(%rsp)
fstpt  0x4(%rsp)
cmpl   $0x0,0x30(%rsp)
jle    11e0 <dchisqr_sysrem+0xc0>
xor    %r14d,%r14d
fldt   0x1c(%rsp)
fstpt  0x4(%rsp)
jmp    13bf <dchisqr_sysrem+0x29f>
mov    0x38(%rsp),%rax
movsd  0x8(%rax,%rbx,8),%xmm2
movsd  (%rax,%r15,8),%xmm3
mulsd  %xmm2,%xmm3
subsd  %xmm3,%xmm0
mulsd  %xmm2,%xmm0
mulsd  %xmm1,%xmm1
divsd  %xmm1,%xmm0
mulsd  0xd84(%rip),%xmm0
movsd  %xmm0,0x80(%rsp)
fldt   0x4(%rsp)
faddl  0x80(%rsp)
fstpt  0x4(%rsp)
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    $0x1,%rbx
cmp    %rbx,%r12
je     11e0 <dchisqr_sysrem+0xc0>
mov    0x0(%r13,%rbx,8),%rax
movsd  (%rax,%rbp,8),%xmm0
call   1030 <isnan@plt>
test   %eax,%eax
jne    12b0 <dchisqr_sysrem+0x190>
mov    0x0(%r13,%rbx,8),%rax
movsd  (%rax,%rbp,8),%xmm0
call   1040 <isinf@plt>
test   %eax,%eax
jne    12b0 <dchisqr_sysrem+0x190>
mov    0x0(%r13,%rbx,8),%rax
movsd  (%rax,%rbp,8),%xmm0
ucomisd 0x50(%rsp),%xmm0
jbe    12b0 <dchisqr_sysrem+0x190>
movsd  0x40(%rsp),%xmm5
xorpd  %xmm1,%xmm1
ucomisd %xmm5,%xmm1
mov    0xe0(%rsp),%rax
subsd  (%rax,%rbx,8),%xmm0
mov    0x48(%rsp),%rax
mov    (%rax,%rbx,8),%rax
movsd  (%rax,%rbp,8),%xmm1
ja     125f <dchisqr_sysrem+0x13f>
movapd %xmm0,%xmm2
xorpd  0xcd0(%rip),%xmm2
xorpd  %xmm3,%xmm3
cmpltsd %xmm0,%xmm3
movapd %xmm3,%xmm4
andpd  %xmm0,%xmm4
andnpd %xmm2,%xmm3
orpd   %xmm4,%xmm3
divsd  %xmm1,%xmm3
ucomisd %xmm3,%xmm5
jbe    12b0 <dchisqr_sysrem+0x190>
jmp    125f <dchisqr_sysrem+0x13f>
mov    0x60(%rsp),%rax
add    %r14d,%eax
cltq
mov    0x38(%rsp),%rcx
movsd  (%rcx,%rax,8),%xmm2
movsd  (%rcx,%r15,8),%xmm3
mulsd  %xmm2,%xmm3
subsd  %xmm3,%xmm0
mulsd  %xmm2,%xmm0
mulsd  %xmm1,%xmm1
divsd  %xmm1,%xmm0
mulsd  0xc7e(%rip),%xmm0
movsd  %xmm0,0x88(%rsp)
fldt   0x4(%rsp)
faddl  0x88(%rsp)
fstpt  0x4(%rsp)
nopw   0x0(%rax,%rax,1)
add    $0x1,%r14
cmp    %r14,0x78(%rsp)
je     11e0 <dchisqr_sysrem+0xc0>
mov    -0x8(%r13,%r15,8),%rax
movsd  (%rax,%r14,8),%xmm0
call   1030 <isnan@plt>
test   %eax,%eax
jne    13b0 <dchisqr_sysrem+0x290>
mov    -0x8(%r13,%r15,8),%rax
movsd  (%rax,%r14,8),%xmm0
call   1040 <isinf@plt>
test   %eax,%eax
jne    13b0 <dchisqr_sysrem+0x290>
mov    -0x8(%r13,%r15,8),%rax
movsd  (%rax,%r14,8),%xmm0
ucomisd 0x50(%rsp),%xmm0
jbe    13b0 <dchisqr_sysrem+0x290>
movsd  0x40(%rsp),%xmm5
xorpd  %xmm1,%xmm1
ucomisd %xmm5,%xmm1
mov    0xe0(%rsp),%rax
subsd  -0x8(%rax,%r15,8),%xmm0
mov    0x48(%rsp),%rax
mov    -0x8(%rax,%r15,8),%rax
movsd  (%rax,%r14,8),%xmm1
ja     135c <dchisqr_sysrem+0x23c>
movapd %xmm0,%xmm2
xorpd  0xbc7(%rip),%xmm2
xorpd  %xmm3,%xmm3
cmpltsd %xmm0,%xmm3
movapd %xmm3,%xmm4
andpd  %xmm0,%xmm4
andnpd %xmm2,%xmm3
orpd   %xmm4,%xmm3
divsd  %xmm1,%xmm3
ucomisd %xmm3,%xmm5
jbe    13b0 <dchisqr_sysrem+0x290>
jmp    135c <dchisqr_sysrem+0x23c>
add    $0xa8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @dchisqr_sysrem(double* %0, double* %1, i32 %2, i32 %3, double** %4, double** %5, double* %6, double %7, double %8) {
%10 = alloca double*
%11 = alloca double*
%12 = alloca i32
%13 = alloca i32
%14 = alloca double**
%15 = alloca double**
%16 = alloca double*
%17 = alloca double
%18 = alloca double
%19 = alloca i32
%20 = alloca i32
%21 = alloca i32
%22 = alloca i32
%23 = alloca x86_fp80
store double* %0, double** %10
store double* %1, double** %11
store i32 %2, i32* %12
store i32 %3, i32* %13
store double** %4, double*** %14
store double** %5, double*** %15
store double* %6, double** %16
store double %7, double* %17
store double %8, double* %18
store i32 0, i32* %22
store i32 1, i32* %21
br label %24
24: ; preds = %404, %9
%25 = load i32, i32* %21
%26 = load i32, i32* %12
%27 = load i32, i32* %13
%28 = add nsw i32 %26, %27
%29 = icmp sle i32 %25, %28
br i1 %29, label %30, label %407
30: ; preds = %24
store x86_fp80 0xK00000000000000000000, x86_fp80* %23
%31 = load i32, i32* %21
%32 = load i32, i32* %12
%33 = icmp sle i32 %31, %32
br i1 %33, label %34, label %213
34: ; preds = %30
%35 = load i32, i32* %21
%36 = sub nsw i32 %35, 1
store i32 %36, i32* %19
store i32 0, i32* %20
br label %37
37: ; preds = %209, %34
%38 = load i32, i32* %20
%39 = load i32, i32* %13
%40 = icmp slt i32 %38, %39
br i1 %40, label %41, label %212
41: ; preds = %37
%42 = load double**, double*** %14
%43 = load i32, i32* %19
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds double*, double** %42, i64 %44
%46 = load double*, double** %45
%47 = load i32, i32* %20
%48 = sext i32 %47 to i64
%49 = getelementptr inbounds double, double* %46, i64 %48
%50 = load double, double* %49
%51 = call i32 @isnan(double %50)
%52 = icmp ne i32 %51, 0
br i1 %52, label %208, label %53
53: ; preds = %41
%54 = load double**, double*** %14
%55 = load i32, i32* %19
%56 = sext i32 %55 to i64
%57 = getelementptr inbounds double*, double** %54, i64 %56
%58 = load double*, double** %57
%59 = load i32, i32* %20
%60 = sext i32 %59 to i64
%61 = getelementptr inbounds double, double* %58, i64 %60
%62 = load double, double* %61
%63 = call i32 @isinf(double %62)
%64 = icmp ne i32 %63, 0
br i1 %64, label %208, label %65
65: ; preds = %53
%66 = load double**, double*** %14
%67 = load i32, i32* %19
%68 = sext i32 %67 to i64
%69 = getelementptr inbounds double*, double** %66, i64 %68
%70 = load double*, double** %69
%71 = load i32, i32* %20
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds double, double* %70, i64 %72
%74 = load double, double* %73
%75 = load double, double* %18
%76 = fcmp ogt double %74, %75
br i1 %76, label %77, label %208
77: ; preds = %65
%78 = load double**, double*** %14
%79 = load i32, i32* %19
%80 = sext i32 %79 to i64
%81 = getelementptr inbounds double*, double** %78, i64 %80
%82 = load double*, double** %81
%83 = load i32, i32* %20
%84 = sext i32 %83 to i64
%85 = getelementptr inbounds double, double* %82, i64 %84
%86 = load double, double* %85
%87 = load double*, double** %16
%88 = load i32, i32* %19
%89 = sext i32 %88 to i64
%90 = getelementptr inbounds double, double* %87, i64 %89
%91 = load double, double* %90
%92 = fsub double %86, %91
%93 = fcmp ogt double %92, 0.000000e+00
br i1 %93, label %94, label %110
94: ; preds = %77
%95 = load double**, double*** %14
%96 = load i32, i32* %19
%97 = sext i32 %96 to i64
%98 = getelementptr inbounds double*, double** %95, i64 %97
%99 = load double*, double** %98
%100 = load i32, i32* %20
%101 = sext i32 %100 to i64
%102 = getelementptr inbounds double, double* %99, i64 %101
%103 = load double, double* %102
%104 = load double*, double** %16
%105 = load i32, i32* %19
%106 = sext i32 %105 to i64
%107 = getelementptr inbounds double, double* %104, i64 %106
%108 = load double, double* %107
%109 = fsub double %103, %108
br label %127
110: ; preds = %77
%111 = load double**, double*** %14
%112 = load i32, i32* %19
%113 = sext i32 %112 to i64
%114 = getelementptr inbounds double*, double** %111, i64 %113
%115 = load double*, double** %114
%116 = load i32, i32* %20
%117 = sext i32 %116 to i64
%118 = getelementptr inbounds double, double* %115, i64 %117
%119 = load double, double* %118
%120 = load double*, double** %16
%121 = load i32, i32* %19
%122 = sext i32 %121 to i64
%123 = getelementptr inbounds double, double* %120, i64 %122
%124 = load double, double* %123
%125 = fsub double %119, %124
%126 = fneg double %125
br label %127
127: ; preds = %110, %94
%128 = phi double [ %109, %94 ], [ %126, %110 ]
%129 = load double**, double*** %15
%130 = load i32, i32* %19
%131 = sext i32 %130 to i64
%132 = getelementptr inbounds double*, double** %129, i64 %131
%133 = load double*, double** %132
%134 = load i32, i32* %20
%135 = sext i32 %134 to i64
%136 = getelementptr inbounds double, double* %133, i64 %135
%137 = load double, double* %136
%138 = fdiv double %128, %137
%139 = load double, double* %17
%140 = fcmp olt double %138, %139
br i1 %140, label %144, label %141
141: ; preds = %127
%142 = load double, double* %17
%143 = fcmp olt double %142, 0.000000e+00
br i1 %143, label %144, label %208
144: ; preds = %141, %127
%145 = load double*, double** %10
%146 = load i32, i32* %12
%147 = load i32, i32* %20
%148 = add nsw i32 %146, %147
%149 = add nsw i32 %148, 1
%150 = sext i32 %149 to i64
%151 = getelementptr inbounds double, double* %145, i64 %150
%152 = load double, double* %151
%153 = load double**, double*** %14
%154 = load i32, i32* %19
%155 = sext i32 %154 to i64
%156 = getelementptr inbounds double*, double** %153, i64 %155
%157 = load double*, double** %156
%158 = load i32, i32* %20
%159 = sext i32 %158 to i64
%160 = getelementptr inbounds double, double* %157, i64 %159
%161 = load double, double* %160
%162 = load double*, double** %16
%163 = load i32, i32* %19
%164 = sext i32 %163 to i64
%165 = getelementptr inbounds double, double* %162, i64 %164
%166 = load double, double* %165
%167 = fsub double %161, %166
%168 = load double*, double** %10
%169 = load i32, i32* %21
%170 = sext i32 %169 to i64
%171 = getelementptr inbounds double, double* %168, i64 %170
%172 = load double, double* %171
%173 = load double*, double** %10
%174 = load i32, i32* %12
%175 = load i32, i32* %20
%176 = add nsw i32 %174, %175
%177 = add nsw i32 %176, 1
%178 = sext i32 %177 to i64
%179 = getelementptr inbounds double, double* %173, i64 %178
%180 = load double, double* %179
%181 = fneg double %172
%182 = call double @llvm.fmuladd.f64(double %181, double %180, double %167)
%183 = fmul double %152, %182
%184 = load double**, double*** %15
%185 = load i32, i32* %19
%186 = sext i32 %185 to i64
%187 = getelementptr inbounds double*, double** %184, i64 %186
%188 = load double*, double** %187
%189 = load i32, i32* %20
%190 = sext i32 %189 to i64
%191 = getelementptr inbounds double, double* %188, i64 %190
%192 = load double, double* %191
%193 = load double**, double*** %15
%194 = load i32, i32* %19
%195 = sext i32 %194 to i64
%196 = getelementptr inbounds double*, double** %193, i64 %195
%197 = load double*, double** %196
%198 = load i32, i32* %20
%199 = sext i32 %198 to i64
%200 = getelementptr inbounds double, double* %197, i64 %199
%201 = load double, double* %200
%202 = fmul double %192, %201
%203 = fdiv double %183, %202
%204 = fmul double -2.000000e+00, %203
%205 = fpext double %204 to x86_fp80
%206 = load x86_fp80, x86_fp80* %23
%207 = fadd x86_fp80 %206, %205
store x86_fp80 %207, x86_fp80* %23
br label %208
208: ; preds = %144, %141, %65, %53, %41
br label %209
209: ; preds = %208
%210 = load i32, i32* %20
%211 = add nsw i32 %210, 1
store i32 %211, i32* %20
br label %37
212: ; preds = %37
br label %390
213: ; preds = %30
%214 = load i32, i32* %21
%215 = load i32, i32* %12
%216 = sub nsw i32 %214, %215
%217 = sub nsw i32 %216, 1
store i32 %217, i32* %20
store i32 0, i32* %19
br label %218
218: ; preds = %386, %213
%219 = load i32, i32* %19
%220 = load i32, i32* %12
%221 = icmp slt i32 %219, %220
br i1 %221, label %222, label %389
222: ; preds = %218
%223 = load double**, double*** %14
%224 = load i32, i32* %19
%225 = sext i32 %224 to i64
%226 = getelementptr inbounds double*, double** %223, i64 %225
%227 = load double*, double** %226
%228 = load i32, i32* %20
%229 = sext i32 %228 to i64
%230 = getelementptr inbounds double, double* %227, i64 %229
%231 = load double, double* %230
%232 = call i32 @isnan(double %231)
%233 = icmp ne i32 %232, 0
br i1 %233, label %385, label %234
234: ; preds = %222
%235 = load double**, double*** %14
%236 = load i32, i32* %19
%237 = sext i32 %236 to i64
%238 = getelementptr inbounds double*, double** %235, i64 %237
%239 = load double*, double** %238
%240 = load i32, i32* %20
%241 = sext i32 %240 to i64
%242 = getelementptr inbounds double, double* %239, i64 %241
%243 = load double, double* %242
%244 = call i32 @isinf(double %243)
%245 = icmp ne i32 %244, 0
br i1 %245, label %385, label %246
246: ; preds = %234
%247 = load double**, double*** %14
%248 = load i32, i32* %19
%249 = sext i32 %248 to i64
%250 = getelementptr inbounds double*, double** %247, i64 %249
%251 = load double*, double** %250
%252 = load i32, i32* %20
%253 = sext i32 %252 to i64
%254 = getelementptr inbounds double, double* %251, i64 %253
%255 = load double, double* %254
%256 = load double, double* %18
%257 = fcmp ogt double %255, %256
br i1 %257, label %258, label %385
258: ; preds = %246
%259 = load double**, double*** %14
%260 = load i32, i32* %19
%261 = sext i32 %260 to i64
%262 = getelementptr inbounds double*, double** %259, i64 %261
%263 = load double*, double** %262
%264 = load i32, i32* %20
%265 = sext i32 %264 to i64
%266 = getelementptr inbounds double, double* %263, i64 %265
%267 = load double, double* %266
%268 = load double*, double** %16
%269 = load i32, i32* %19
%270 = sext i32 %269 to i64
%271 = getelementptr inbounds double, double* %268, i64 %270
%272 = load double, double* %271
%273 = fsub double %267, %272
%274 = fcmp ogt double %273, 0.000000e+00
br i1 %274, label %275, label %291
275: ; preds = %258
%276 = load double**, double*** %14
%277 = load i32, i32* %19
%278 = sext i32 %277 to i64
%279 = getelementptr inbounds double*, double** %276, i64 %278
%280 = load double*, double** %279
%281 = load i32, i32* %20
%282 = sext i32 %281 to i64
%283 = getelementptr inbounds double, double* %280, i64 %282
%284 = load double, double* %283
%285 = load double*, double** %16
%286 = load i32, i32* %19
%287 = sext i32 %286 to i64
%288 = getelementptr inbounds double, double* %285, i64 %287
%289 = load double, double* %288
%290 = fsub double %284, %289
br label %308
291: ; preds = %258
%292 = load double**, double*** %14
%293 = load i32, i32* %19
%294 = sext i32 %293 to i64
%295 = getelementptr inbounds double*, double** %292, i64 %294
%296 = load double*, double** %295
%297 = load i32, i32* %20
%298 = sext i32 %297 to i64
%299 = getelementptr inbounds double, double* %296, i64 %298
%300 = load double, double* %299
%301 = load double*, double** %16
%302 = load i32, i32* %19
%303 = sext i32 %302 to i64
%304 = getelementptr inbounds double, double* %301, i64 %303
%305 = load double, double* %304
%306 = fsub double %300, %305
%307 = fneg double %306
br label %308
308: ; preds = %291, %275
%309 = phi double [ %290, %275 ], [ %307, %291 ]
%310 = load double**, double*** %15
%311 = load i32, i32* %19
%312 = sext i32 %311 to i64
%313 = getelementptr inbounds double*, double** %310, i64 %312
%314 = load double*, double** %313
%315 = load i32, i32* %20
%316 = sext i32 %315 to i64
%317 = getelementptr inbounds double, double* %314, i64 %316
%318 = load double, double* %317
%319 = fdiv double %309, %318
%320 = load double, double* %17
%321 = fcmp olt double %319, %320
br i1 %321, label %325, label %322
322: ; preds = %308
%323 = load double, double* %17
%324 = fcmp olt double %323, 0.000000e+00
br i1 %324, label %325, label %385
325: ; preds = %322, %308
%326 = load double*, double** %10
%327 = load i32, i32* %19
%328 = add nsw i32 %327, 1
%329 = sext i32 %328 to i64
%330 = getelementptr inbounds double, double* %326, i64 %329
%331 = load double, double* %330
%332 = load double**, double*** %14
%333 = load i32, i32* %19
%334 = sext i32 %333 to i64
%335 = getelementptr inbounds double*, double** %332, i64 %334
%336 = load double*, double** %335
%337 = load i32, i32* %20
%338 = sext i32 %337 to i64
%339 = getelementptr inbounds double, double* %336, i64 %338
%340 = load double, double* %339
%341 = load double*, double** %16
%342 = load i32, i32* %19
%343 = sext i32 %342 to i64
%344 = getelementptr inbounds double, double* %341, i64 %343
%345 = load double, double* %344
%346 = fsub double %340, %345
%347 = load double*, double** %10
%348 = load i32, i32* %19
%349 = add nsw i32 %348, 1
%350 = sext i32 %349 to i64
%351 = getelementptr inbounds double, double* %347, i64 %350
%352 = load double, double* %351
%353 = load double*, double** %10
%354 = load i32, i32* %21
%355 = sext i32 %354 to i64
%356 = getelementptr inbounds double, double* %353, i64 %355
%357 = load double, double* %356
%358 = fneg double %352
%359 = call double @llvm.fmuladd.f64(double %358, double %357, double %346)
%360 = fmul double %331, %359
%361 = load double**, double*** %15
%362 = load i32, i32* %19
%363 = sext i32 %362 to i64
%364 = getelementptr inbounds double*, double** %361, i64 %363
%365 = load double*, double** %364
%366 = load i32, i32* %20
%367 = sext i32 %366 to i64
%368 = getelementptr inbounds double, double* %365, i64 %367
%369 = load double, double* %368
%370 = load double**, double*** %15
%371 = load i32, i32* %19
%372 = sext i32 %371 to i64
%373 = getelementptr inbounds double*, double** %370, i64 %372
%374 = load double*, double** %373
%375 = load i32, i32* %20
%376 = sext i32 %375 to i64
%377 = getelementptr inbounds double, double* %374, i64 %376
%378 = load double, double* %377
%379 = fmul double %369, %378
%380 = fdiv double %360, %379
%381 = fmul double -2.000000e+00, %380
%382 = fpext double %381 to x86_fp80
%383 = load x86_fp80, x86_fp80* %23
%384 = fadd x86_fp80 %383, %382
store x86_fp80 %384, x86_fp80* %23
br label %385
385: ; preds = %325, %322, %246, %234, %222
br label %386
386: ; preds = %385
%387 = load i32, i32* %19
%388 = add nsw i32 %387, 1
store i32 %388, i32* %19
br label %218
389: ; preds = %218
br label %390
390: ; preds = %389, %212
%391 = load x86_fp80, x86_fp80* %23
%392 = load i32, i32* %13
%393 = sitofp i32 %392 to double
%394 = load i32, i32* %12
%395 = sitofp i32 %394 to double
%396 = fmul double %393, %395
%397 = fpext double %396 to x86_fp80
%398 = fdiv x86_fp80 %391, %397
%399 = fptrunc x86_fp80 %398 to double
%400 = load double*, double** %11
%401 = load i32, i32* %21
%402 = sext i32 %401 to i64
%403 = getelementptr inbounds double, double* %400, i64 %402
store double %399, double* %403
br label %404
404: ; preds = %390
%405 = load i32, i32* %21
%406 = add nsw i32 %405, 1
store i32 %406, i32* %21
br label %24
407: ; preds = %24
ret void
}

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