sincos.c
上传用户:wstnjxml
上传日期:2014-04-03
资源大小:7248k
文件大小:2k
源码类别:

Windows CE

开发平台:

C/C++

  1. /*****************************************************************************
  2.  *
  3.  * This program is free software ; you can redistribute it and/or modify
  4.  * it under the terms of the GNU General Public License as published by
  5.  * the Free Software Foundation; either version 2 of the License, or
  6.  * (at your option) any later version.
  7.  *
  8.  * This program is distributed in the hope that it will be useful,
  9.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  11.  * GNU General Public License for more details.
  12.  *
  13.  * You should have received a copy of the GNU General Public License
  14.  * along with this program; if not, write to the Free Software
  15.  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  16.  *
  17.  * $Id: sincos.c 591 2006-01-17 12:28:08Z picard $
  18.  *
  19.  * The Core Pocket Media Player
  20.  * Copyright (c) 2004-2005 Gabor Kovacs
  21.  *
  22.  ****************************************************************************/
  23. #include "../common.h"
  24. #define PI 3.14159265358979324
  25. NOINLINE double floor(double i);
  26. NOINLINE double ceil(double i)
  27. {
  28. if (i<0)
  29. return -floor(-i);
  30. else
  31. {
  32. double d = floor(i);
  33. if (d!=i)
  34. d+=1.0;
  35. return d;
  36. }
  37. }
  38. NOINLINE double floor(double i)
  39. {
  40. if (i<0) 
  41. return -ceil(-i);
  42. else
  43. return (double)(int)i;
  44. }
  45. NOINLINE double sin(double i)
  46. {
  47. int n,k;
  48. double j,sum;
  49. int sign = 0;
  50. if (i<0)
  51. {
  52. sign = 1;
  53. i = -i;
  54. }
  55. i *= 1.0/(2*PI);
  56. i -= floor(i);
  57. if (i>=0.5)
  58. {
  59. i -= 0.5;
  60. sign ^= 1;
  61. }
  62. i *= 2*PI;
  63. k = 1;
  64. j = sum = i;
  65. for (n=3;n<14;n+=2)
  66. {
  67. k *= (n-1)*n;
  68. j *= i*i;
  69. if (n & 2)
  70. sum -= j/k;
  71. else
  72. sum += j/k;
  73. }
  74. return sign ? -sum:sum;
  75. }
  76. NOINLINE double cos(double i)
  77. {
  78. return sin(i+PI/2);
  79. }