#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
double kernel_estimate(long, double, double, double);
void KDE(long Nsamp, long Ndim, long *KDEtype, double *h, double *samples,
         double *pdf) {
  long i, j, k, ind, idx;
  double KDE_1D;
  for (k = 0; k < Nsamp; k++) {
    pdf[k] = 0.0;
    for (i = 0; i < Nsamp; i++) {
      if (k != i) {
        for (j = 0; j < Ndim; j++) {
          KDE_1D = 0.0;
          idx = i * Ndim + j;
          ind = k * Ndim + j;
          if (KDE_1D == 0.0) {
            KDE_1D =
                kernel_estimate(KDEtype[j], h[j], samples[ind], samples[idx]);
          } else {
            KDE_1D *=
                kernel_estimate(KDEtype[j], h[j], samples[ind], samples[idx]);
          }
        }
        pdf[k] += KDE_1D;
      }
    }
    pdf[k] *= 1.0 / (double)Nsamp;
  }
}


x86 assembly (clang, -O0):
<KDE>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
movq   $0x0,-0x48(%rbp)
mov    -0x48(%rbp),%rax
cmp    -0x8(%rbp),%rax
jge    12ce <KDE+0x1be>
mov    -0x30(%rbp),%rax
mov    -0x48(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x8(%rbp),%rax
jge    1299 <KDE+0x189>
mov    -0x48(%rbp),%rax
cmp    -0x38(%rbp),%rax
je     1283 <KDE+0x173>
movq   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    126c <KDE+0x15c>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x60(%rbp)
mov    -0x38(%rbp),%rax
imul   -0x10(%rbp),%rax
add    -0x40(%rbp),%rax
mov    %rax,-0x58(%rbp)
mov    -0x48(%rbp),%rax
imul   -0x10(%rbp),%rax
add    -0x40(%rbp),%rax
mov    %rax,-0x50(%rbp)
movsd  -0x60(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    1214 <KDE+0x104>
jp     1214 <KDE+0x104>
mov    -0x18(%rbp),%rax
mov    -0x40(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
mov    -0x20(%rbp),%rax
mov    -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x50(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
mov    -0x28(%rbp),%rax
mov    -0x58(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
call   1030 <kernel_estimate@plt>
movsd  %xmm0,-0x60(%rbp)
jmp    1256 <KDE+0x146>
mov    -0x18(%rbp),%rax
mov    -0x40(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
mov    -0x20(%rbp),%rax
mov    -0x40(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x28(%rbp),%rax
mov    -0x50(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
mov    -0x28(%rbp),%rax
mov    -0x58(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
call   1030 <kernel_estimate@plt>
mulsd  -0x60(%rbp),%xmm0
movsd  %xmm0,-0x60(%rbp)
jmp    125b <KDE+0x14b>
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x40(%rbp)
jmp    1182 <KDE+0x72>
movsd  -0x60(%rbp),%xmm0
mov    -0x30(%rbp),%rax
mov    -0x48(%rbp),%rcx
addsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
jmp    1288 <KDE+0x178>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    115e <KDE+0x4e>
cvtsi2sdq -0x8(%rbp),%xmm1
movsd  0xd59(%rip),%xmm0
divsd  %xmm1,%xmm0
mov    -0x30(%rbp),%rax
mov    -0x48(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x48(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x48(%rbp)
jmp    1138 <KDE+0x28>
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<KDE>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %r8,(%rsp)
test   %rdi,%rdi
jle    1235 <KDE+0x125>
mov    %rcx,%r13
cvtsi2sd %rdi,%xmm0
movsd  0xec5(%rip),%xmm1
divsd  %xmm0,%xmm1
movsd  %xmm1,0x8(%rsp)
lea    0x0(,%rsi,8),%r8
xor    %ebp,%ebp
mov    (%rsp),%r15
mov    %r9,0x20(%rsp)
mov    %rdi,0x18(%rsp)
mov    %r8,0x10(%rsp)
jmp    118c <KDE+0x7c>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
mulsd  0x8(%rsp),%xmm1
movsd  %xmm1,(%r9,%rbp,8)
add    $0x1,%rbp
add    %r8,%r15
cmp    %rdi,%rbp
je     1235 <KDE+0x125>
movq   $0x0,(%r9,%rbp,8)
xorpd  %xmm1,%xmm1
mov    (%rsp),%r14
xor    %ebx,%ebx
mov    %rbp,0x28(%rsp)
jmp    11c6 <KDE+0xb6>
cs nopw 0x0(%rax,%rax,1)
nop
addsd  %xmm0,%xmm1
movsd  %xmm1,(%r9,%rbp,8)
add    $0x1,%rbx
add    %r8,%r14
cmp    %rdi,%rbx
je     1170 <KDE+0x60>
cmp    %rbx,%rbp
je     11ba <KDE+0xaa>
test   %rsi,%rsi
jle    11b0 <KDE+0xa0>
mov    %rbx,0x30(%rsp)
xor    %r12d,%r12d
nopl   0x0(%rax,%rax,1)
mov    (%rdx,%r12,8),%rdi
movsd  0x0(%r13,%r12,8),%xmm0
movsd  (%r15,%r12,8),%xmm1
movsd  (%r14,%r12,8),%xmm2
mov    %rdx,%rbx
mov    %rsi,%rbp
call   1030 <kernel_estimate@plt>
mov    %rbp,%rsi
mov    %rbx,%rdx
add    $0x1,%r12
cmp    %r12,%rbp
jne    11e0 <KDE+0xd0>
mov    0x20(%rsp),%r9
mov    0x28(%rsp),%rbp
movsd  (%r9,%rbp,8),%xmm1
mov    0x18(%rsp),%rdi
mov    0x10(%rsp),%r8
mov    0x30(%rsp),%rbx
jmp    11b0 <KDE+0xa0>
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @KDE(i64 %0, i64 %1, i64* %2, double* %3, double* %4, double* %5) {
%7 = alloca i64
%8 = alloca i64
%9 = alloca i64*
%10 = alloca double*
%11 = alloca double*
%12 = alloca double*
%13 = alloca i64
%14 = alloca i64
%15 = alloca i64
%16 = alloca i64
%17 = alloca i64
%18 = alloca double
store i64 %0, i64* %7
store i64 %1, i64* %8
store i64* %2, i64** %9
store double* %3, double** %10
store double* %4, double** %11
store double* %5, double** %12
store i64 0, i64* %15
br label %19
19: ; preds = %115, %6
%20 = load i64, i64* %15
%21 = load i64, i64* %7
%22 = icmp slt i64 %20, %21
br i1 %22, label %23, label %118
23: ; preds = %19
%24 = load double*, double** %12
%25 = load i64, i64* %15
%26 = getelementptr inbounds double, double* %24, i64 %25
store double 0.000000e+00, double* %26
store i64 0, i64* %13
br label %27
27: ; preds = %103, %23
%28 = load i64, i64* %13
%29 = load i64, i64* %7
%30 = icmp slt i64 %28, %29
br i1 %30, label %31, label %106
31: ; preds = %27
%32 = load i64, i64* %15
%33 = load i64, i64* %13
%34 = icmp ne i64 %32, %33
br i1 %34, label %35, label %102
35: ; preds = %31
store i64 0, i64* %14
br label %36
36: ; preds = %92, %35
%37 = load i64, i64* %14
%38 = load i64, i64* %8
%39 = icmp slt i64 %37, %38
br i1 %39, label %40, label %95
40: ; preds = %36
store double 0.000000e+00, double* %18
%41 = load i64, i64* %13
%42 = load i64, i64* %8
%43 = mul nsw i64 %41, %42
%44 = load i64, i64* %14
%45 = add nsw i64 %43, %44
store i64 %45, i64* %17
%46 = load i64, i64* %15
%47 = load i64, i64* %8
%48 = mul nsw i64 %46, %47
%49 = load i64, i64* %14
%50 = add nsw i64 %48, %49
store i64 %50, i64* %16
%51 = load double, double* %18
%52 = fcmp oeq double %51, 0.000000e+00
br i1 %52, label %53, label %71
53: ; preds = %40
%54 = load i64*, i64** %9
%55 = load i64, i64* %14
%56 = getelementptr inbounds i64, i64* %54, i64 %55
%57 = load i64, i64* %56
%58 = load double*, double** %10
%59 = load i64, i64* %14
%60 = getelementptr inbounds double, double* %58, i64 %59
%61 = load double, double* %60
%62 = load double*, double** %11
%63 = load i64, i64* %16
%64 = getelementptr inbounds double, double* %62, i64 %63
%65 = load double, double* %64
%66 = load double*, double** %11
%67 = load i64, i64* %17
%68 = getelementptr inbounds double, double* %66, i64 %67
%69 = load double, double* %68
%70 = call double @kernel_estimate(i64 %57, double %61, double %65, double %69)
store double %70, double* %18
br label %91
71: ; preds = %40
%72 = load i64*, i64** %9
%73 = load i64, i64* %14
%74 = getelementptr inbounds i64, i64* %72, i64 %73
%75 = load i64, i64* %74
%76 = load double*, double** %10
%77 = load i64, i64* %14
%78 = getelementptr inbounds double, double* %76, i64 %77
%79 = load double, double* %78
%80 = load double*, double** %11
%81 = load i64, i64* %16
%82 = getelementptr inbounds double, double* %80, i64 %81
%83 = load double, double* %82
%84 = load double*, double** %11
%85 = load i64, i64* %17
%86 = getelementptr inbounds double, double* %84, i64 %85
%87 = load double, double* %86
%88 = call double @kernel_estimate(i64 %75, double %79, double %83, double %87)
%89 = load double, double* %18
%90 = fmul double %89, %88
store double %90, double* %18
br label %91
91: ; preds = %71, %53
br label %92
92: ; preds = %91
%93 = load i64, i64* %14
%94 = add nsw i64 %93, 1
store i64 %94, i64* %14
br label %36
95: ; preds = %36
%96 = load double, double* %18
%97 = load double*, double** %12
%98 = load i64, i64* %15
%99 = getelementptr inbounds double, double* %97, i64 %98
%100 = load double, double* %99
%101 = fadd double %100, %96
store double %101, double* %99
br label %102
102: ; preds = %95, %31
br label %103
103: ; preds = %102
%104 = load i64, i64* %13
%105 = add nsw i64 %104, 1
store i64 %105, i64* %13
br label %27
106: ; preds = %27
%107 = load i64, i64* %7
%108 = sitofp i64 %107 to double
%109 = fdiv double 1.000000e+00, %108
%110 = load double*, double** %12
%111 = load i64, i64* %15
%112 = getelementptr inbounds double, double* %110, i64 %111
%113 = load double, double* %112
%114 = fmul double %113, %109
store double %114, double* %112
br label %115
115: ; preds = %106
%116 = load i64, i64* %15
%117 = add nsw i64 %116, 1
store i64 %117, i64* %15
br label %19
118: ; preds = %19
ret void
}

LLVM IR (-O2):
define void @KDE(i64 %0, i64 %1, i64* nocapture %2, double* nocapture %3, double* nocapture %4, double* nocapture %5) {
%7 = icmp sgt i64 %0, 0
br i1 %7, label %8, label %55
8: ; preds = %6
%9 = icmp sgt i64 %1, 0
%10 = sitofp i64 %0 to double
%11 = fdiv double 1.000000e+00, %10
br label %12
12: ; preds = %51, %8
%13 = phi double [ undef, %8 ], [ %48, %51 ]
%14 = phi i64 [ 0, %8 ], [ %53, %51 ]
%15 = getelementptr inbounds double, double* %5, i64 %14
store double 0.000000e+00, double* %15
%16 = mul nsw i64 %14, %1
br label %17
17: ; preds = %12, %46
%18 = phi double [ 0.000000e+00, %12 ], [ %47, %46 ]
%19 = phi double [ %13, %12 ], [ %48, %46 ]
%20 = phi i64 [ 0, %12 ], [ %49, %46 ]
%21 = icmp eq i64 %14, %20
br i1 %21, label %46, label %22
22: ; preds = %17
br i1 %9, label %23, label %42
23: ; preds = %22
%24 = mul nsw i64 %20, %1
br label %25
25: ; preds = %23, %25
%26 = phi i64 [ 0, %23 ], [ %38, %25 ]
%27 = add nsw i64 %26, %16
%28 = add nsw i64 %26, %24
%29 = getelementptr inbounds i64, i64* %2, i64 %26
%30 = load i64, i64* %29
%31 = getelementptr inbounds double, double* %3, i64 %26
%32 = load double, double* %31
%33 = getelementptr inbounds double, double* %4, i64 %27
%34 = load double, double* %33
%35 = getelementptr inbounds double, double* %4, i64 %28
%36 = load double, double* %35
%37 = tail call double @kernel_estimate(i64 %30, double %32, double %34, double %36)
%38 = add nuw nsw i64 %26, 1
%39 = icmp eq i64 %38, %1
br i1 %39, label %40, label %25
40: ; preds = %25
%41 = load double, double* %15
br label %42
42: ; preds = %40, %22
%43 = phi double [ %18, %22 ], [ %41, %40 ]
%44 = phi double [ %19, %22 ], [ %37, %40 ]
%45 = fadd double %44, %43
store double %45, double* %15
br label %46
46: ; preds = %17, %42
%47 = phi double [ %45, %42 ], [ %18, %17 ]
%48 = phi double [ %44, %42 ], [ %19, %17 ]
%49 = add nuw nsw i64 %20, 1
%50 = icmp eq i64 %49, %0
br i1 %50, label %51, label %17
51: ; preds = %46
%52 = fmul double %11, %47
store double %52, double* %15
%53 = add nuw nsw i64 %14, 1
%54 = icmp eq i64 %53, %0
br i1 %54, label %55, label %12
55: ; preds = %51, %6
ret void
}