pi.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include <gmp.h>
   5 #include "cf.h"
   6
   7 int main(int argc, char **argv) {
   8   mpz_t z;
   9   mpz_init(z);
  10   cf_t pi, conv;
  11   pi = cf_new_pi();
  12   int n = 1000;
  13   if (argc > 1) {
  14     n = atoi(argv[1]);
  15     if (n <= 0) n = 100;
  16   }
  17
  18   conv = cf_new_cf_to_decimal(pi);
  19   for (int i = 0; i <= n; i++) {
  20     cf_get(z, conv);
  21     gmp_printf("%Zd", z);
  22     if (!(i % 5)) putchar(' ');
  23     if (!(i % 50)) putchar('\n');
  24   }
  25   if (n % 50) putchar('\n');
  26   cf_free(conv);
  27   cf_free(pi);
  28   mpz_clear(z);
  29   return 0;
  30 }