void AstAlg_jde2calendar(double jd, int *year, int *month, int *day, int *hour,
                         int *minute, int *second) {
  long a, b, c, d, e, z;
  long alpha;
  double f;
  double dday, resid;
  jd = jd + 0.5;
  z = (long)jd;
  f = jd - z;
  if (z < 2299161)
    a = z;
  else {
    alpha = (long)((z - 1867216.25) / 36524.25);
    a = z + 1 + alpha - (long)(alpha / 4);
  }
  b = a + 1524;
  c = (long)((b - 122.1) / 365.25);
  d = (long)(365.25 * c);
  e = (long)((b - d) / 30.6001);
  if (e < 14)
    *month = e - 1;
  else
    *month = e - 13;
  if (*month > 2)
    *year = c - 4716;
  else
    *year = c - 4715;
  dday = b - d - (double)((long)(30.6001 * e)) + f;
  *day = (int)dday;
  resid = (dday - *day) * 24.0;
  *hour = (int)resid;
  resid = (resid - *hour) * 60.0;
  *minute = (int)resid;
  resid = (resid - *minute) * 60.0;
  *second = (int)(resid + 0.5);
  return;
}


x86 assembly (clang, -O0):
<AstAlg_jde2calendar>:
push   %rbp
mov    %rsp,%rbp
sub    $0x10,%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)
movsd  0xed3(%rip),%xmm0
addsd  -0x8(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
cvttsd2si -0x8(%rbp),%rax
mov    %rax,-0x68(%rbp)
movsd  -0x8(%rbp),%xmm0
cvtsi2sdq -0x68(%rbp),%xmm1
subsd  %xmm1,%xmm0
movsd  %xmm0,-0x78(%rbp)
cmpq   $0x231519,-0x68(%rbp)
jge    1170 <AstAlg_jde2calendar+0x70>
mov    -0x68(%rbp),%rax
mov    %rax,-0x40(%rbp)
jmp    11c9 <AstAlg_jde2calendar+0xc9>
cvtsi2sdq -0x68(%rbp),%xmm0
movsd  0xe92(%rip),%xmm1
subsd  %xmm1,%xmm0
movsd  0xe7e(%rip),%xmm1
divsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
mov    %rax,-0x70(%rbp)
mov    -0x68(%rbp),%rax
add    $0x1,%rax
add    -0x70(%rbp),%rax
mov    %rax,-0x90(%rbp)
mov    -0x70(%rbp),%rax
mov    $0x4,%ecx
cqto
idiv   %rcx
mov    %rax,%rcx
mov    -0x90(%rbp),%rax
sub    %rcx,%rax
mov    %rax,-0x40(%rbp)
mov    -0x40(%rbp),%rax
add    $0x5f4,%rax
mov    %rax,-0x48(%rbp)
cvtsi2sdq -0x48(%rbp),%xmm0
movsd  0xe43(%rip),%xmm1
subsd  %xmm1,%xmm0
movsd  0xe2f(%rip),%xmm1
divsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
mov    %rax,-0x50(%rbp)
cvtsi2sdq -0x50(%rbp),%xmm1
movsd  0xe14(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
mov    %rax,-0x58(%rbp)
mov    -0x48(%rbp),%rax
sub    -0x58(%rbp),%rax
cvtsi2sd %rax,%xmm0
movsd  0xdea(%rip),%xmm1
divsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
mov    %rax,-0x60(%rbp)
cmpq   $0xe,-0x60(%rbp)
jge    125b <AstAlg_jde2calendar+0x15b>
mov    -0x60(%rbp),%rax
sub    $0x1,%rax
mov    %eax,%ecx
mov    -0x18(%rbp),%rax
mov    %ecx,(%rax)
jmp    126b <AstAlg_jde2calendar+0x16b>
mov    -0x60(%rbp),%rax
sub    $0xd,%rax
mov    %eax,%ecx
mov    -0x18(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x18(%rbp),%rax
cmpl   $0x2,(%rax)
jle    128f <AstAlg_jde2calendar+0x18f>
mov    -0x50(%rbp),%rax
sub    $0x126c,%rax
mov    %eax,%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
jmp    12a1 <AstAlg_jde2calendar+0x1a1>
mov    -0x50(%rbp),%rax
sub    $0x126b,%rax
mov    %eax,%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x48(%rbp),%rax
sub    -0x58(%rbp),%rax
cvtsi2sd %rax,%xmm0
cvtsi2sdq -0x60(%rbp),%xmm2
movsd  0xd5c(%rip),%xmm1
mulsd  %xmm2,%xmm1
cvttsd2si %xmm1,%rax
cvtsi2sd %rax,%xmm1
subsd  %xmm1,%xmm0
addsd  -0x78(%rbp),%xmm0
movsd  %xmm0,-0x80(%rbp)
cvttsd2si -0x80(%rbp),%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
movsd  -0x80(%rbp),%xmm0
mov    -0x20(%rbp),%rax
cvtsi2sdl (%rax),%xmm1
subsd  %xmm1,%xmm0
movsd  0xd3c(%rip),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
cvttsd2si -0x88(%rbp),%ecx
ff
mov    -0x28(%rbp),%rax
mov    %ecx,(%rax)
movsd  -0x88(%rbp),%xmm0
ff
mov    -0x28(%rbp),%rax
cvtsi2sdl (%rax),%xmm1
subsd  %xmm1,%xmm0
movsd  0xcfe(%rip),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
cvttsd2si -0x88(%rbp),%ecx
ff
mov    -0x30(%rbp),%rax
mov    %ecx,(%rax)
movsd  -0x88(%rbp),%xmm0
ff
mov    -0x30(%rbp),%rax
cvtsi2sdl (%rax),%xmm1
subsd  %xmm1,%xmm0
movsd  0xcc8(%rip),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
movsd  0xc84(%rip),%xmm0
addsd  -0x88(%rbp),%xmm0
ff
cvttsd2si %xmm0,%ecx
mov    -0x38(%rbp),%rax
mov    %ecx,(%rax)
add    $0x10,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<AstAlg_jde2calendar>:
push   %rbx
addsd  0xef7(%rip),%xmm0
cvttsd2si %xmm0,%rbx
cvtsi2sd %rbx,%xmm1
cmp    $0x231519,%rbx
jl     114e <AstAlg_jde2calendar+0x4e>
movsd  0xee4(%rip),%xmm2
addsd  %xmm1,%xmm2
divsd  0xee0(%rip),%xmm2
cvttsd2si %xmm2,%r10
add    %r10,%rbx
lea    0x3(%r10),%r11
test   %r10,%r10
cmovns %r10,%r11
sar    $0x2,%r11
sub    %r11,%rbx
add    $0x1,%rbx
add    $0x5f4,%rbx
xorps  %xmm2,%xmm2
cvtsi2sd %rbx,%xmm2
addsd  0xeb3(%rip),%xmm2
movsd  0xeb3(%rip),%xmm3
divsd  %xmm3,%xmm2
cvttsd2si %xmm2,%r10
xorps  %xmm2,%xmm2
cvtsi2sd %r10,%xmm2
mulsd  %xmm3,%xmm2
cvttsd2si %xmm2,%rax
sub    %rax,%rbx
xorps  %xmm2,%xmm2
cvtsi2sd %rbx,%xmm2
movsd  0xe8e(%rip),%xmm3
movapd %xmm2,%xmm4
divsd  %xmm3,%xmm4
cvttsd2si %xmm4,%rax
lea    -0xd(%rax),%r11d
lea    -0x1(%rax),%ebx
cmp    $0xe,%rax
cmovge %r11d,%ebx
mov    %ebx,(%rsi)
xor    %esi,%esi
cmp    $0x3,%ebx
setge  %sil
sub    %esi,%r10d
add    $0xffffed95,%r10d
mov    %r10d,(%rdi)
subsd  %xmm1,%xmm0
xorps  %xmm1,%xmm1
cvtsi2sd %rax,%xmm1
mulsd  %xmm3,%xmm1
cvttsd2si %xmm1,%rax
xorps  %xmm1,%xmm1
cvtsi2sd %rax,%xmm1
subsd  %xmm1,%xmm2
addsd  %xmm0,%xmm2
cvttsd2si %xmm2,%eax
cvttpd2dq %xmm2,%xmm0
cvtdq2pd %xmm0,%xmm0
mov    %eax,(%rdx)
subsd  %xmm0,%xmm2
mulsd  0xe23(%rip),%xmm2
cvttsd2si %xmm2,%eax
cvttpd2dq %xmm2,%xmm0
mov    %eax,(%rcx)
cvtdq2pd %xmm0,%xmm0
subsd  %xmm0,%xmm2
movsd  0xe11(%rip),%xmm0
mulsd  %xmm0,%xmm2
cvttsd2si %xmm2,%eax
cvttpd2dq %xmm2,%xmm1
cvtdq2pd %xmm1,%xmm1
subsd  %xmm1,%xmm2
mulsd  %xmm0,%xmm2
addsd  0xdb9(%rip),%xmm2
mov    %eax,(%r8)
cvttsd2si %xmm2,%eax
mov    %eax,(%r9)
pop    %rbx
ret

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

LLVM IR (-O2):
define void @AstAlg_jde2calendar(double %0, i32* nocapture writeonly %1, i32* nocapture writeonly %2, i32* nocapture writeonly %3, i32* nocapture writeonly %4, i32* nocapture writeonly %5, i32* nocapture writeonly %6) {
%8 = fadd double %0, 5.000000e-01
%9 = fptosi double %8 to i64
%10 = sitofp i64 %9 to double
%11 = icmp slt i64 %9, 2299161
br i1 %11, label %20, label %12
12: ; preds = %7
%13 = fadd double %10, 0xC13C7DD040000000
%14 = fdiv double %13, 0x40E1D58800000000
%15 = fptosi double %14 to i64
%16 = add nuw nsw i64 %9, 1
%17 = add nsw i64 %16, %15
%18 = sdiv i64 %15, -4
%19 = add i64 %17, %18
br label %20
20: ; preds = %7, %12
%21 = phi i64 [ %19, %12 ], [ %9, %7 ]
%22 = add nsw i64 %21, 1524
%23 = sitofp i64 %22 to double
%24 = fadd double %23, -1.221000e+02
%25 = fdiv double %24, 3.652500e+02
%26 = fptosi double %25 to i64
%27 = sitofp i64 %26 to double
%28 = fmul double %27, 3.652500e+02
%29 = fptosi double %28 to i64
%30 = sub nsw i64 %22, %29
%31 = sitofp i64 %30 to double
%32 = fdiv double %31, 3.060010e+01
%33 = fptosi double %32 to i64
%34 = icmp slt i64 %33, 14
%35 = trunc i64 %33 to i32
%36 = select i1 %34, i32 -1, i32 -13
%37 = add i32 %36, %35
store i32 %37, i32* %2
%38 = icmp sgt i32 %37, 2
%39 = trunc i64 %26 to i32
%40 = select i1 %38, i32 -4716, i32 -4715
%41 = add i32 %40, %39
store i32 %41, i32* %1
%42 = fsub double %8, %10
%43 = sitofp i64 %33 to double
%44 = fmul double %43, 3.060010e+01
%45 = fptosi double %44 to i64
%46 = sitofp i64 %45 to double
%47 = fsub double %31, %46
%48 = fadd double %42, %47
%49 = fptosi double %48 to i32
store i32 %49, i32* %3
%50 = sitofp i32 %49 to double
%51 = fsub double %48, %50
%52 = fmul double %51, 2.400000e+01
%53 = fptosi double %52 to i32
store i32 %53, i32* %4
%54 = sitofp i32 %53 to double
%55 = fsub double %52, %54
%56 = fmul double %55, 6.000000e+01
%57 = fptosi double %56 to i32
store i32 %57, i32* %5
%58 = sitofp i32 %57 to double
%59 = fsub double %56, %58
%60 = fmul double %59, 6.000000e+01
%61 = fadd double %60, 5.000000e-01
%62 = fptosi double %61 to i32
store i32 %62, i32* %6
ret void
}