1 /* ----------------------------------------------------------------------
4  * Description:  Q15 complex-by-complex multiplication
9  * Target Processor: Cortex-M and Cortex-A cores
10  * -------------------------------------------------------------------- */
12  * Copyright (C) 2010-2021 ARM Limited or its affiliates. All rights reserved.
14  * SPDX-License-Identifier: Apache-2.0
20  * www.apache.org/licenses/LICENSE-2.0
41   @brief         Q15 complex-by-complex multiplication.
65     blkCnt -= 1;  in arm_cmplx_mult_cmplx_q15()
77             /* C[2 * i] = A[2 * i] * B[2 * i] - A[2 * i + 1] * B[2 * i + 1].  */  in arm_cmplx_mult_cmplx_q15()
104             blkCnt--;  in arm_cmplx_mult_cmplx_q15()
144             blkCnt -= 8;  in arm_cmplx_mult_cmplx_q15()
167             blkCnt -= 8;  in arm_cmplx_mult_cmplx_q15()
179         q15_t a, b, c, d;                              /* Temporary variables */  in arm_cmplx_mult_cmplx_q15()  local
188     /* C[2 * i    ] = A[2 * i] * B[2 * i    ] - A[2 * i + 1] * B[2 * i + 1]. */  in arm_cmplx_mult_cmplx_q15()
194     d = *pSrcB++;  in arm_cmplx_mult_cmplx_q15()
196     *pDst++ = (q15_t) ( (((q31_t) a * c) >> 17) - (((q31_t) b * d) >> 17) );  in arm_cmplx_mult_cmplx_q15()
197     *pDst++ = (q15_t) ( (((q31_t) a * d) >> 17) + (((q31_t) b * c) >> 17) );  in arm_cmplx_mult_cmplx_q15()
202     d = *pSrcB++;  in arm_cmplx_mult_cmplx_q15()
203     *pDst++ = (q15_t) ( (((q31_t) a * c) >> 17) - (((q31_t) b * d) >> 17) );  in arm_cmplx_mult_cmplx_q15()
204     *pDst++ = (q15_t) ( (((q31_t) a * d) >> 17) + (((q31_t) b * c) >> 17) );  in arm_cmplx_mult_cmplx_q15()
209     d = *pSrcB++;  in arm_cmplx_mult_cmplx_q15()
210     *pDst++ = (q15_t) ( (((q31_t) a * c) >> 17) - (((q31_t) b * d) >> 17) );  in arm_cmplx_mult_cmplx_q15()
211     *pDst++ = (q15_t) ( (((q31_t) a * d) >> 17) + (((q31_t) b * c) >> 17) );  in arm_cmplx_mult_cmplx_q15()
216     d = *pSrcB++;  in arm_cmplx_mult_cmplx_q15()
217     *pDst++ = (q15_t) ( (((q31_t) a * c) >> 17) - (((q31_t) b * d) >> 17) );  in arm_cmplx_mult_cmplx_q15()
218     *pDst++ = (q15_t) ( (((q31_t) a * d) >> 17) + (((q31_t) b * c) >> 17) );  in arm_cmplx_mult_cmplx_q15()
221     blkCnt--;  in arm_cmplx_mult_cmplx_q15()
236     /* C[2 * i    ] = A[2 * i] * B[2 * i    ] - A[2 * i + 1] * B[2 * i + 1]. */  in arm_cmplx_mult_cmplx_q15()
242     d = *pSrcB++;  in arm_cmplx_mult_cmplx_q15()
245     *pDst++ = (q15_t) ( (((q31_t) a * c) >> 17) - (((q31_t) b * d) >> 17) );  in arm_cmplx_mult_cmplx_q15()
246     *pDst++ = (q15_t) ( (((q31_t) a * d) >> 17) + (((q31_t) b * c) >> 17) );  in arm_cmplx_mult_cmplx_q15()
249     blkCnt--;  in arm_cmplx_mult_cmplx_q15()