#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 */
long floor(long);
void caldat(double JUL, int *mm, int *dd, int *yy, int *hh, int *mn,
            double *sec) {
  long int igreg, julLong, jalpha, ja, jb, jc, jd, je;
  double fractime;
  igreg = 2299161;
  julLong = (long)(JUL + 0.5);
  if (julLong >= igreg) {
    jalpha = (int)(((julLong - 1867216) - 0.25) / 36524.2);
    ja = julLong + 1 + jalpha - (int)(0.25 * jalpha);
  } else
    ja = julLong;
  jb = ja + 1524;
  jc = floor((6680 + ((jb - 2439870) - 122.1) / 365.25));
  jd = floor((365 * jc + (0.25 * jc)));
  je = floor(((jb - jd) / 30.6001));
  *dd = (int)(floor(jb - jd - (int)(30.6001 * je)));
  *mm = (int)(je - 1);
  *mm = (int)(((*mm - 1) % 12) + 1);
  *yy = (int)(jc - 4715);
  if (*mm > 2)
    *yy = *yy - 1;
  if (*mm <= 0)
    *yy = *yy - 1;
  fractime = (JUL + 0.5) - (double)julLong;
  *hh = (int)(fractime * 24.0);
  fractime = fractime - (double)*hh / 24.0;
  *mn = (int)(fractime * 1440.0);
  *sec = (fractime - (double)*mn / 1440.0) * 86400.0;
}


