/* Variance of the elements of a floating-point vector.  */
void arm_var_f64(const float64_t *pSrc, uint32_t blockSize, float64_t *pResult)
/* Variance of the elements of a floating-point vector.  */
void arm_var_f64(const float64_t *pSrc, uint32_t blockSize, float64_t *pResult)
{
        uint32_t blkCnt;
        float64_t sum = 0.;
        float64_t fSum = 0.;
        float64_t fMean, fValue;
  const float64_t * pInput = pSrc;
  if (blockSize <= 1U)
  {
    *pResult = 0;
    return;
  }
  blkCnt = blockSize;
  while (blkCnt > 0U)
  {
    sum += *pInput++;
    blkCnt--;
  }
  fMean = sum / (float64_t) blockSize;
  pInput = pSrc;
  blkCnt = blockSize;
  while (blkCnt > 0U)
  {
    fValue = *pInput++ - fMean;
    fSum += fValue * fValue;
    blkCnt--;
  }
  *pResult = fSum / (float64_t)(blockSize - 1.);
}