#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*/ cdflib_gamma_inc(double const *, double const *, double *,
                                    double *, int const *);
void cdflib_cumgam(const double *x, const double *a, double *cum,
                   double *ccum) {
  static const int K1 = 0;
  if (!(*x <= 0.0e0)) {
    goto S10;
  }
  *cum = 0.0e0;
  *ccum = 1.0e0;
  return;
S10:
  cdflib_gamma_inc(a, x, cum, ccum, &K1);
  return;
}


x86 assembly (clang, -O0):
<cdflib_cumgam>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0x8(%rbp),%rax
xorps  %xmm0,%xmm0
ucomisd (%rax),%xmm0
jae    113e <cdflib_cumgam+0x2e>
jmp    115e <cdflib_cumgam+0x4e>
mov    -0x18(%rbp),%rax
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax)
mov    -0x20(%rbp),%rax
movsd  0xeab(%rip),%xmm0
movsd  %xmm0,(%rax)
jmp    117a <cdflib_cumgam+0x6a>
mov    -0x10(%rbp),%rdi
mov    -0x8(%rbp),%rsi
mov    -0x18(%rbp),%rdx
mov    -0x20(%rbp),%rcx
lea    0xe93(%rip),%r8
call   1030 <cdflib_gamma_inc@plt>
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<cdflib_cumgam>:
xorpd  %xmm0,%xmm0
ucomisd (%rdi),%xmm0
jae    112f <cdflib_cumgam+0x1f>
mov    %rdi,%rax
lea    0xedc(%rip),%r8
mov    %rsi,%rdi
mov    %rax,%rsi
jmp    1030 <cdflib_gamma_inc@plt>
movq   $0x0,(%rdx)
movabs $0x3ff0000000000000,%rax
mov    %rax,(%rcx)
ret

LLVM IR (-O0):
@cdflib_cumgam.K1 = internal constant i32 0
define void @cdflib_cumgam(double* %0, double* %1, double* %2, double* %3) {
%5 = alloca double*
%6 = alloca double*
%7 = alloca double*
%8 = alloca double*
store double* %0, double** %5
store double* %1, double** %6
store double* %2, double** %7
store double* %3, double** %8
%9 = load double*, double** %5
%10 = load double, double* %9
%11 = fcmp ole double %10, 0.000000e+00
br i1 %11, label %13, label %12
12: ; preds = %4
br label %16
13: ; preds = %4
%14 = load double*, double** %7
store double 0.000000e+00, double* %14
%15 = load double*, double** %8
store double 1.000000e+00, double* %15
br label %22
16: ; preds = %12
%17 = load double*, double** %6
%18 = load double*, double** %5
%19 = load double*, double** %7
%20 = load double*, double** %8
%21 = call i32 @cdflib_gamma_inc(double* %17, double* %18, double* %19, double* %20, i32* @cdflib_cumgam.K1)
br label %22
22: ; preds = %16, %13
ret void
}

LLVM IR (-O2):
@cdflib_cumgam.K1 = internal constant i32 0
define void @cdflib_cumgam(double* %0, double* %1, double* %2, double* %3) {
%5 = load double, double* %0
%6 = fcmp ugt double %5, 0.000000e+00
br i1 %6, label %8, label %7
7: ; preds = %4
store double 0.000000e+00, double* %2
store double 1.000000e+00, double* %3
br label %10
8: ; preds = %4
%9 = tail call i32 @cdflib_gamma_inc(double* %1, double* %0, double* %2, double* %3, i32* @cdflib_cumgam.K1)
br label %10
10: ; preds = %8, %7
ret void
}