From: Tanaka Akira <akr@...17n.org>
Date: 2002-04-13T06:32:50+09:00
Subject: [ruby-dev:16897] Re: if Re: BigFloat

In article <006e01c1e23a$dbbb4bb0$01000001@winmain>,
  "Shigeo Kobayashi" <shigeo@tinyforest.gr.jp> writes:

> $B;DG0$J$,$i!"La$jCM$,$d$O$j(B double $B$J$N$G!%!%!%(B
> $B$G$-$l$P2>?tIt$NG[Ns!J(Bint$B$N!K$,<hF@$G$-$l$P(B
> $B$$$$$s$G$9$,!%!%!%(B

value $B$rG\!9$7$F$$$1$P(B 1bit $B$:$DF@$i$l$k$N$G$O!#(B

  int e;
  double f;

  f = frexp(v, &e);

  if (f < 0) {
    putchar('-');
    f = -f;
  }

  printf("0.");
  while (f != 0) {
    f *= 2;
    if (f < 1) {
      putchar('0');
    }
    else {
      putchar('1');
      f -= 1;
    }
  }
  printf(" * 2**%d\n", e);

$B$H$+!#(B

$B$^$!!"4p?t$,(B 2 ($B$NG\?t(B)$B$G$J$$>l9g$K$OL58B%k!<%W$K4Y$k$3$H$b$"$k$G$7$g(B
$B$&$7!"(Bi386 $B$N$h$&$KIbF0>.?tE@%l%8%9%?$G$N7A<0$,%a%b%j>e$N7A<0$h$j$b@:(B
$BEY$,9b$$$h$&$J>l9g$K!"<B:]$K2?$,5/$3$k$N$+$OHyL/$J$H$3$m$@$H;W$$$^$9$,!#(B
-- 
[$BEDCf(B $BE/(B][$B$?$J$+(B $B$"$-$i(B][Tanaka Akira]
$B!V$U$($m(B! $B$o$+$a$A$c$s:n@o$G$9$(C"=$B!W(B(Little Worker, $B7KM7@84](B)