/* Function Definitions */
comm_SDRuReceiver *SDRuReceiver_SDRuReceiver(const emlrtStack *sp,
comm_SDRuReceiver *obj, real_T varargin_2, real_T varargin_4, real_T
varargin_8)
{
comm_SDRuReceiver *b_obj;
comm_SDRuReceiver *c_obj;
real_T varargin_1[10];
int32_T k;
int32_T i10;
static const char_T cv6[5] = { 'S', 'D', 'R', 'u', '_' };
real_T d1;
emlrtStack st;
emlrtStack b_st;
emlrtStack c_st;
emlrtStack d_st;
emlrtStack e_st;
emlrtStack f_st;
st.prev = sp;
st.tls = sp->tls;
b_st.prev = &st;
b_st.tls = st.tls;
c_st.prev = &b_st;
c_st.tls = b_st.tls;
d_st.prev = &c_st;
d_st.tls = c_st.tls;
e_st.prev = &d_st;
e_st.tls = d_st.tls;
f_st.prev = &e_st;
f_st.tls = e_st.tls;
b_obj = obj;
st.site = &w_emlrtRSI;
c_obj = b_obj;
c_obj->LocalOscillatorOffset = 0.0;
c_obj->pSubDevice = RxId;
b_st.site = &j_emlrtRSI;
c_st.site = &k_emlrtRSI;
d_st.site = &l_emlrtRSI;
c_st.site = &k_emlrtRSI;
c_obj->isInitialized = 0;
d_st.site = &m_emlrtRSI;
b_st.site = &j_emlrtRSI;
c_st.site = &n_emlrtRSI;
b_st.site = &j_emlrtRSI;
c_st.site = &o_emlrtRSI;
b_rand(varargin_1);
for (k = 0; k < 10; k++) {
varargin_1[k] = 48.0 + muDoubleScalarFloor(varargin_1[k] * 10.0);
}
b_st.site = &j_emlrtRSI;
for (k = 0; k < 10; k++) {
i10 = (int32_T)varargin_1[k];
if (!((i10 >= 0) && (i10 <= 255))) {
emlrtDynamicBoundsCheckR2012b(i10, 0, 255, &emlrtBCI, &b_st);
}
}
for (k = 0; k < 5; k++) {
c_obj->ObjectID[k] = cv6[k];
}
for (k = 0; k < 10; k++) {
d1 = muDoubleScalarFloor(varargin_1[k]);
if (muDoubleScalarIsNaN(d1) || muDoubleScalarIsInf(d1)) {
d1 = 0.0;
} else {
d1 = muDoubleScalarRem(d1, 256.0);
}
if (d1 < 0.0) {
c_obj->ObjectID[k + 5] = (int8_T)-(int8_T)(uint8_T)-d1;
} else {
c_obj->ObjectID[k + 5] = (int8_T)(uint8_T)d1;
}
}
b_st.site = &j_emlrtRSI;
c_st.site = &l_emlrtRSI;
d_st.site = &l_emlrtRSI;
e_st.site = &p_emlrtRSI;
c_obj->CenterFrequency = varargin_2;
e_st.site = &p_emlrtRSI;
if (varargin_4 > 512.0) {
f_st.site = &w_emlrtRSI;
b_warning(&f_st);
}
c_obj->DecimationFactor = varargin_4;
e_st.site = &p_emlrtRSI;
c_obj->Gain = varargin_8;
e_st.site = &p_emlrtRSI;
f_st.site = &j_emlrtRSI;
checkIPAddressFormat(&f_st);
return b_obj;
}
void b_mpower(const emlrtStack *sp, const real_T a[36], real_T c[36])
{
real_T x[36];
int32_T jBcol;
int32_T ipiv[6];
int8_T p[6];
int32_T k;
int32_T j;
int32_T i;
int32_T kAcol;
real_T n1x;
real_T n1xinv;
real_T rc;
static const char_T rfmt[6] = { '%', '1', '4', '.', '6', 'e' };
char_T u[6];
const mxArray *y;
static const int32_T iv4[2] = { 1, 6 };
const mxArray *m0;
const mxArray *b_y;
char_T cv0[14];
emlrtStack st;
emlrtStack b_st;
emlrtStack c_st;
emlrtStack d_st;
emlrtStack e_st;
emlrtStack f_st;
st.prev = sp;
st.tls = sp->tls;
st.site = &l_emlrtRSI;
b_st.prev = &st;
b_st.tls = st.tls;
c_st.prev = &b_st;
c_st.tls = b_st.tls;
d_st.prev = &c_st;
d_st.tls = c_st.tls;
e_st.prev = &d_st;
e_st.tls = d_st.tls;
f_st.prev = &e_st;
f_st.tls = e_st.tls;
b_st.site = &m_emlrtRSI;
c_st.site = &n_emlrtRSI;
c_st.site = &o_emlrtRSI;
d_st.site = &p_emlrtRSI;
for (jBcol = 0; jBcol < 36; jBcol++) {
c[jBcol] = 0.0;
x[jBcol] = a[jBcol];
}
e_st.site = &r_emlrtRSI;
xgetrf(&e_st, x, ipiv);
for (jBcol = 0; jBcol < 6; jBcol++) {
p[jBcol] = (int8_T)(1 + jBcol);
}
for (k = 0; k < 5; k++) {
if (ipiv[k] > 1 + k) {
jBcol = p[ipiv[k] - 1];
p[ipiv[k] - 1] = p[k];
p[k] = (int8_T)jBcol;
}
}
for (k = 0; k < 6; k++) {
jBcol = p[k] - 1;
c[k + 6 * (p[k] - 1)] = 1.0;
e_st.site = &s_emlrtRSI;
for (j = k; j + 1 < 7; j++) {
if (c[j + 6 * jBcol] != 0.0) {
e_st.site = &t_emlrtRSI;
for (i = j + 1; i + 1 < 7; i++) {
c[i + 6 * jBcol] -= c[j + 6 * jBcol] * x[i + 6 * j];
}
}
}
}
e_st.site = &u_emlrtRSI;
f_st.site = &ib_emlrtRSI;
for (j = 0; j < 6; j++) {
jBcol = 6 * j;
for (k = 5; k >= 0; k += -1) {
kAcol = 6 * k;
if (c[k + jBcol] != 0.0) {
c[k + jBcol] /= x[k + kAcol];
for (i = 0; i + 1 <= k; i++) {
c[i + jBcol] -= c[k + jBcol] * x[i + kAcol];
}
}
}
}
d_st.site = &q_emlrtRSI;
n1x = norm(a);
n1xinv = norm(c);
rc = 1.0 / (n1x * n1xinv);
if ((n1x == 0.0) || (n1xinv == 0.0) || (rc == 0.0)) {
e_st.site = &kb_emlrtRSI;
warning(&e_st);
} else {
if (muDoubleScalarIsNaN(rc) || (rc < 2.2204460492503131E-16)) {
e_st.site = &lb_emlrtRSI;
for (jBcol = 0; jBcol < 6; jBcol++) {
u[jBcol] = rfmt[jBcol];
}
y = NULL;
m0 = emlrtCreateCharArray(2, iv4);
emlrtInitCharArrayR2013a(&e_st, 6, m0, &u[0]);
emlrtAssign(&y, m0);
b_y = NULL;
m0 = emlrtCreateDoubleScalar(rc);
emlrtAssign(&b_y, m0);
f_st.site = &pb_emlrtRSI;
emlrt_marshallIn(&f_st, b_sprintf(&f_st, y, b_y, &c_emlrtMCI), "sprintf",
cv0);
e_st.site = &lb_emlrtRSI;
b_warning(&e_st, cv0);
}
}
}
