#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 atan(double);
double atan2(double, double);
double cos(double);
double deg2rad(double);
double rad2deg(double);
double sin(double);
double tan(double);
void sun_right_ascension_parallax_and_topocentric_dec(
    double latitude, double elevation, double xi, double h, double delta,
    double *delta_alpha, double *delta_prime) {
  double delta_alpha_rad;
  double lat_rad = deg2rad(latitude);
  double xi_rad = deg2rad(xi);
  double h_rad = deg2rad(h);
  double delta_rad = deg2rad(delta);
  double u = atan(0.99664719 * tan(lat_rad));
  double y = 0.99664719 * sin(u) + elevation * sin(lat_rad) / 6378140.0;
  double x = cos(u) + elevation * cos(lat_rad) / 6378140.0;
  delta_alpha_rad = atan2(-x * sin(xi_rad) * sin(h_rad),
                          cos(delta_rad) - x * sin(xi_rad) * cos(h_rad));
  *delta_prime =
      rad2deg(atan2((sin(delta_rad) - y * sin(xi_rad)) * cos(delta_alpha_rad),
                    cos(delta_rad) - x * sin(xi_rad) * cos(h_rad)));
  *delta_alpha = rad2deg(delta_alpha_rad);
}


x86 assembly (clang, -O0):
<sun_right_ascension_parallax_and_topocentric_dec>:
push   %rbp
mov    %rsp,%rbp
sub    $0x100,%rsp
movsd  %xmm0,-0x8(%rbp)
movsd  %xmm1,-0x10(%rbp)
movsd  %xmm2,-0x18(%rbp)
movsd  %xmm3,-0x20(%rbp)
movsd  %xmm4,-0x28(%rbp)
mov    %rdi,-0x30(%rbp)
mov    %rsi,-0x38(%rbp)
movsd  -0x8(%rbp),%xmm0
call   1040 <deg2rad@plt>
movsd  %xmm0,-0x48(%rbp)
movsd  -0x18(%rbp),%xmm0
call   1040 <deg2rad@plt>
movsd  %xmm0,-0x50(%rbp)
movsd  -0x20(%rbp),%xmm0
call   1040 <deg2rad@plt>
movsd  %xmm0,-0x58(%rbp)
movsd  -0x28(%rbp),%xmm0
call   1040 <deg2rad@plt>
movsd  %xmm0,-0x60(%rbp)
movsd  -0x48(%rbp),%xmm0
call   1080 <tan@plt>
movaps %xmm0,%xmm1
movsd  0xe1b(%rip),%xmm0
mulsd  %xmm1,%xmm0
call   1060 <atan@plt>
movsd  %xmm0,-0x68(%rbp)
movsd  -0x68(%rbp),%xmm0
call   1050 <sin@plt>
movsd  %xmm0,-0xf8(%rbp)
ff
movsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x100(%rbp)
ff
movsd  -0x48(%rbp),%xmm0
call   1050 <sin@plt>
movsd  -0x100(%rbp),%xmm1
ff
movaps %xmm0,%xmm2
movsd  -0xf8(%rbp),%xmm0
ff
mulsd  %xmm2,%xmm1
movsd  0xdbd(%rip),%xmm2
divsd  %xmm2,%xmm1
movsd  0xdb9(%rip),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x70(%rbp)
movsd  -0x68(%rbp),%xmm0
call   1090 <cos@plt>
movsd  %xmm0,-0xe8(%rbp)
ff
movsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0xf0(%rbp)
ff
movsd  -0x48(%rbp),%xmm0
call   1090 <cos@plt>
movsd  -0xf0(%rbp),%xmm1
ff
movaps %xmm0,%xmm2
movsd  -0xe8(%rbp),%xmm0
ff
mulsd  %xmm2,%xmm1
movsd  0xd5c(%rip),%xmm2
divsd  %xmm2,%xmm1
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x78(%rbp)
movsd  -0x78(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0xe0(%rbp)
ff
movsd  -0x50(%rbp),%xmm0
call   1050 <sin@plt>
movaps %xmm0,%xmm1
movsd  -0xe0(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0xd8(%rbp)
ff
movsd  -0x58(%rbp),%xmm0
call   1050 <sin@plt>
movaps %xmm0,%xmm1
movsd  -0xd8(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0xb8(%rbp)
ff
movsd  -0x60(%rbp),%xmm0
call   1090 <cos@plt>
movsd  %xmm0,-0xc0(%rbp)
ff
movsd  -0x78(%rbp),%xmm0
movsd  %xmm0,-0xd0(%rbp)
ff
movsd  -0x50(%rbp),%xmm0
call   1050 <sin@plt>
movaps %xmm0,%xmm1
movsd  -0xd0(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0xc8(%rbp)
ff
movsd  -0x58(%rbp),%xmm0
call   1090 <cos@plt>
movsd  -0xc8(%rbp),%xmm1
ff
movsd  -0xc0(%rbp),%xmm2
ff
movaps %xmm0,%xmm3
movsd  -0xb8(%rbp),%xmm0
ff
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm3,%xmm1
addsd  %xmm2,%xmm1
call   1030 <atan2@plt>
movsd  %xmm0,-0x40(%rbp)
movsd  -0x60(%rbp),%xmm0
call   1050 <sin@plt>
movsd  %xmm0,-0xb0(%rbp)
ff
movsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0xa8(%rbp)
ff
movsd  -0x50(%rbp),%xmm0
call   1050 <sin@plt>
movsd  -0xb0(%rbp),%xmm1
ff
movaps %xmm0,%xmm2
movsd  -0xa8(%rbp),%xmm0
ff
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0xa0(%rbp)
ff
movsd  -0x40(%rbp),%xmm0
call   1090 <cos@plt>
movaps %xmm0,%xmm1
movsd  -0xa0(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x80(%rbp)
movsd  -0x60(%rbp),%xmm0
call   1090 <cos@plt>
movsd  %xmm0,-0x88(%rbp)
ff
movsd  -0x78(%rbp),%xmm0
movsd  %xmm0,-0x98(%rbp)
ff
movsd  -0x50(%rbp),%xmm0
call   1050 <sin@plt>
movaps %xmm0,%xmm1
movsd  -0x98(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x90(%rbp)
ff
movsd  -0x58(%rbp),%xmm0
call   1090 <cos@plt>
movsd  -0x90(%rbp),%xmm1
ff
movsd  -0x88(%rbp),%xmm2
ff
movaps %xmm0,%xmm3
movsd  -0x80(%rbp),%xmm0
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm3,%xmm1
addsd  %xmm2,%xmm1
call   1030 <atan2@plt>
call   1070 <rad2deg@plt>
mov    -0x38(%rbp),%rax
movsd  %xmm0,(%rax)
movsd  -0x40(%rbp),%xmm0
call   1070 <rad2deg@plt>
mov    -0x30(%rbp),%rax
movsd  %xmm0,(%rax)
add    $0x100,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<sun_right_ascension_parallax_and_topocentric_dec>:
push   %r14
push   %rbx
sub    $0x58,%rsp
mov    %rsi,%rbx
mov    %rdi,%r14
movsd  %xmm4,0x18(%rsp)
movsd  %xmm3,0x38(%rsp)
movsd  %xmm2,0x10(%rsp)
movsd  %xmm1,0x40(%rsp)
call   1040 <deg2rad@plt>
movsd  %xmm0,0x20(%rsp)
movsd  0x10(%rsp),%xmm0
call   1040 <deg2rad@plt>
movsd  %xmm0,0x10(%rsp)
movsd  0x38(%rsp),%xmm0
call   1040 <deg2rad@plt>
movsd  %xmm0,0x38(%rsp)
movsd  0x18(%rsp),%xmm0
call   1040 <deg2rad@plt>
movsd  %xmm0,0x18(%rsp)
movsd  0x20(%rsp),%xmm0
call   1080 <tan@plt>
mulsd  0xe1a(%rip),%xmm0
call   1060 <atan@plt>
movsd  %xmm0,0x8(%rsp)
call   1050 <sin@plt>
movsd  %xmm0,0x30(%rsp)
movsd  0x20(%rsp),%xmm0
call   1050 <sin@plt>
mulsd  0x40(%rsp),%xmm0
divsd  0xdf3(%rip),%xmm0
movsd  0x30(%rsp),%xmm1
mulsd  0xddd(%rip),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,0x30(%rsp)
movsd  0x8(%rsp),%xmm0
call   1090 <cos@plt>
movsd  %xmm0,0x8(%rsp)
movsd  0x20(%rsp),%xmm0
call   1090 <cos@plt>
mulsd  0x40(%rsp),%xmm0
divsd  0xdb1(%rip),%xmm0
addsd  0x8(%rsp),%xmm0
movapd %xmm0,0x40(%rsp)
movapd 0xda5(%rip),%xmm1
xorpd  %xmm0,%xmm1
movapd %xmm1,0x20(%rsp)
movsd  0x10(%rsp),%xmm0
call   1050 <sin@plt>
mulsd  0x20(%rsp),%xmm0
movsd  %xmm0,0x20(%rsp)
movsd  0x38(%rsp),%xmm0
call   1050 <sin@plt>
mulsd  0x20(%rsp),%xmm0
movsd  %xmm0,0x20(%rsp)
movsd  0x18(%rsp),%xmm0
call   1090 <cos@plt>
movsd  %xmm0,0x8(%rsp)
movsd  0x10(%rsp),%xmm0
call   1050 <sin@plt>
movsd  %xmm0,0x50(%rsp)
movsd  0x38(%rsp),%xmm0
call   1090 <cos@plt>
movsd  0x50(%rsp),%xmm1
mulsd  0x40(%rsp),%xmm1
mulsd  %xmm0,%xmm1
movapd %xmm1,%xmm0
movsd  0x8(%rsp),%xmm1
subsd  %xmm0,%xmm1
movsd  0x20(%rsp),%xmm0
call   1030 <atan2@plt>
movsd  %xmm0,0x8(%rsp)
movsd  0x18(%rsp),%xmm0
call   1050 <sin@plt>
movsd  %xmm0,0x20(%rsp)
movsd  0x10(%rsp),%xmm0
call   1050 <sin@plt>
mulsd  0x30(%rsp),%xmm0
movsd  0x20(%rsp),%xmm1
subsd  %xmm0,%xmm1
movsd  %xmm1,0x20(%rsp)
movsd  0x8(%rsp),%xmm0
call   1090 <cos@plt>
mulsd  0x20(%rsp),%xmm0
movsd  %xmm0,0x30(%rsp)
movsd  0x18(%rsp),%xmm0
call   1090 <cos@plt>
movsd  %xmm0,0x18(%rsp)
movsd  0x10(%rsp),%xmm0
call   1050 <sin@plt>
movsd  %xmm0,0x10(%rsp)
movsd  0x38(%rsp),%xmm0
call   1090 <cos@plt>
movsd  0x10(%rsp),%xmm1
mulsd  0x40(%rsp),%xmm1
mulsd  %xmm0,%xmm1
movapd %xmm1,%xmm0
movsd  0x18(%rsp),%xmm1
subsd  %xmm0,%xmm1
movsd  0x30(%rsp),%xmm0
call   1030 <atan2@plt>
call   1070 <rad2deg@plt>
movsd  %xmm0,(%rbx)
movsd  0x8(%rsp),%xmm0
call   1070 <rad2deg@plt>
movsd  %xmm0,(%r14)
add    $0x58,%rsp
pop    %rbx
pop    %r14
ret

LLVM IR (-O0):
define void @sun_right_ascension_parallax_and_topocentric_dec(double %0, double %1, double %2, double %3, double %4, double* %5, double* %6) {
%8 = alloca double
%9 = alloca double
%10 = alloca double
%11 = alloca double
%12 = alloca double
%13 = alloca double*
%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
store double %0, double* %8
store double %1, double* %9
store double %2, double* %10
store double %3, double* %11
store double %4, double* %12
store double* %5, double** %13
store double* %6, double** %14
%23 = load double, double* %8
%24 = call double @deg2rad(double %23)
store double %24, double* %16
%25 = load double, double* %10
%26 = call double @deg2rad(double %25)
store double %26, double* %17
%27 = load double, double* %11
%28 = call double @deg2rad(double %27)
store double %28, double* %18
%29 = load double, double* %12
%30 = call double @deg2rad(double %29)
store double %30, double* %19
%31 = load double, double* %16
%32 = call double @tan(double %31)
%33 = fmul double 0x3FEFE488A5D668D8, %32
%34 = call double @atan(double %33)
store double %34, double* %20
%35 = load double, double* %20
%36 = call double @sin(double %35)
%37 = load double, double* %9
%38 = load double, double* %16
%39 = call double @sin(double %38)
%40 = fmul double %37, %39
%41 = fdiv double %40, 6.378140e+06
%42 = call double @llvm.fmuladd.f64(double 0x3FEFE488A5D668D8, double %36, double %41)
store double %42, double* %21
%43 = load double, double* %20
%44 = call double @cos(double %43)
%45 = load double, double* %9
%46 = load double, double* %16
%47 = call double @cos(double %46)
%48 = fmul double %45, %47
%49 = fdiv double %48, 6.378140e+06
%50 = fadd double %44, %49
store double %50, double* %22
%51 = load double, double* %22
%52 = fneg double %51
%53 = load double, double* %17
%54 = call double @sin(double %53)
%55 = fmul double %52, %54
%56 = load double, double* %18
%57 = call double @sin(double %56)
%58 = fmul double %55, %57
%59 = load double, double* %19
%60 = call double @cos(double %59)
%61 = load double, double* %22
%62 = load double, double* %17
%63 = call double @sin(double %62)
%64 = fmul double %61, %63
%65 = load double, double* %18
%66 = call double @cos(double %65)
%67 = fneg double %64
%68 = call double @llvm.fmuladd.f64(double %67, double %66, double %60)
%69 = call double @atan2(double %58, double %68)
store double %69, double* %15
%70 = load double, double* %19
%71 = call double @sin(double %70)
%72 = load double, double* %21
%73 = load double, double* %17
%74 = call double @sin(double %73)
%75 = fneg double %72
%76 = call double @llvm.fmuladd.f64(double %75, double %74, double %71)
%77 = load double, double* %15
%78 = call double @cos(double %77)
%79 = fmul double %76, %78
%80 = load double, double* %19
%81 = call double @cos(double %80)
%82 = load double, double* %22
%83 = load double, double* %17
%84 = call double @sin(double %83)
%85 = fmul double %82, %84
%86 = load double, double* %18
%87 = call double @cos(double %86)
%88 = fneg double %85
%89 = call double @llvm.fmuladd.f64(double %88, double %87, double %81)
%90 = call double @atan2(double %79, double %89)
%91 = call double @rad2deg(double %90)
%92 = load double*, double** %14
store double %91, double* %92
%93 = load double, double* %15
%94 = call double @rad2deg(double %93)
%95 = load double*, double** %13
store double %94, double* %95
ret void
}

LLVM IR (-O2):
define void @sun_right_ascension_parallax_and_topocentric_dec(double %0, double %1, double %2, double %3, double %4, double* nocapture writeonly %5, double* nocapture writeonly %6) {
%8 = tail call double @deg2rad(double %0)
%9 = tail call double @deg2rad(double %2)
%10 = tail call double @deg2rad(double %3)
%11 = tail call double @deg2rad(double %4)
%12 = tail call double @tan(double %8)
%13 = fmul double %12, 0x3FEFE488A5D668D8
%14 = tail call double @atan(double %13)
%15 = tail call double @sin(double %14)
%16 = tail call double @sin(double %8)
%17 = fmul double %16, %1
%18 = fdiv double %17, 6.378140e+06
%19 = tail call double @llvm.fmuladd.f64(double %15, double 0x3FEFE488A5D668D8, double %18)
%20 = tail call double @cos(double %14)
%21 = tail call double @cos(double %8)
%22 = fmul double %21, %1
%23 = fdiv double %22, 6.378140e+06
%24 = fadd double %20, %23
%25 = fneg double %24
%26 = tail call double @sin(double %9)
%27 = fmul double %26, %25
%28 = tail call double @sin(double %10)
%29 = fmul double %28, %27
%30 = tail call double @cos(double %11)
%31 = tail call double @sin(double %9)
%32 = tail call double @cos(double %10)
%33 = fmul double %31, %25
%34 = tail call double @llvm.fmuladd.f64(double %33, double %32, double %30)
%35 = tail call double @atan2(double %29, double %34)
%36 = tail call double @sin(double %11)
%37 = tail call double @sin(double %9)
%38 = fneg double %19
%39 = tail call double @llvm.fmuladd.f64(double %38, double %37, double %36)
%40 = tail call double @cos(double %35)
%41 = fmul double %39, %40
%42 = tail call double @cos(double %11)
%43 = tail call double @sin(double %9)
%44 = tail call double @cos(double %10)
%45 = fmul double %43, %25
%46 = tail call double @llvm.fmuladd.f64(double %45, double %44, double %42)
%47 = tail call double @atan2(double %41, double %46)
%48 = tail call double @rad2deg(double %47)
store double %48, double* %6
%49 = tail call double @rad2deg(double %35)
store double %49, double* %5
ret void
}