#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 */
unsigned long long hDivPow10_ULL(unsigned long long, int);
unsigned long long hDoubleToLongBits(double);
int hNumDigits(unsigned long long);
unsigned long long hScaleDoubleToULL(double value, int *pval_exp) {
  ((void)0);
  unsigned long long val_ull;
  int digs;
  int pow2, pow10;
  val_ull = hDoubleToLongBits(value);
  pow2 = (val_ull >> 52) - 1023;
  val_ull &= (1ull << 52) - 1;
  if (pow2 > -1023) {
    val_ull |= (1ull << 52);
  } else {
    pow2 += 1;
  }
  pow2 -= 52;
  pow10 = 0;
  while (pow2 > 0) {
    if (val_ull < (1ull << 63)) {
      val_ull *= 2;
      --pow2;
    } else {
      val_ull = (val_ull - 3) / 5 + 1;
      ++pow10;
      --pow2;
    }
  }
  while (pow2 < 0) {
    if (val_ull <= 0x3333333333333333ull) {
      val_ull *= 5;
      --pow10;
      ++pow2;
    } else {
      val_ull = val_ull / 2 + (val_ull & (val_ull / 2) & 1);
      ++pow2;
    }
  }
  digs = hNumDigits(val_ull);
  if (digs > 16) {
    int scale = digs - 16;
    val_ull = hDivPow10_ULL(val_ull, scale);
    pow10 += scale;
    ((void)0);
  }
  *pval_exp = pow10;
  return val_ull;
}


