// File: /workspace/github_cpp_makefile_star2_O2/jkingan[P]ladyheather/heathmsc.cpp
// Function: scale_adev(float)
float scale_adev(float val)
{
double check;
double mant;
double expo;
double v;

   // convert adev value into an decade_exponent.mantissa value
   // Warning: due to subtle rounding/truncation issues,  change
   //          anything in this routine at your own risk...
if(ATYPE == A_MTIE) return val;

   if(val > 1.0e0F) {
      val = (float) (0.0F);
      return val;
   }
   else if(val > 1.0e-1F) {
      val = (float) ((-1.0F) + (val/1.0e-0F));
   }
   else if(val > 1.0e-2F) {
      val = (float) ((-2.0F) + (val/1.0e-1F));
   }
   else if(val > 1.0e-3F) {
      val = (float) ((-3.0F) + (val/1.0e-2F));
   }
   else if(val > 1.0e-4F) {
      val = (float) ((-4.0F) + (val/1.0e-3F));
   }
   else if(val > 1.0e-5F) {
      val = (float) ((-5.0F) + (val/1.0e-4F));
   }
   else if(val > 1.0e-6F) {
      val = (float) ((-6.0F) + (val/1.0e-5F));
   }
   else if(val > 1.0e-7F) {
      val = (float) ((-7.0F) + (val/1.0e-6F));
   }
   else if(val > 1.0e-8F) {
      val = (float) ((-8.0F) + (val/1.0e-7F));
   }
   else if(val > 1.0e-9F) {
      val = (float) ((-9.0F) + (val/1.0e-8F));
   }
   else if(val > 1.0e-10F) {
      val = (float) ((-10.0F) + (val/1.0e-9F));
   }
   else if(val > 1.0e-11F) {
      val = (float) ((-11.0F) + (val/1.0e-10F));
   }
   else if(val > 1.0e-12F) {
      val = (float) ((-12.0F) + (val/1.0e-11F));
   }
   else if(val > 1.0e-13F) {
      val = (float) ((-13.0F) + (val/1.0e-12F));
   }
   else if(val > 1.0e-14F) {
      val = (float) ((-14.0F) + (val/1.0e-13F));
   }
   else if(val > 1.0e-15F) {
      val = (float) ((-15.0F) + (val/1.0e-14F));
   }
   else if(val > 1.0e-16F) {
      val = (float) ((-16.0F) + (val/1.0e-15F));
   }
   else if(val > 1.0e-17F) {
      val = (float) ((-17.0F) + (val/1.0e-16F));
   }
   else if(val > 1.0e-18F) {
      val = (float) ((-18.0F) + (val/1.0e-17F));
   }
   else if(val > 1.0e-19F) {
      val = (float) ((-19.0F) + (val/1.0e-18F));
   }
   else if(val > 1.0e-20F) {
      val = (float) ((-20.0F) + (val/1.0e-19F));
   }
   else if(val > 1.0e-21F) {
      val = (float) ((-21.0F) + (val/1.0e-20F));
   }
   else if(val > 1.0e-22F) {
      val = (float) ((-22.0F) + (val/1.0e-21F));
   }
   else if(val > 1.0e-23F) {
      val = (float) ((-23.0F) + (val/1.0e-22F));
   }
   else if(val > 1.0e-24F) {
      val = (float) ((-24.0F) + (val/1.0e-23F));
   }
   else if(val > 1.0e-25F) {
      val = (float) ((-25.0F) + (val/1.0e-24F));
   }
   else if(val > 1.0e-26F) {
      val = (float) ((-26.0F) + (val/1.0e-25F));
   }
   else if(val > 1.0e-27F) {
      val = (float) ((-27.0F) + (val/1.0e-26F));
   }
   else if(val > 1.0e-28F) {
      val = (float) ((-28.0F) + (val/1.0e-27F));
   }
   else if(val > 1.0e-29F) {
      val = (float) ((-29.0F) + (val/1.0e-28F));
   }
   else val = (float) (-30.0F);

   return val;

   // this code has the rounding issues mentioned above...
   check = 1.0e-0;
   mant = (-1.0);
   expo = 1.0e+1;

   v = val;
   while(mant > (-30.0)) {
      if(v > check) {
         v = (mant + (val/expo));
         return (float) v;
      }
      check /= 10.0;
      mant -= 1.0;
      expo /= 10.0;
   }

   return (float) (-30.0);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
leaq 0x1247f0(%rip), %rax    # 0x20d610
cmpl $0x9, (%rax)
jne 0xe8e2a
movaps %xmm0, %xmm1
jmp 0xe8e36
xorps %xmm1, %xmm1
ucomiss 0xe2b8(%rip), %xmm0     # 0xf70ec
jbe 0xe8e3b
movaps %xmm1, %xmm0
popq %rbp
retq
ucomiss 0x1fb7a(%rip), %xmm0    # 0x1089bc
jbe 0xe8e4e
addss 0xe29c(%rip), %xmm0     # 0xf70e8
jmp 0xe8e25
ucomiss 0x1fb87(%rip), %xmm0    # 0x1089dc
jbe 0xe8e69
divss 0x1fb5d(%rip), %xmm0    # 0x1089bc
addss 0x2d999(%rip), %xmm0    # 0x116800
jmp 0xe8e25
ucomiss 0x2d8c0(%rip), %xmm0    # 0x116730
jbe 0xe8e84
divss 0x1fb62(%rip), %xmm0    # 0x1089dc
addss 0x2d97a(%rip), %xmm0    # 0x1167fc
jmp 0xe8e25
ucomiss 0x2d8a9(%rip), %xmm0    # 0x116734
jbe 0xe8e9f
divss 0x2d89b(%rip), %xmm0    # 0x116730
addss 0x2d95b(%rip), %xmm0    # 0x1167f8
jmp 0xe8e25
ucomiss 0x2d892(%rip), %xmm0    # 0x116738
jbe 0xe8ebd
divss 0x2d884(%rip), %xmm0    # 0x116734
addss 0x2d93c(%rip), %xmm0    # 0x1167f4
jmp 0xe8e25
ucomiss 0x2d878(%rip), %xmm0    # 0x11673c
jbe 0xe8edb
divss 0x2d86a(%rip), %xmm0    # 0x116738
addss 0x2d91a(%rip), %xmm0    # 0x1167f0
jmp 0xe8e25
ucomiss 0x2d85e(%rip), %xmm0    # 0x116740
jbe 0xe8ef9
divss 0x2d850(%rip), %xmm0    # 0x11673c
addss 0x2d8f8(%rip), %xmm0    # 0x1167ec
jmp 0xe8e25
ucomiss 0x2d844(%rip), %xmm0    # 0x116744
jbe 0xe8f17
divss 0x2d836(%rip), %xmm0    # 0x116740
addss 0x2d8d6(%rip), %xmm0    # 0x1167e8
jmp 0xe8e25
ucomiss 0x2d82a(%rip), %xmm0    # 0x116748
jbe 0xe8f35
divss 0x2d81c(%rip), %xmm0    # 0x116744
addss 0x2d8b4(%rip), %xmm0    # 0x1167e4
jmp 0xe8e25
ucomiss 0x1fa90(%rip), %xmm0    # 0x1089cc
jbe 0xe8f53
divss 0x2d802(%rip), %xmm0    # 0x116748
addss 0xe1be(%rip), %xmm0     # 0xf710c
jmp 0xe8e25
ucomiss 0x2d7f2(%rip), %xmm0    # 0x11674c
jbe 0xe8f71
divss 0x1fa68(%rip), %xmm0    # 0x1089cc
addss 0x2d874(%rip), %xmm0    # 0x1167e0
jmp 0xe8e25
ucomiss 0x2d7d8(%rip), %xmm0    # 0x116750
jbe 0xe8f8f
divss 0x2d7ca(%rip), %xmm0    # 0x11674c
addss 0x2d852(%rip), %xmm0    # 0x1167dc
jmp 0xe8e25
ucomiss 0x2d7be(%rip), %xmm0    # 0x116754
jbe 0xe8fad
divss 0x2d7b0(%rip), %xmm0    # 0x116750
addss 0x2d830(%rip), %xmm0    # 0x1167d8
jmp 0xe8e25
ucomiss 0x2d7a4(%rip), %xmm0    # 0x116758
jbe 0xe8fcb
divss 0x2d796(%rip), %xmm0    # 0x116754
addss 0x2d80e(%rip), %xmm0    # 0x1167d4
jmp 0xe8e25
ucomiss 0x2d78a(%rip), %xmm0    # 0x11675c
jbe 0xe8fe9
divss 0x2d77c(%rip), %xmm0    # 0x116758
addss 0x2d7ec(%rip), %xmm0    # 0x1167d0
jmp 0xe8e25
ucomiss 0x2d770(%rip), %xmm0    # 0x116760
jbe 0xe9007
divss 0x2d762(%rip), %xmm0    # 0x11675c
addss 0x2d7ca(%rip), %xmm0    # 0x1167cc
jmp 0xe8e25
ucomiss 0x2d756(%rip), %xmm0    # 0x116764
jbe 0xe9025
divss 0x2d748(%rip), %xmm0    # 0x116760
addss 0x2d7a8(%rip), %xmm0    # 0x1167c8
jmp 0xe8e25
ucomiss 0x2d73c(%rip), %xmm0    # 0x116768
jbe 0xe9043
divss 0x2d72e(%rip), %xmm0    # 0x116764
addss 0x2d786(%rip), %xmm0    # 0x1167c4
jmp 0xe8e25
ucomiss 0x2d6e2(%rip), %xmm0    # 0x11672c
jbe 0xe9061
divss 0x2d714(%rip), %xmm0    # 0x116768
addss 0x2d764(%rip), %xmm0    # 0x1167c0
jmp 0xe8e25
ucomiss 0x2d704(%rip), %xmm0    # 0x11676c
jbe 0xe907f
divss 0x2d6ba(%rip), %xmm0    # 0x11672c
addss 0x2d742(%rip), %xmm0    # 0x1167bc
jmp 0xe8e25
ucomiss 0x2d6ea(%rip), %xmm0    # 0x116770
jbe 0xe909d
divss 0x2d6dc(%rip), %xmm0    # 0x11676c
addss 0x2d720(%rip), %xmm0    # 0x1167b8
jmp 0xe8e25
ucomiss 0x2d6d0(%rip), %xmm0    # 0x116774
jbe 0xe90bb
divss 0x2d6c2(%rip), %xmm0    # 0x116770
addss 0x2d6fe(%rip), %xmm0    # 0x1167b4
jmp 0xe8e25
ucomiss 0x2d6b6(%rip), %xmm0    # 0x116778
jbe 0xe90d9
divss 0x2d6a8(%rip), %xmm0    # 0x116774
addss 0x2d6dc(%rip), %xmm0    # 0x1167b0
jmp 0xe8e25
ucomiss 0x2d69c(%rip), %xmm0    # 0x11677c
jbe 0xe90f7
divss 0x2d68e(%rip), %xmm0    # 0x116778
addss 0x2d6ba(%rip), %xmm0    # 0x1167ac
jmp 0xe8e25
ucomiss 0x2d682(%rip), %xmm0    # 0x116780
jbe 0xe9115
divss 0x2d674(%rip), %xmm0    # 0x11677c
addss 0x2d698(%rip), %xmm0    # 0x1167a8
jmp 0xe8e25
ucomiss 0x2d668(%rip), %xmm0    # 0x116784
jbe 0xe9133
divss 0x2d65a(%rip), %xmm0    # 0x116780
addss 0x2d676(%rip), %xmm0    # 0x1167a4
jmp 0xe8e25
ucomiss 0x2d64e(%rip), %xmm0    # 0x116788
jbe 0xe9151
divss 0x2d640(%rip), %xmm0    # 0x116784
addss 0x2d654(%rip), %xmm0    # 0x1167a0
jmp 0xe8e25
ucomiss 0x2d634(%rip), %xmm0    # 0x11678c
jbe 0xe916f
divss 0x2d626(%rip), %xmm0    # 0x116788
addss 0x2d632(%rip), %xmm0    # 0x11679c
jmp 0xe8e25
ucomiss 0x2d61e(%rip), %xmm0    # 0x116794
jbe 0xe918d
divss 0x2d60c(%rip), %xmm0    # 0x11678c
addss 0x2d610(%rip), %xmm0    # 0x116798
jmp 0xe8e25
movss 0x2d5fb(%rip), %xmm1    # 0x116790
jmp 0xe8e36