x86 assembly (clang, -O0):
<caldat>:
push   %rbp
mov    %rsp,%rbp
sub    $0x80,%rsp
movsd  %xmm0,-0x8(%rbp)
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    %rcx,-0x28(%rbp)
mov    %r8,-0x30(%rbp)
mov    %r9,-0x38(%rbp)
movq   $0x231519,-0x40(%rbp)
movsd  0xeb8(%rip),%xmm0
addsd  -0x8(%rbp),%xmm0
cvttsd2si %xmm0,%rax
mov    %rax,-0x48(%rbp)
mov    -0x48(%rbp),%rax
cmp    -0x40(%rbp),%rax
jl     11c6 <caldat+0xb6>
mov    -0x48(%rbp),%rax
sub    $0x1c7dd0,%rax
cvtsi2sd %rax,%xmm0
movsd  0xe8d(%rip),%xmm1
subsd  %xmm1,%xmm0
movsd  0xe89(%rip),%xmm1
divsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
cltq
mov    %rax,-0x50(%rbp)
mov    -0x48(%rbp),%rax
add    $0x1,%rax
add    -0x50(%rbp),%rax
cvtsi2sdq -0x50(%rbp),%xmm1
movsd  0xe59(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%ecx
movslq %ecx,%rcx
sub    %rcx,%rax
mov    %rax,-0x58(%rbp)
jmp    11ce <caldat+0xbe>
mov    -0x48(%rbp),%rax
mov    %rax,-0x58(%rbp)
mov    -0x58(%rbp),%rax
add    $0x5f4,%rax
mov    %rax,-0x60(%rbp)
mov    -0x60(%rbp),%rax
sub    $0x253abe,%rax
cvtsi2sd %rax,%xmm1
movsd  0xe3d(%rip),%xmm0
subsd  %xmm0,%xmm1
movsd  0xe29(%rip),%xmm0
divsd  %xmm0,%xmm1
movsd  0xe15(%rip),%xmm0
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rdi
call   1030 <floor@plt>
mov    %rax,-0x68(%rbp)
imul   $0x16d,-0x68(%rbp),%rax
cvtsi2sd %rax,%xmm1
cvtsi2sdq -0x68(%rbp),%xmm0
movsd  0xdd0(%rip),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rdi
call   1030 <floor@plt>
mov    %rax,-0x70(%rbp)
mov    -0x60(%rbp),%rax
sub    -0x70(%rbp),%rax
cvtsi2sd %rax,%xmm0
movsd  0xdb5(%rip),%xmm1
divsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rdi
call   1030 <floor@plt>
mov    %rax,-0x78(%rbp)
mov    -0x60(%rbp),%rdi
sub    -0x70(%rbp),%rdi
cvtsi2sdq -0x78(%rbp),%xmm1
movsd  0xd8d(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
cltq
sub    %rax,%rdi
call   1030 <floor@plt>
mov    %eax,%ecx
mov    -0x18(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x78(%rbp),%rax
sub    $0x1,%rax
mov    %eax,%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x10(%rbp),%rax
mov    (%rax),%eax
sub    $0x1,%eax
mov    $0xc,%ecx
cltd
idiv   %ecx
add    $0x1,%edx
mov    -0x10(%rbp),%rax
mov    %edx,(%rax)
mov    -0x68(%rbp),%rax
sub    $0x126b,%rax
mov    %eax,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x10(%rbp),%rax
cmpl   $0x2,(%rax)
jle    12fd <caldat+0x1ed>
mov    -0x20(%rbp),%rax
mov    (%rax),%ecx
sub    $0x1,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x10(%rbp),%rax
cmpl   $0x0,(%rax)
jg     1319 <caldat+0x209>
mov    -0x20(%rbp),%rax
mov    (%rax),%ecx
sub    $0x1,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
movsd  0xcdf(%rip),%xmm0
addsd  -0x8(%rbp),%xmm0
cvtsi2sdq -0x48(%rbp),%xmm1
subsd  %xmm1,%xmm0
movsd  %xmm0,-0x80(%rbp)
movsd  0xd0b(%rip),%xmm0
mulsd  -0x80(%rbp),%xmm0
cvttsd2si %xmm0,%ecx
mov    -0x28(%rbp),%rax
mov    %ecx,(%rax)
movsd  -0x80(%rbp),%xmm0
mov    -0x28(%rbp),%rax
cvtsi2sdl (%rax),%xmm1
movsd  0xce7(%rip),%xmm2
divsd  %xmm2,%xmm1
subsd  %xmm1,%xmm0
movsd  %xmm0,-0x80(%rbp)
movsd  0xcca(%rip),%xmm0
mulsd  -0x80(%rbp),%xmm0
cvttsd2si %xmm0,%ecx
mov    -0x30(%rbp),%rax
mov    %ecx,(%rax)
movsd  -0x80(%rbp),%xmm0
mov    -0x30(%rbp),%rax
cvtsi2sdl (%rax),%xmm1
movsd  0xca6(%rip),%xmm2
divsd  %xmm2,%xmm1
subsd  %xmm1,%xmm0
movsd  0xc8e(%rip),%xmm1
mulsd  %xmm1,%xmm0
mov    -0x38(%rbp),%rax
movsd  %xmm0,(%rax)
add    $0x80,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<caldat>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
addsd  0xeda(%rip),%xmm0
mov    %r9,0x18(%rsp)
mov    %r8,0x10(%rsp)
mov    %rcx,0x8(%rsp)
mov    %rdx,%rbp
mov    %rsi,(%rsp)
mov    %rdi,%rbx
movsd  %xmm0,0x20(%rsp)
cvttsd2si %xmm0,%r13
mov    %r13,%r15
cmp    $0x231519,%r13
jl     119c <caldat+0x8c>
lea    -0x1c7dd0(%r13),%rax
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
addsd  0xe9b(%rip),%xmm0
divsd  0xe9b(%rip),%xmm0
cvttsd2si %xmm0,%eax
movslq %eax,%r15
cvttpd2dq %xmm0,%xmm0
cvtdq2pd %xmm0,%xmm0
mulsd  0xe8c(%rip),%xmm0
cvttsd2si %xmm0,%eax
add    %r13,%r15
cltq
sub    %rax,%r15
add    $0x1,%r15
lea    -0x2534ca(%r15),%rax
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
addsd  0xe6d(%rip),%xmm0
divsd  0xe6d(%rip),%xmm0
addsd  0xe6d(%rip),%xmm0
cvttsd2si %xmm0,%rdi
call   1030 <floor@plt>
mov    %rax,%r14
imul   $0x16d,%rax,%rax
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
cvtsi2sd %r14,%xmm1
mulsd  0xe2c(%rip),%xmm1
addsd  %xmm0,%xmm1
cvttsd2si %xmm1,%rdi
call   1030 <floor@plt>
sub    %rax,%r15
add    $0x5f4,%r15
xorps  %xmm0,%xmm0
cvtsi2sd %r15,%xmm0
divsd  0xe24(%rip),%xmm0
cvttsd2si %xmm0,%rdi
call   1030 <floor@plt>
mov    %rax,%r12
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
mulsd  0xe07(%rip),%xmm0
cvttsd2si %xmm0,%eax
cltq
sub    %rax,%r15
mov    %r15,%rdi
call   1030 <floor@plt>
mov    (%rsp),%rcx
mov    %eax,(%rcx)
add    $0xfffffffe,%r12d
movslq %r12d,%rax
imul   $0x2aaaaaab,%rax,%rcx
mov    %rcx,%rdx
shr    $0x3f,%rdx
shr    $0x21,%rcx
add    %edx,%ecx
shl    $0x2,%ecx
lea    (%rcx,%rcx,2),%ecx
sub    %ecx,%eax
add    $0x1,%eax
mov    %eax,(%rbx)
lea    -0x126b(%r14),%eax
mov    %eax,0x0(%rbp)
mov    (%rbx),%ecx
cmp    $0x3,%ecx
jl     1291 <caldat+0x181>
add    $0xffffed94,%r14d
mov    %r14d,0x0(%rbp)
mov    (%rbx),%ecx
mov    %r14d,%eax
test   %ecx,%ecx
jg     129b <caldat+0x18b>
add    $0xffffffff,%eax
mov    %eax,0x0(%rbp)
xorps  %xmm0,%xmm0
cvtsi2sd %r13,%xmm0
movsd  0x20(%rsp),%xmm2
subsd  %xmm0,%xmm2
movsd  0xd8b(%rip),%xmm0
movapd %xmm2,%xmm1
mulsd  %xmm0,%xmm1
cvttsd2si %xmm1,%eax
mov    0x8(%rsp),%rcx
mov    %eax,(%rcx)
cvttpd2dq %xmm1,%xmm1
cvtdq2pd %xmm1,%xmm1
divsd  %xmm0,%xmm1
subsd  %xmm1,%xmm2
movsd  0xd68(%rip),%xmm0
movapd %xmm2,%xmm1
mulsd  %xmm0,%xmm1
cvttsd2si %xmm1,%eax
cvttpd2dq %xmm1,%xmm1
mov    0x10(%rsp),%rcx
mov    %eax,(%rcx)
cvtdq2pd %xmm1,%xmm1
divsd  %xmm0,%xmm1
subsd  %xmm1,%xmm2
mulsd  0xd45(%rip),%xmm2
mov    0x18(%rsp),%rax
movsd  %xmm2,(%rax)
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @caldat(double %0, i32* %1, i32* %2, i32* %3, i32* %4, i32* %5, double* %6) {
%8 = alloca double
%9 = alloca i32*
%10 = alloca i32*
%11 = alloca i32*
%12 = alloca i32*
%13 = alloca i32*
%14 = alloca double*
%15 = alloca i64
%16 = alloca i64
%17 = alloca i64
%18 = alloca i64
%19 = alloca i64
%20 = alloca i64
%21 = alloca i64
%22 = alloca i64
%23 = alloca double
store double %0, double* %8
store i32* %1, i32** %9
store i32* %2, i32** %10
store i32* %3, i32** %11
store i32* %4, i32** %12
store i32* %5, i32** %13
store double* %6, double** %14
store i64 2299161, i64* %15
%24 = load double, double* %8
%25 = fadd double %24, 5.000000e-01
%26 = fptosi double %25 to i64
store i64 %26, i64* %16
%27 = load i64, i64* %16
%28 = load i64, i64* %15
%29 = icmp sge i64 %27, %28
br i1 %29, label %30, label %48
30: ; preds = %7
%31 = load i64, i64* %16
%32 = sub nsw i64 %31, 1867216
%33 = sitofp i64 %32 to double
%34 = fsub double %33, 2.500000e-01
%35 = fdiv double %34, 3.652420e+04
%36 = fptosi double %35 to i32
%37 = sext i32 %36 to i64
store i64 %37, i64* %17
%38 = load i64, i64* %16
%39 = add nsw i64 %38, 1
%40 = load i64, i64* %17
%41 = add nsw i64 %39, %40
%42 = load i64, i64* %17
%43 = sitofp i64 %42 to double
%44 = fmul double 2.500000e-01, %43
%45 = fptosi double %44 to i32
%46 = sext i32 %45 to i64
%47 = sub nsw i64 %41, %46
store i64 %47, i64* %18
br label %50
48: ; preds = %7
%49 = load i64, i64* %16
store i64 %49, i64* %18
br label %50
50: ; preds = %48, %30
%51 = load i64, i64* %18
%52 = add nsw i64 %51, 1524
store i64 %52, i64* %19
%53 = load i64, i64* %19
%54 = sub nsw i64 %53, 2439870
%55 = sitofp i64 %54 to double
%56 = fsub double %55, 1.221000e+02
%57 = fdiv double %56, 3.652500e+02
%58 = fadd double 6.680000e+03, %57
%59 = fptosi double %58 to i64
%60 = call i64 @floor(i64 %59)
store i64 %60, i64* %20
%61 = load i64, i64* %20
%62 = mul nsw i64 365, %61
%63 = sitofp i64 %62 to double
%64 = load i64, i64* %20
%65 = sitofp i64 %64 to double
%66 = call double @llvm.fmuladd.f64(double 2.500000e-01, double %65, double %63)
%67 = fptosi double %66 to i64
%68 = call i64 @floor(i64 %67)
store i64 %68, i64* %21
%69 = load i64, i64* %19
%70 = load i64, i64* %21
%71 = sub nsw i64 %69, %70
%72 = sitofp i64 %71 to double
%73 = fdiv double %72, 3.060010e+01
%74 = fptosi double %73 to i64
%75 = call i64 @floor(i64 %74)
store i64 %75, i64* %22
%76 = load i64, i64* %19
%77 = load i64, i64* %21
%78 = sub nsw i64 %76, %77
%79 = load i64, i64* %22
%80 = sitofp i64 %79 to double
%81 = fmul double 3.060010e+01, %80
%82 = fptosi double %81 to i32
%83 = sext i32 %82 to i64
%84 = sub nsw i64 %78, %83
%85 = call i64 @floor(i64 %84)
%86 = trunc i64 %85 to i32
%87 = load i32*, i32** %10
store i32 %86, i32* %87
%88 = load i64, i64* %22
%89 = sub nsw i64 %88, 1
%90 = trunc i64 %89 to i32
%91 = load i32*, i32** %9
store i32 %90, i32* %91
%92 = load i32*, i32** %9
%93 = load i32, i32* %92
%94 = sub nsw i32 %93, 1
%95 = srem i32 %94, 12
%96 = add nsw i32 %95, 1
%97 = load i32*, i32** %9
store i32 %96, i32* %97
%98 = load i64, i64* %20
%99 = sub nsw i64 %98, 4715
%100 = trunc i64 %99 to i32
%101 = load i32*, i32** %11
store i32 %100, i32* %101
%102 = load i32*, i32** %9
%103 = load i32, i32* %102
%104 = icmp sgt i32 %103, 2
br i1 %104, label %105, label %110
105: ; preds = %50
%106 = load i32*, i32** %11
%107 = load i32, i32* %106
%108 = sub nsw i32 %107, 1
%109 = load i32*, i32** %11
store i32 %108, i32* %109
br label %110
110: ; preds = %105, %50
%111 = load i32*, i32** %9
%112 = load i32, i32* %111
%113 = icmp sle i32 %112, 0
br i1 %113, label %114, label %119
114: ; preds = %110
%115 = load i32*, i32** %11
%116 = load i32, i32* %115
%117 = sub nsw i32 %116, 1
%118 = load i32*, i32** %11
store i32 %117, i32* %118
br label %119
119: ; preds = %114, %110
%120 = load double, double* %8
%121 = fadd double %120, 5.000000e-01
%122 = load i64, i64* %16
%123 = sitofp i64 %122 to double
%124 = fsub double %121, %123
store double %124, double* %23
%125 = load double, double* %23
%126 = fmul double %125, 2.400000e+01
%127 = fptosi double %126 to i32
%128 = load i32*, i32** %12
store i32 %127, i32* %128
%129 = load double, double* %23
%130 = load i32*, i32** %12
%131 = load i32, i32* %130
%132 = sitofp i32 %131 to double
%133 = fdiv double %132, 2.400000e+01
%134 = fsub double %129, %133
store double %134, double* %23
%135 = load double, double* %23
%136 = fmul double %135, 1.440000e+03
%137 = fptosi double %136 to i32
%138 = load i32*, i32** %13
store i32 %137, i32* %138
%139 = load double, double* %23
%140 = load i32*, i32** %13
%141 = load i32, i32* %140
%142 = sitofp i32 %141 to double
%143 = fdiv double %142, 1.440000e+03
%144 = fsub double %139, %143
%145 = fmul double %144, 8.640000e+04
%146 = load double*, double** %14
store double %145, double* %146
ret void
}

LLVM IR (-O2):
define void @caldat(double %0, i32* nocapture %1, i32* nocapture writeonly %2, i32* nocapture %3, i32* nocapture writeonly %4, i32* nocapture writeonly %5, double* nocapture writeonly %6) {
%8 = fadd double %0, 5.000000e-01
%9 = fptosi double %8 to i64
%10 = icmp sgt i64 %9, 2299160
br i1 %10, label %11, label %25
11: ; preds = %7
%12 = add nsw i64 %9, -1867216
%13 = sitofp i64 %12 to double
%14 = fadd double %13, -2.500000e-01
%15 = fdiv double %14, 3.652420e+04
%16 = fptosi double %15 to i32
%17 = sext i32 %16 to i64
%18 = add nuw nsw i64 %9, 1
%19 = add nsw i64 %18, %17
%20 = sitofp i32 %16 to double
%21 = fmul double %20, 2.500000e-01
%22 = fptosi double %21 to i32
%23 = sext i32 %22 to i64
%24 = sub i64 %19, %23
br label %25
25: ; preds = %7, %11
%26 = phi i64 [ %24, %11 ], [ %9, %7 ]
%27 = add nsw i64 %26, 1524
%28 = add nsw i64 %26, -2438346
%29 = sitofp i64 %28 to double
%30 = fadd double %29, -1.221000e+02
%31 = fdiv double %30, 3.652500e+02
%32 = fadd double %31, 6.680000e+03
%33 = fptosi double %32 to i64
%34 = tail call i64 @floor(i64 %33)
%35 = mul nsw i64 %34, 365
%36 = sitofp i64 %35 to double
%37 = sitofp i64 %34 to double
%38 = tail call double @llvm.fmuladd.f64(double %37, double 2.500000e-01, double %36)
%39 = fptosi double %38 to i64
%40 = tail call i64 @floor(i64 %39)
%41 = sub i64 %27, %40
%42 = sitofp i64 %41 to double
%43 = fdiv double %42, 3.060010e+01
%44 = fptosi double %43 to i64
%45 = tail call i64 @floor(i64 %44)
%46 = sitofp i64 %45 to double
%47 = fmul double %46, 3.060010e+01
%48 = fptosi double %47 to i32
%49 = sext i32 %48 to i64
%50 = sub nsw i64 %41, %49
%51 = tail call i64 @floor(i64 %50)
%52 = trunc i64 %51 to i32
store i32 %52, i32* %2
%53 = trunc i64 %45 to i32
%54 = add i32 %53, -2
%55 = srem i32 %54, 12
%56 = add nsw i32 %55, 1
store i32 %56, i32* %1
%57 = trunc i64 %34 to i32
%58 = add i32 %57, -4715
store i32 %58, i32* %3
%59 = load i32, i32* %1
%60 = icmp sgt i32 %59, 2
br i1 %60, label %61, label %64
61: ; preds = %25
%62 = add i32 %57, -4716
store i32 %62, i32* %3
%63 = load i32, i32* %1
br label %64
64: ; preds = %61, %25
%65 = phi i32 [ %62, %61 ], [ %58, %25 ]
%66 = phi i32 [ %63, %61 ], [ %59, %25 ]
%67 = icmp slt i32 %66, 1
br i1 %67, label %68, label %70
68: ; preds = %64
%69 = add nsw i32 %65, -1
store i32 %69, i32* %3
br label %70
70: ; preds = %68, %64
%71 = sitofp i64 %9 to double
%72 = fsub double %8, %71
%73 = fmul double %72, 2.400000e+01
%74 = fptosi double %73 to i32
store i32 %74, i32* %4
%75 = sitofp i32 %74 to double
%76 = fdiv double %75, 2.400000e+01
%77 = fsub double %72, %76
%78 = fmul double %77, 1.440000e+03
%79 = fptosi double %78 to i32
store i32 %79, i32* %5
%80 = sitofp i32 %79 to double
%81 = fdiv double %80, 1.440000e+03
%82 = fsub double %77, %81
%83 = fmul double %82, 8.640000e+04
store double %83, double* %6
ret void
}