VEX/useful/gradual_underflow.c

   1
   2 #include <stdio.h>
   3
   4 int main ( void )
   5 {
   6 double d =  7.25063790881233303e-303;
   7  int i;
   8
   9  for (i = 0; i < 26; i++) {
  10                             printf("%.16e\n", d);
  11                             d *= 0.1012198489248992489422;
  12  }
  13   return 0;
  14 }
  15