#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*/ palEl2ue(double, int, double, double, double, double, double,
                            double, double, double, double *, int *);
int /*<<< orphan*/ palPlantu(double, double, double, double *, double *,
                             double *, double *, int *);
void palPlante(double date, double elong, double phi, int jform, double epoch,
               double orbinc, double anode, double perih, double aorq, double e,
               double aorl, double dm, double *ra, double *dec, double *r,
               int *jstat) {
  double u[13];
  palEl2ue(date, jform, epoch, orbinc, anode, perih, aorq, e, aorl, dm, u,
           jstat);
  if (*jstat == 0)
    palPlantu(date, elong, phi, u, ra, dec, r, jstat);
}


x86 assembly (clang, -O0):
<palPlante>:
push   %rbp
mov    %rsp,%rbp
sub    $0xe0,%rsp
movsd  0x20(%rbp),%xmm8
movsd  0x18(%rbp),%xmm8
movsd  0x10(%rbp),%xmm8
movsd  %xmm0,-0x8(%rbp)
movsd  %xmm1,-0x10(%rbp)
movsd  %xmm2,-0x18(%rbp)
mov    %edi,-0x1c(%rbp)
movsd  %xmm3,-0x28(%rbp)
movsd  %xmm4,-0x30(%rbp)
movsd  %xmm5,-0x38(%rbp)
movsd  %xmm6,-0x40(%rbp)
movsd  %xmm7,-0x48(%rbp)
mov    %rsi,-0x50(%rbp)
mov    %rdx,-0x58(%rbp)
mov    %rcx,-0x60(%rbp)
mov    %r8,-0x68(%rbp)
movsd  -0x8(%rbp),%xmm0
mov    -0x1c(%rbp),%edi
movsd  -0x28(%rbp),%xmm1
movsd  -0x30(%rbp),%xmm2
movsd  -0x38(%rbp),%xmm3
movsd  -0x40(%rbp),%xmm4
movsd  -0x48(%rbp),%xmm5
movsd  0x10(%rbp),%xmm6
movsd  0x18(%rbp),%xmm7
movsd  0x20(%rbp),%xmm8
lea    -0xd0(%rbp),%rsi
mov    -0x68(%rbp),%rdx
movsd  %xmm8,(%rsp)
call   1040 <palEl2ue@plt>
mov    -0x68(%rbp),%rax
cmpl   $0x0,(%rax)
jne    11f7 <palPlante+0xd7>
movsd  -0x8(%rbp),%xmm0
movsd  -0x10(%rbp),%xmm1
movsd  -0x18(%rbp),%xmm2
lea    -0xd0(%rbp),%rdi
mov    -0x50(%rbp),%rsi
mov    -0x58(%rbp),%rdx
mov    -0x60(%rbp),%rcx
mov    -0x68(%rbp),%r8
call   1030 <palPlantu@plt>
add    $0xe0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<palPlante>:
push   %r15
push   %r14
push   %r12
push   %rbx
sub    $0x88,%rsp
mov    %r8,%rbx
mov    %rcx,%r14
mov    %rdx,%r15
mov    %rsi,%r12
movaps %xmm7,%xmm8
movaps %xmm6,%xmm9
movsd  %xmm2,0x18(%rsp)
movsd  %xmm1,0x10(%rsp)
movsd  0xb0(%rsp),%xmm6
movsd  0xb8(%rsp),%xmm7
movsd  0xc0(%rsp),%xmm1
movsd  %xmm1,(%rsp)
lea    0x20(%rsp),%rsi
movsd  %xmm0,0x8(%rsp)
movaps %xmm3,%xmm1
movaps %xmm4,%xmm2
movaps %xmm5,%xmm3
movaps %xmm9,%xmm4
movaps %xmm8,%xmm5
mov    %r8,%rdx
call   1040 <palEl2ue@plt>
cmpl   $0x0,(%rbx)
jne    11bf <palPlante+0x9f>
lea    0x20(%rsp),%rdi
movsd  0x8(%rsp),%xmm0
movsd  0x10(%rsp),%xmm1
movsd  0x18(%rsp),%xmm2
mov    %r12,%rsi
mov    %r15,%rdx
mov    %r14,%rcx
mov    %rbx,%r8
call   1030 <palPlantu@plt>
add    $0x88,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
define void @palPlante(double %0, double %1, double %2, i32 %3, double %4, double %5, double %6, double %7, double %8, double %9, double %10, double %11, double* %12, double* %13, double* %14, i32* %15) {
%17 = alloca double
%18 = alloca double
%19 = alloca double
%20 = alloca i32
%21 = alloca double
%22 = alloca double
%23 = alloca double
%24 = alloca double
%25 = alloca double
%26 = alloca double
%27 = alloca double
%28 = alloca double
%29 = alloca double*
%30 = alloca double*
%31 = alloca double*
%32 = alloca i32*
%33 = alloca [13 x double]
store double %0, double* %17
store double %1, double* %18
store double %2, double* %19
store i32 %3, i32* %20
store double %4, double* %21
store double %5, double* %22
store double %6, double* %23
store double %7, double* %24
store double %8, double* %25
store double %9, double* %26
store double %10, double* %27
store double %11, double* %28
store double* %12, double** %29
store double* %13, double** %30
store double* %14, double** %31
store i32* %15, i32** %32
%34 = load double, double* %17
%35 = load i32, i32* %20
%36 = load double, double* %21
%37 = load double, double* %22
%38 = load double, double* %23
%39 = load double, double* %24
%40 = load double, double* %25
%41 = load double, double* %26
%42 = load double, double* %27
%43 = load double, double* %28
%44 = getelementptr inbounds [13 x double], [13 x double]* %33, i64 0, i64 0
%45 = load i32*, i32** %32
%46 = call i32 @palEl2ue(double %34, i32 %35, double %36, double %37, double %38, double %39, double %40, double %41, double %42, double %43, double* %44, i32* %45)
%47 = load i32*, i32** %32
%48 = load i32, i32* %47
%49 = icmp eq i32 %48, 0
br i1 %49, label %50, label %60
50: ; preds = %16
%51 = load double, double* %17
%52 = load double, double* %18
%53 = load double, double* %19
%54 = getelementptr inbounds [13 x double], [13 x double]* %33, i64 0, i64 0
%55 = load double*, double** %29
%56 = load double*, double** %30
%57 = load double*, double** %31
%58 = load i32*, i32** %32
%59 = call i32 @palPlantu(double %51, double %52, double %53, double* %54, double* %55, double* %56, double* %57, i32* %58)
br label %60
60: ; preds = %50, %16
ret void
}

LLVM IR (-O2):
define void @palPlante(double %0, double %1, double %2, i32 %3, double %4, double %5, double %6, double %7, double %8, double %9, double %10, double %11, double* %12, double* %13, double* %14, i32* %15) {
%17 = alloca [13 x double]
%18 = bitcast [13 x double]* %17 to i8*
%19 = getelementptr inbounds [13 x double], [13 x double]* %17, i64 0, i64 0
%20 = call i32 @palEl2ue(double %0, i32 %3, double %4, double %5, double %6, double %7, double %8, double %9, double %10, double %11, double* %19, i32* %15)
%21 = load i32, i32* %15
%22 = icmp eq i32 %21, 0
br i1 %22, label %23, label %25
23: ; preds = %16
%24 = call i32 @palPlantu(double %0, double %1, double %2, double* %19, double* %12, double* %13, double* %14, i32* %15)
br label %25
25: ; preds = %23, %16
ret void
}