x86 assembly (clang, -O0):
<hScaleDoubleToULL>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
movsd  %xmm0,-0x8(%rbp)
mov    %rdi,-0x10(%rbp)
movsd  -0x8(%rbp),%xmm0
call   1050 <hDoubleToLongBits@plt>
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
shr    $0x34,%rax
sub    $0x3ff,%rax
mov    %eax,-0x20(%rbp)
movabs $0xfffffffffffff,%rax
and    -0x18(%rbp),%rax
mov    %rax,-0x18(%rbp)
cmpl   $0xfffffc01,-0x20(%rbp)
jle    1196 <hScaleDoubleToULL+0x66>
movabs $0x10000000000000,%rax
or     -0x18(%rbp),%rax
mov    %rax,-0x18(%rbp)
jmp    119f <hScaleDoubleToULL+0x6f>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
mov    -0x20(%rbp),%eax
sub    $0x34,%eax
mov    %eax,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
cmpl   $0x0,-0x20(%rbp)
jle    1218 <hScaleDoubleToULL+0xe8>
movabs $0x8000000000000000,%rax
cmp    %rax,-0x18(%rbp)
jae    11e7 <hScaleDoubleToULL+0xb7>
mov    -0x18(%rbp),%rax
shl    $0x1,%rax
mov    %rax,-0x18(%rbp)
mov    -0x20(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x20(%rbp)
jmp    1213 <hScaleDoubleToULL+0xe3>
mov    -0x18(%rbp),%rax
sub    $0x3,%rax
mov    $0x5,%ecx
xor    %edx,%edx
div    %rcx
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
mov    -0x20(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x20(%rbp)
jmp    11af <hScaleDoubleToULL+0x7f>
jmp    121d <hScaleDoubleToULL+0xed>
cmpl   $0x0,-0x20(%rbp)
jge    128b <hScaleDoubleToULL+0x15b>
movabs $0x3333333333333333,%rax
33 33 33
cmp    %rax,-0x18(%rbp)
ja     125b <hScaleDoubleToULL+0x12b>
imul   $0x5,-0x18(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x24(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x24(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1286 <hScaleDoubleToULL+0x156>
mov    -0x18(%rbp),%rax
shr    $0x1,%rax
mov    -0x18(%rbp),%rcx
mov    -0x18(%rbp),%rdx
shr    $0x1,%rdx
and    %rdx,%rcx
and    $0x1,%rcx
add    %rcx,%rax
mov    %rax,-0x18(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    121d <hScaleDoubleToULL+0xed>
mov    -0x18(%rbp),%rdi
call   1030 <hNumDigits@plt>
mov    %eax,-0x1c(%rbp)
cmpl   $0x10,-0x1c(%rbp)
jle    12c3 <hScaleDoubleToULL+0x193>
mov    -0x1c(%rbp),%eax
sub    $0x10,%eax
mov    %eax,-0x28(%rbp)
mov    -0x18(%rbp),%rdi
mov    -0x28(%rbp),%esi
call   1040 <hDivPow10_ULL@plt>
mov    %rax,-0x18(%rbp)
mov    -0x28(%rbp),%eax
add    -0x24(%rbp),%eax
mov    %eax,-0x24(%rbp)
mov    -0x24(%rbp),%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x18(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<hScaleDoubleToULL>:
push   %r15
push   %r14
push   %r12
push   %rbx
push   %rax
mov    %rdi,%r14
call   1050 <hDoubleToLongBits@plt>
mov    %rax,%rcx
shr    $0x34,%rcx
movabs $0xfffffffffffff,%rdx
and    %rdx,%rax
lea    -0x433(%rcx),%esi
test   %rcx,%rcx
mov    $0xfffffbce,%ecx
cmovne %esi,%ecx
lea    0x1(%rax,%rdx,1),%rbx
cmove  %rax,%rbx
test   %ecx,%ecx
jle    1183 <hScaleDoubleToULL+0x53>
cmp    $0x1,%ecx
jne    120f <hScaleDoubleToULL+0xdf>
xor    %r12d,%r12d
jmp    128c <hScaleDoubleToULL+0x15c>
xor    %r12d,%r12d
test   %ecx,%ecx
jns    12ea <hScaleDoubleToULL+0x1ba>
movabs $0x3333333333333334,%rax
33 33 33
mov    %ecx,%edx
neg    %edx
cmp    $0xffffffff,%ecx
je     12c0 <hScaleDoubleToULL+0x190>
mov    %edx,%ecx
and    $0xfffffffe,%ecx
xor    %r12d,%r12d
jmp    11c1 <hScaleDoubleToULL+0x91>
nop
lea    (%rsi,%rsi,4),%rbx
add    $0xffffffff,%r12d
add    $0xfffffffe,%ecx
je     12c3 <hScaleDoubleToULL+0x193>
cmp    %rax,%rbx
jae    11e0 <hScaleDoubleToULL+0xb0>
lea    (%rbx,%rbx,4),%rsi
add    $0xffffffff,%r12d
cmp    %rax,%rsi
jb     11b0 <hScaleDoubleToULL+0x80>
jmp    11f5 <hScaleDoubleToULL+0xc5>
cs nopw 0x0(%rax,%rax,1)
nop
mov    %rbx,%rdi
shr    %rdi
mov    %edi,%esi
and    %ebx,%esi
and    $0x1,%esi
add    %rdi,%rsi
cmp    %rax,%rsi
jb     11b0 <hScaleDoubleToULL+0x80>
mov    %rsi,%rdi
shr    %rdi
mov    %edi,%ebx
and    %esi,%ebx
and    $0x1,%ebx
add    %rdi,%rbx
add    $0xfffffffe,%ecx
jne    11c1 <hScaleDoubleToULL+0x91>
jmp    12c3 <hScaleDoubleToULL+0x193>
mov    %ecx,%esi
and    $0xfffffffe,%esi
xor    %r12d,%r12d
movabs $0xcccccccccccccccd,%rdi
cc cc cc
jmp    1238 <hScaleDoubleToULL+0x108>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    %rbx,%rbx
add    $0xfffffffe,%esi
je     128c <hScaleDoubleToULL+0x15c>
test   %rbx,%rbx
js     1250 <hScaleDoubleToULL+0x120>
add    %rbx,%rbx
test   %rbx,%rbx
jns    1230 <hScaleDoubleToULL+0x100>
jmp    126e <hScaleDoubleToULL+0x13e>
nopw   0x0(%rax,%rax,1)
add    $0xfffffffffffffffd,%rbx
mov    %rbx,%rax
mul    %rdi
mov    %rdx,%rbx
shr    $0x2,%rbx
add    $0x1,%rbx
add    $0x1,%r12d
test   %rbx,%rbx
jns    1230 <hScaleDoubleToULL+0x100>
add    $0xfffffffffffffffd,%rbx
mov    %rbx,%rax
mul    %rdi
mov    %rdx,%rbx
shr    $0x2,%rbx
add    $0x1,%rbx
add    $0x1,%r12d
add    $0xfffffffe,%esi
jne    1238 <hScaleDoubleToULL+0x108>
test   $0x1,%cl
je     12ea <hScaleDoubleToULL+0x1ba>
test   %rbx,%rbx
js     129b <hScaleDoubleToULL+0x16b>
add    %rbx,%rbx
jmp    12ea <hScaleDoubleToULL+0x1ba>
add    $0xfffffffffffffffd,%rbx
movabs $0xcccccccccccccccd,%rcx
cc cc cc
mov    %rbx,%rax
mul    %rcx
mov    %rdx,%rbx
shr    $0x2,%rbx
add    $0x1,%rbx
add    $0x1,%r12d
jmp    12ea <hScaleDoubleToULL+0x1ba>
xor    %r12d,%r12d
test   $0x1,%dl
je     12ea <hScaleDoubleToULL+0x1ba>
cmp    %rax,%rbx
jae    12d7 <hScaleDoubleToULL+0x1a7>
lea    (%rbx,%rbx,4),%rbx
add    $0xffffffff,%r12d
jmp    12ea <hScaleDoubleToULL+0x1ba>
mov    %rbx,%rax
shr    %rax
mov    %eax,%ecx
and    %ebx,%ecx
and    $0x1,%ecx
add    %rax,%rcx
mov    %rcx,%rbx
mov    %rbx,%rdi
call   1030 <hNumDigits@plt>
cmp    $0x11,%eax
jl     1310 <hScaleDoubleToULL+0x1e0>
mov    %eax,%r15d
lea    -0x10(%r15),%esi
mov    %rbx,%rdi
call   1040 <hDivPow10_ULL@plt>
mov    %rax,%rbx
add    %r15d,%r12d
add    $0xfffffff0,%r12d
mov    %r12d,(%r14)
mov    %rbx,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

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

LLVM IR (-O2):
define i64 @hScaleDoubleToULL(double %0, i32* nocapture writeonly %1) {
%3 = tail call i64 @hDoubleToLongBits(double %0)
%4 = lshr i64 %3, 52
%5 = trunc i64 %4 to i32
%6 = and i64 %3, 4503599627370495
%7 = icmp eq i32 %5, 0
%8 = or i64 %6, 4503599627370496
%9 = add nsw i32 %5, -1075
%10 = select i1 %7, i32 -1074, i32 %9
%11 = select i1 %7, i64 %6, i64 %8
%12 = icmp sgt i32 %10, 0
br i1 %12, label %13, label %18
13: ; preds = %2
%14 = and i32 %10, 1
%15 = icmp eq i32 %10, 1
br i1 %15, label %84, label %16
16: ; preds = %13
%17 = and i32 %10, -2
br label %26
18: ; preds = %2
%19 = icmp slt i32 %10, 0
br i1 %19, label %20, label %115
20: ; preds = %18
%21 = sub nsw i32 0, %10
%22 = and i32 %21, 1
%23 = icmp eq i32 %10, -1
br i1 %23, label %99, label %24
24: ; preds = %20
%25 = and i32 %21, -2
br label %54
26: ; preds = %49, %16
%27 = phi i64 [ %11, %16 ], [ %51, %49 ]
%28 = phi i32 [ 0, %16 ], [ %50, %49 ]
%29 = phi i32 [ 0, %16 ], [ %52, %49 ]
%30 = icmp sgt i64 %27, -1
br i1 %30, label %31, label %33
31: ; preds = %26
%32 = shl nuw i64 %27, 1
br label %38
33: ; preds = %26
%34 = add i64 %27, -3
%35 = udiv i64 %34, 5
%36 = add nuw nsw i64 %35, 1
%37 = add nsw i32 %28, 1
br label %38
38: ; preds = %33, %31
%39 = phi i32 [ %28, %31 ], [ %37, %33 ]
%40 = phi i64 [ %32, %31 ], [ %36, %33 ]
%41 = icmp sgt i64 %40, -1
br i1 %41, label %47, label %42
42: ; preds = %38
%43 = add i64 %40, -3
%44 = udiv i64 %43, 5
%45 = add nuw nsw i64 %44, 1
%46 = add nsw i32 %39, 1
br label %49
47: ; preds = %38
%48 = shl nuw i64 %40, 1
br label %49
49: ; preds = %47, %42
%50 = phi i32 [ %39, %47 ], [ %46, %42 ]
%51 = phi i64 [ %48, %47 ], [ %45, %42 ]
%52 = add i32 %29, 2
%53 = icmp eq i32 %52, %17
br i1 %53, label %84, label %26
54: ; preds = %79, %24
%55 = phi i64 [ %11, %24 ], [ %81, %79 ]
%56 = phi i32 [ 0, %24 ], [ %80, %79 ]
%57 = phi i32 [ 0, %24 ], [ %82, %79 ]
%58 = icmp ult i64 %55, 3689348814741910324
br i1 %58, label %59, label %62
59: ; preds = %54
%60 = mul nuw i64 %55, 5
%61 = add nsw i32 %56, -1
br label %67
62: ; preds = %54
%63 = lshr i64 %55, 1
%64 = and i64 %55, 1
%65 = and i64 %64, %63
%66 = add nuw i64 %65, %63
br label %67
67: ; preds = %62, %59
%68 = phi i32 [ %61, %59 ], [ %56, %62 ]
%69 = phi i64 [ %60, %59 ], [ %66, %62 ]
%70 = icmp ult i64 %69, 3689348814741910324
br i1 %70, label %76, label %71
71: ; preds = %67
%72 = lshr i64 %69, 1
%73 = and i64 %69, 1
%74 = and i64 %73, %72
%75 = add nuw i64 %74, %72
br label %79
76: ; preds = %67
%77 = mul nuw i64 %69, 5
%78 = add nsw i32 %68, -1
br label %79
79: ; preds = %76, %71
%80 = phi i32 [ %78, %76 ], [ %68, %71 ]
%81 = phi i64 [ %77, %76 ], [ %75, %71 ]
%82 = add i32 %57, 2
%83 = icmp eq i32 %82, %25
br i1 %83, label %99, label %54
84: ; preds = %49, %13
%85 = phi i32 [ undef, %13 ], [ %50, %49 ]
%86 = phi i64 [ undef, %13 ], [ %51, %49 ]
%87 = phi i64 [ %11, %13 ], [ %51, %49 ]
%88 = phi i32 [ 0, %13 ], [ %50, %49 ]
%89 = icmp eq i32 %14, 0
br i1 %89, label %115, label %90
90: ; preds = %84
%91 = icmp sgt i64 %87, -1
br i1 %91, label %97, label %92
92: ; preds = %90
%93 = add i64 %87, -3
%94 = udiv i64 %93, 5
%95 = add nuw nsw i64 %94, 1
%96 = add nsw i32 %88, 1
br label %115
97: ; preds = %90
%98 = shl nuw i64 %87, 1
br label %115
99: ; preds = %79, %20
%100 = phi i32 [ undef, %20 ], [ %80, %79 ]
%101 = phi i64 [ undef, %20 ], [ %81, %79 ]
%102 = phi i64 [ %11, %20 ], [ %81, %79 ]
%103 = phi i32 [ 0, %20 ], [ %80, %79 ]
%104 = icmp eq i32 %22, 0
br i1 %104, label %115, label %105
105: ; preds = %99
%106 = icmp ult i64 %102, 3689348814741910324
br i1 %106, label %112, label %107
107: ; preds = %105
%108 = lshr i64 %102, 1
%109 = and i64 %102, 1
%110 = and i64 %109, %108
%111 = add nuw i64 %110, %108
br label %115
112: ; preds = %105
%113 = mul nuw i64 %102, 5
%114 = add nsw i32 %103, -1
br label %115
115: ; preds = %99, %112, %107, %84, %97, %92, %18
%116 = phi i32 [ 0, %18 ], [ %85, %84 ], [ %88, %97 ], [ %96, %92 ], [ %100, %99 ], [ %114, %112 ], [ %103, %107 ]
%117 = phi i64 [ %11, %18 ], [ %86, %84 ], [ %98, %97 ], [ %95, %92 ], [ %101, %99 ], [ %113, %112 ], [ %111, %107 ]
%118 = tail call i32 @hNumDigits(i64 %117)
%119 = icmp sgt i32 %118, 16
br i1 %119, label %120, label %124
120: ; preds = %115
%121 = add nsw i32 %118, -16
%122 = tail call i64 @hDivPow10_ULL(i64 %117, i32 %121)
%123 = add nsw i32 %121, %116
br label %124
124: ; preds = %120, %115
%125 = phi i32 [ %123, %120 ], [ %116, %115 ]
%126 = phi i64 [ %122, %120 ], [ %117, %115 ]
store i32 %125, i32* %1
ret i64 %126
}