Du kan inte välja fler än 25 ämnen Ämnen måste starta med en bokstav eller siffra, kan innehålla bindestreck ('-') och vara max 35 tecken långa.

57 rader
1.3 KiB

  1. //
  2. // Lol Engine - Sample math program: compute Pi
  3. //
  4. // Copyright: (c) 2005-2011 Sam Hocevar <sam@hocevar.net>
  5. // This program is free software; you can redistribute it and/or
  6. // modify it under the terms of the Do What The Fuck You Want To
  7. // Public License, Version 2, as published by Sam Hocevar. See
  8. // http://sam.zoy.org/projects/COPYING.WTFPL for more details.
  9. //
  10. #if defined HAVE_CONFIG_H
  11. # include "config.h"
  12. #endif
  13. #include <cstdio>
  14. #if USE_SDL && defined __APPLE__
  15. # include <SDL_main.h>
  16. #endif
  17. #include "core.h"
  18. using std::printf;
  19. using std::sqrt;
  20. using lol::real;
  21. int main(int argc, char **argv)
  22. {
  23. printf("Pi: "); real::R_PI.print();
  24. printf("e: "); real::R_E.print();
  25. printf("ln(2): "); real::R_LN2.print();
  26. printf("sqrt(2): "); real::R_SQRT2.print();
  27. printf("sqrt(1/2): "); real::R_SQRT1_2.print();
  28. /* Gauss-Legendre computation of Pi -- doesn't work well at all,
  29. * probably because we use finite precision. */
  30. real a = 1.0, b = sqrt((real)0.5), t = 0.25, p = 1.0;
  31. for (int i = 0; i < 3; i++)
  32. {
  33. real a2 = (a + b) * (real)0.5;
  34. real b2 = sqrt(a * b);
  35. real tmp = a - a2;
  36. real t2 = t - p * tmp * tmp;
  37. real p2 = p + p;
  38. a = a2; b = b2; t = t2; p = p2;
  39. }
  40. real sum = a + b;
  41. sum = sum * sum / ((real)4 * t);
  42. sum.print();
  43. return EXIT_SUCCESS;
  44. }