#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 FnDrv(int, int, double, double, double *);
int F_modeShapeTriDrv(int p, int i, double *L, double mdrv[2]) {
  int alpha, beta, found, count;
  double rs, rst2, P1P2, t, P1, P2, dP1, dP2, t1, t2;
  if (p < 3 || i < 0 || i > p - 3)
    return 0.0;
  count = found = 0;
  for (alpha = 0; alpha <= p - 3; alpha++) {
    for (beta = 0; beta <= p - 3; beta++) {
      if (alpha + beta == p - 3) {
        if (count == i)
          found = 1;
        else
          count++;
      }
      if (found)
        break;
    }
    if (found)
      break;
  }
  if (found) {
    return FnDrv(alpha, beta, L[0], L[1], mdrv);
  } else
    return 0;
}


x86 assembly (clang, -O0):
<F_modeShapeTriDrv>:
push   %rbp
mov    %rsp,%rbp
sub    $0x80,%rsp
mov    %edi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
cmpl   $0x3,-0x8(%rbp)
jl     114e <F_modeShapeTriDrv+0x3e>
cmpl   $0x0,-0xc(%rbp)
jl     114e <F_modeShapeTriDrv+0x3e>
mov    -0xc(%rbp),%eax
mov    -0x8(%rbp),%ecx
sub    $0x3,%ecx
cmp    %ecx,%eax
jle    115a <F_modeShapeTriDrv+0x4a>
movl   $0x0,-0x4(%rbp)
jmp    124f <F_modeShapeTriDrv+0x13f>
movl   $0x0,-0x2c(%rbp)
movl   $0x0,-0x30(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x8(%rbp),%ecx
sub    $0x3,%ecx
cmp    %ecx,%eax
jg     1216 <F_modeShapeTriDrv+0x106>
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
mov    -0x8(%rbp),%ecx
sub    $0x3,%ecx
cmp    %ecx,%eax
jg     11f4 <F_modeShapeTriDrv+0xe4>
mov    -0x24(%rbp),%eax
add    -0x28(%rbp),%eax
mov    -0x8(%rbp),%ecx
sub    $0x3,%ecx
cmp    %ecx,%eax
jne    11d2 <F_modeShapeTriDrv+0xc2>
mov    -0x30(%rbp),%eax
cmp    -0xc(%rbp),%eax
jne    11c4 <F_modeShapeTriDrv+0xb4>
movl   $0x1,-0x2c(%rbp)
jmp    11cd <F_modeShapeTriDrv+0xbd>
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    11d2 <F_modeShapeTriDrv+0xc2>
cmpl   $0x0,-0x2c(%rbp)
je     11e1 <F_modeShapeTriDrv+0xd1>
jmp    11f4 <F_modeShapeTriDrv+0xe4>
jmp    11e6 <F_modeShapeTriDrv+0xd6>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1187 <F_modeShapeTriDrv+0x77>
cmpl   $0x0,-0x2c(%rbp)
je     1203 <F_modeShapeTriDrv+0xf3>
jmp    1216 <F_modeShapeTriDrv+0x106>
jmp    1208 <F_modeShapeTriDrv+0xf8>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    116f <F_modeShapeTriDrv+0x5f>
cmpl   $0x0,-0x2c(%rbp)
je     1248 <F_modeShapeTriDrv+0x138>
mov    -0x24(%rbp),%edi
mov    -0x28(%rbp),%esi
mov    -0x18(%rbp),%rax
movsd  (%rax),%xmm0
mov    -0x18(%rbp),%rax
movsd  0x8(%rax),%xmm1
mov    -0x20(%rbp),%rdx
call   1030 <FnDrv@plt>
mov    %eax,-0x4(%rbp)
jmp    124f <F_modeShapeTriDrv+0x13f>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x80,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<F_modeShapeTriDrv>:
push   %rbp
push   %r15
push   %r14
push   %rbx
cmp    $0x3,%edi
jl     11ab <F_modeShapeTriDrv+0x9b>
test   %esi,%esi
js     11ab <F_modeShapeTriDrv+0x9b>
lea    -0x3(%rdi),%r9d
cmp    %esi,%r9d
jb     11ab <F_modeShapeTriDrv+0x9b>
lea    -0x2(%rdi),%r10d
neg    %edi
xor    %r11d,%r11d
xor    %r8d,%r8d
xor    %ebx,%ebx
lea    (%rdi,%r8,1),%r14d
xor    %ebp,%ebp
jmp    1172 <F_modeShapeTriDrv+0x62>
cs nopw 0x0(%rax,%rax,1)
cmp    %esi,%ebx
setne  %r15b
cmp    $0xfffffffd,%eax
sete   %al
and    %r15b,%al
movzbl %al,%eax
add    %eax,%ebx
lea    (%rdi,%rbp,1),%eax
add    $0x1,%eax
add    $0x1,%ebp
cmp    $0xfffffffe,%eax
je     1190 <F_modeShapeTriDrv+0x80>
lea    (%r14,%rbp,1),%eax
cmp    $0xfffffffd,%eax
jne    1150 <F_modeShapeTriDrv+0x40>
cmp    %esi,%ebx
jne    1150 <F_modeShapeTriDrv+0x40>
jmp    11a5 <F_modeShapeTriDrv+0x95>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
cmp    %r9d,%r8d
lea    0x1(%r8),%eax
setge  %r11b
mov    %eax,%r8d
cmp    %r10d,%eax
jne    113e <F_modeShapeTriDrv+0x2e>
jmp    11ab <F_modeShapeTriDrv+0x9b>
test   $0x1,%r11b
je     11b4 <F_modeShapeTriDrv+0xa4>
xor    %eax,%eax
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret
movsd  (%rdx),%xmm0
movsd  0x8(%rdx),%xmm1
mov    %r8d,%edi
mov    %ebp,%esi
mov    %rcx,%rdx
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
jmp    1030 <FnDrv@plt>

LLVM IR (-O0):
define i32 @F_modeShapeTriDrv(i32 %0, i32 %1, double* %2, double* %3) {
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca double*
%9 = alloca double*
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca double
%15 = alloca double
%16 = alloca double
%17 = alloca double
%18 = alloca double
%19 = alloca double
%20 = alloca double
%21 = alloca double
%22 = alloca double
%23 = alloca double
store i32 %0, i32* %6
store i32 %1, i32* %7
store double* %2, double** %8
store double* %3, double** %9
%24 = load i32, i32* %6
%25 = icmp slt i32 %24, 3
br i1 %25, label %34, label %26
26: ; preds = %4
%27 = load i32, i32* %7
%28 = icmp slt i32 %27, 0
br i1 %28, label %34, label %29
29: ; preds = %26
%30 = load i32, i32* %7
%31 = load i32, i32* %6
%32 = sub nsw i32 %31, 3
%33 = icmp sgt i32 %30, %32
br i1 %33, label %34, label %35
34: ; preds = %29, %26, %4
store i32 0, i32* %5
br label %94
35: ; preds = %29
store i32 0, i32* %12
store i32 0, i32* %13
store i32 0, i32* %10
br label %36
36: ; preds = %76, %35
%37 = load i32, i32* %10
%38 = load i32, i32* %6
%39 = sub nsw i32 %38, 3
%40 = icmp sle i32 %37, %39
br i1 %40, label %41, label %79
41: ; preds = %36
store i32 0, i32* %11
br label %42
42: ; preds = %68, %41
%43 = load i32, i32* %11
%44 = load i32, i32* %6
%45 = sub nsw i32 %44, 3
%46 = icmp sle i32 %43, %45
br i1 %46, label %47, label %71
47: ; preds = %42
%48 = load i32, i32* %10
%49 = load i32, i32* %11
%50 = add nsw i32 %48, %49
%51 = load i32, i32* %6
%52 = sub nsw i32 %51, 3
%53 = icmp eq i32 %50, %52
br i1 %53, label %54, label %63
54: ; preds = %47
%55 = load i32, i32* %13
%56 = load i32, i32* %7
%57 = icmp eq i32 %55, %56
br i1 %57, label %58, label %59
58: ; preds = %54
store i32 1, i32* %12
br label %62
59: ; preds = %54
%60 = load i32, i32* %13
%61 = add nsw i32 %60, 1
store i32 %61, i32* %13
br label %62
62: ; preds = %59, %58
br label %63
63: ; preds = %62, %47
%64 = load i32, i32* %12
%65 = icmp ne i32 %64, 0
br i1 %65, label %66, label %67
66: ; preds = %63
br label %71
67: ; preds = %63
br label %68
68: ; preds = %67
%69 = load i32, i32* %11
%70 = add nsw i32 %69, 1
store i32 %70, i32* %11
br label %42
71: ; preds = %66, %42
%72 = load i32, i32* %12
%73 = icmp ne i32 %72, 0
br i1 %73, label %74, label %75
74: ; preds = %71
br label %79
75: ; preds = %71
br label %76
76: ; preds = %75
%77 = load i32, i32* %10
%78 = add nsw i32 %77, 1
store i32 %78, i32* %10
br label %36
79: ; preds = %74, %36
%80 = load i32, i32* %12
%81 = icmp ne i32 %80, 0
br i1 %81, label %82, label %93
82: ; preds = %79
%83 = load i32, i32* %10
%84 = load i32, i32* %11
%85 = load double*, double** %8
%86 = getelementptr inbounds double, double* %85, i64 0
%87 = load double, double* %86
%88 = load double*, double** %8
%89 = getelementptr inbounds double, double* %88, i64 1
%90 = load double, double* %89
%91 = load double*, double** %9
%92 = call i32 @FnDrv(i32 %83, i32 %84, double %87, double %90, double* %91)
store i32 %92, i32* %5
br label %94
93: ; preds = %79
store i32 0, i32* %5
br label %94
94: ; preds = %93, %82, %34
%95 = load i32, i32* %5
ret i32 %95
}

LLVM IR (-O2):
define i32 @F_modeShapeTriDrv(i32 %0, i32 %1, double* nocapture %2, double* %3) {
%5 = icmp slt i32 %0, 3
%6 = icmp slt i32 %1, 0
%7 = or i1 %5, %6
br i1 %7, label %41, label %8
8: ; preds = %4
%9 = add nsw i32 %0, -3
%10 = icmp ult i32 %9, %1
br i1 %10, label %41, label %11
11: ; preds = %8
%12 = add nsw i32 %0, -2
br label %13
13: ; preds = %31, %11
%14 = phi i1 [ false, %11 ], [ %33, %31 ]
%15 = phi i32 [ 0, %11 ], [ %32, %31 ]
%16 = phi i32 [ 0, %11 ], [ %28, %31 ]
br label %17
17: ; preds = %13, %24
%18 = phi i32 [ %29, %24 ], [ 0, %13 ]
%19 = phi i32 [ %28, %24 ], [ %16, %13 ]
%20 = add nuw nsw i32 %18, %15
%21 = icmp eq i32 %20, %9
%22 = icmp eq i32 %19, %1
%23 = select i1 %21, i1 %22, i1 false
br i1 %23, label %35, label %24
24: ; preds = %17
%25 = xor i1 %22, true
%26 = select i1 %21, i1 %25, i1 false
%27 = zext i1 %26 to i32
%28 = add nsw i32 %19, %27
%29 = add nuw i32 %18, 1
%30 = icmp eq i32 %29, %12
br i1 %30, label %31, label %17
31: ; preds = %24
%32 = add nuw i32 %15, 1
%33 = icmp sge i32 %15, %9
%34 = icmp eq i32 %32, %12
br i1 %34, label %41, label %13
35: ; preds = %17
br i1 %14, label %41, label %36
36: ; preds = %35
%37 = load double, double* %2
%38 = getelementptr inbounds double, double* %2, i64 1
%39 = load double, double* %38
%40 = tail call i32 @FnDrv(i32 %15, i32 %18, double %37, double %39, double* %3)
br label %41
41: ; preds = %31, %35, %4, %8, %36
%42 = phi i32 [ %40, %36 ], [ 0, %8 ], [ 0, %4 ], [ 0, %35 ], [ 0, %31 ]
ret i32 %42
}