diff options
author | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-02-14 12:41:16 +0000 |
---|---|---|
committer | zimmerma <zimmerma@280ebfd0-de03-0410-8827-d642c229c3f4> | 2005-02-14 12:41:16 +0000 |
commit | 58c80f162664317cbb1c5fd5c0698c800d1af055 (patch) | |
tree | 05f883db9ebbe6e772e747c97476600c8dcfc3f1 /const_pi.c | |
parent | 452beb8a6acadd54c3d03fb90860d52c9d63496a (diff) | |
download | mpfr-58c80f162664317cbb1c5fd5c0698c800d1af055.tar.gz |
removed garbage
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@3302 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'const_pi.c')
-rw-r--r-- | const_pi.c | 62 |
1 files changed, 0 insertions, 62 deletions
diff --git a/const_pi.c b/const_pi.c index de51efe8d..8cfb54bd9 100644 --- a/const_pi.c +++ b/const_pi.c @@ -31,19 +31,6 @@ mpfr_const_pi (mpfr_ptr x, mp_rnd_t rnd_mode) { return mpfr_cache (x, __gmpfr_cache_const_pi, rnd_mode); } -/* Time: mpfr_const_pi2 is this new version. - norroy% time ./pi2 1000000 - mpfr_const_pi took 14110ms - mpfr_const_pi2 took 4730ms - - norroy% time ./pi2 2000000 - mpfr_const_pi took 39390ms - mpfr_const_pi2 took 13140ms - - norroy% time ./pi2 5000000 - mpfr_const_pi took 252120ms - mpfr_const_pi2 took 51780ms */ - int mpfr_const_pi_internal (mpfr_ptr x, mp_rnd_t rnd_mode) { @@ -116,52 +103,3 @@ mpfr_const_pi_internal (mpfr_ptr x, mp_rnd_t rnd_mode) return inex; } - -/* - int -main (int argc, char *argv[]) -{ - int n = atoi (argv[1]); - int k = (argc > 2) ? atoi (argv[2]) : 1; - int i; - mpfr_t x, y; - int st; - FILE *fp; - - mpfr_init2 (x, n); - mpfr_init2 (y, n); - -#if 1 - st = cputime (); - for (i = 0; i < k; i++) - (mpfr_const_pi) (x, GMP_RNDN); - printf ("mpfr_const_pi took %dms\n", cputime () - st); -#endif - - st = cputime (); - for (i = 0; i < k; i++) - mpfr_const_pi2 (y, GMP_RNDN); - printf ("mpfr_const_pi2 took %dms\n", cputime () - st); - - fp = fopen ("pi", "w"); - st = cputime (); - fprintf (fp, "pi2:="); - mpfr_out_str (fp, 10, 0, y, GMP_RNDZ); - fprintf (fp, ":\n"); - printf ("output took %dms\n", cputime () - st); - fclose (fp); - -#if 1 - if (mpfr_cmp (x, y)) - { - fprintf (stderr, "results differ\n"); - exit (1); - } -#endif - - mpfr_clear (x); - mpfr_clear (y); - - return 0; -} -*/ |