arm_cos_q15.c 2.5 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485
  1. /* ----------------------------------------------------------------------
  2. * Project: CMSIS DSP Library
  3. * Title: arm_cos_q15.c
  4. * Description: Fast cosine calculation for Q15 values
  5. *
  6. * $Date: 27. January 2017
  7. * $Revision: V.1.5.1
  8. *
  9. * Target Processor: Cortex-M cores
  10. * -------------------------------------------------------------------- */
  11. /*
  12. * Copyright (C) 2010-2017 ARM Limited or its affiliates. All rights reserved.
  13. *
  14. * SPDX-License-Identifier: Apache-2.0
  15. *
  16. * Licensed under the Apache License, Version 2.0 (the License); you may
  17. * not use this file except in compliance with the License.
  18. * You may obtain a copy of the License at
  19. *
  20. * www.apache.org/licenses/LICENSE-2.0
  21. *
  22. * Unless required by applicable law or agreed to in writing, software
  23. * distributed under the License is distributed on an AS IS BASIS, WITHOUT
  24. * WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  25. * See the License for the specific language governing permissions and
  26. * limitations under the License.
  27. */
  28. #include "arm_math.h"
  29. #include "arm_common_tables.h"
  30. /**
  31. * @ingroup groupFastMath
  32. */
  33. /**
  34. * @addtogroup cos
  35. * @{
  36. */
  37. /**
  38. * @brief Fast approximation to the trigonometric cosine function for Q15 data.
  39. * @param[in] x Scaled input value in radians.
  40. * @return cos(x).
  41. *
  42. * The Q15 input value is in the range [0 +0.9999] and is mapped to a radian
  43. * value in the range [0 2*pi).
  44. */
  45. q15_t arm_cos_q15(
  46. q15_t x)
  47. {
  48. q15_t cosVal; /* Temporary variables for input, output */
  49. int32_t index; /* Index variables */
  50. q15_t a, b; /* Four nearest output values */
  51. q15_t fract; /* Temporary values for fractional values */
  52. /* add 0.25 (pi/2) to read sine table */
  53. x = (uint16_t)x + 0x2000;
  54. if (x < 0)
  55. { /* convert negative numbers to corresponding positive ones */
  56. x = (uint16_t)x + 0x8000;
  57. }
  58. /* Calculate the nearest index */
  59. index = (uint32_t)x >> FAST_MATH_Q15_SHIFT;
  60. /* Calculation of fractional value */
  61. fract = (x - (index << FAST_MATH_Q15_SHIFT)) << 9;
  62. /* Read two nearest values of input value from the sin table */
  63. a = sinTable_q15[index];
  64. b = sinTable_q15[index+1];
  65. /* Linear interpolation process */
  66. cosVal = (q31_t)(0x8000-fract)*a >> 16;
  67. cosVal = (q15_t)((((q31_t)cosVal << 16) + ((q31_t)fract*b)) >> 16);
  68. return cosVal << 1;
  69. }
  70. /**
  71. * @} end of cos group
  72. */