61 lines
1.1 KiB
C
61 lines
1.1 KiB
C
#include "cmPrefix.h"
|
|
#include "cmGlobal.h"
|
|
#include "cmFloatTypes.h"
|
|
#include "cmComplexTypes.h"
|
|
|
|
void cmVOCR_MultVVV( cmComplexR_t* y, const cmComplexS_t* x0, const cmComplexR_t* x1, unsigned n )
|
|
{
|
|
unsigned i;
|
|
for(i=0; i<n; ++i)
|
|
{
|
|
y[i] = x0[i] * x1[i];
|
|
/*
|
|
cmReal_t ab = x0[i].r * x1[i].r;
|
|
cmReal_t bd = x0[i].i * x1[i].i;
|
|
cmReal_t bc = x0[i].i * x1[i].r;
|
|
cmReal_t ad = x0[i].r * x1[i].i;
|
|
y[i].r = ab - bd;
|
|
y[i].i = bc + ad;
|
|
*/
|
|
}
|
|
|
|
}
|
|
|
|
void cmVOCR_MultVFV( cmComplexR_t* y, const float* x, unsigned n )
|
|
{
|
|
unsigned i;
|
|
for(i=0; i<n; ++i)
|
|
{
|
|
y[i] *= x[i];
|
|
}
|
|
}
|
|
|
|
void cmVOCR_DivVFV( cmComplexR_t* y, const float* x, unsigned n )
|
|
{
|
|
unsigned i;
|
|
for(i=0; i<n; ++i)
|
|
{
|
|
y[i] /= x[i];
|
|
}
|
|
}
|
|
|
|
|
|
void cmVOCR_Abs( cmSample_t* y, const cmComplexR_t* x, unsigned n )
|
|
{
|
|
unsigned i;
|
|
for(i=0; i<n; ++i)
|
|
y[i] = (cmSample_t)cmCabsR(x[i]);
|
|
}
|
|
|
|
|
|
void cmVOCR_DivR_VV( cmComplexR_t* y, const cmReal_t* x, unsigned n )
|
|
{
|
|
unsigned i;
|
|
for(i=0; i<n; ++i)
|
|
{
|
|
y[i] /= x[i];
|
|
//y[i].r /= x[i];
|
|
//y[i].i /= x[i];
|
|
}
|
|
}
|