SCICOS_BLOCKS_IMPEXP void extract_bit_32_LH(scicos_block *block, int flag)
{
int i = 0, maxim = 0;
- long *y = NULL, *u = NULL, ref = 0, n = 0;
+ SCSINT32_COP *y = NULL, *u = NULL, ref = 0, n = 0;
y = Getint32OutPortPtrs(block, 1);
u = Getint32InPortPtrs(block, 1);
maxim = 32;
ref = 0;
for (i = 0; i < maxim / 2; i++)
{
- n = (long)pow(2, i);
+ n = (SCSINT32_COP)pow(2, i);
ref = ref + n;
}
*y = (*u) & (ref);
SCICOS_BLOCKS_IMPEXP void extract_bit_32_LSB(scicos_block *block, int flag)
{
int i = 0, maxim = 0;
- long *y, *u, ref, n;
+ SCSINT32_COP *y, *u, ref, n;
int *ipar;
y = Getint32OutPortPtrs(block, 1);
u = Getint32InPortPtrs(block, 1);
ref = 0;
for (i = 0; i < *ipar; i++)
{
- n = (long)pow(2, i);
+ n = (SCSINT32_COP)pow(2, i);
ref = ref + n;
}
*y = (*u) & (ref);
SCICOS_BLOCKS_IMPEXP void extract_bit_32_MSB0(scicos_block *block, int flag)
{
int i = 0, maxim = 0;
- long *y = NULL, *u = NULL, ref = 0, n = 0;
+ SCSINT32_COP *y = NULL, *u = NULL, ref = 0, n = 0;
int *ipar = NULL;
y = Getint32OutPortPtrs(block, 1);
u = Getint32InPortPtrs(block, 1);
ref = 0;
for (i = 0; i < *ipar; i++)
{
- n = (long)pow(2, maxim - 1 - i);
+ n = (SCSINT32_COP)pow(2, maxim - 1 - i);
ref = ref + n;
}
*y = (*u) & (ref);
}
-/*--------------------------------------------------------------------------*/
\ No newline at end of file
+/*--------------------------------------------------------------------------*/
SCICOS_BLOCKS_IMPEXP void extract_bit_32_MSB1(scicos_block *block, int flag)
{
int i = 0, maxim = 0;
- long *y = NULL, *u = NULL, ref = 0, n = 0;
+ SCSINT32_COP *y = NULL, *u = NULL, ref = 0, n = 0;
int *ipar = NULL;
y = Getint32OutPortPtrs(block, 1);
u = Getint32InPortPtrs(block, 1);
ref = 0;
for (i = 0; i < *ipar; i++)
{
- n = (long)pow(2, maxim - 1 - i);
+ n = (SCSINT32_COP)pow(2, maxim - 1 - i);
ref = ref + n;
}
*y = (*u) & (ref);
SCICOS_BLOCKS_IMPEXP void extract_bit_32_RB0(scicos_block *block, int flag)
{
int i = 0, maxim = 0, numb = 0;
- long *y = NULL, *u = NULL, ref = 0, n = 0;
+ SCSINT32_COP *y = NULL, *u = NULL, ref = 0, n = 0;
int *ipar = NULL;
y = Getint32OutPortPtrs(block, 1);
u = Getint32InPortPtrs(block, 1);
numb = *(ipar + 1) - *ipar + 1;
for (i = 0; i < numb; i++)
{
- n = (long)pow(2, *ipar + i);
+ n = (SCSINT32_COP)pow(2, *ipar + i);
ref = ref + n;
}
*y = (*u) & (ref);
SCICOS_BLOCKS_IMPEXP void extract_bit_32_RB1(scicos_block *block, int flag)
{
int i = 0, maxim = 0, numb = 0;
- long *y = NULL, *u = NULL, ref = 0, n = 0;
+ SCSINT32_COP *y = NULL, *u = NULL, ref = 0, n = 0;
int *ipar = NULL;
y = Getint32OutPortPtrs(block, 1);
u = Getint32InPortPtrs(block, 1);
numb = *(ipar + 1) - *ipar + 1;
for (i = 0; i < numb; i++)
{
- n = (long)pow(2, *ipar + i);
+ n = (SCSINT32_COP)pow(2, *ipar + i);
ref = ref + n;
}
*y = (*u) & (ref);
SCICOS_BLOCKS_IMPEXP void extract_bit_32_UH0(scicos_block *block, int flag)
{
int i = 0, maxim = 0;
- long *y = NULL, *u = NULL, ref = 0, n = 0;
+ SCSINT32_COP *y = NULL, *u = NULL, ref = 0, n = 0;
y = Getint32OutPortPtrs(block, 1);
u = Getint32InPortPtrs(block, 1);
maxim = 32;
ref = 0;
for (i = 0; i < maxim / 2; i++)
{
- n = (long)pow(2, maxim / 2 + i);
+ n = (SCSINT32_COP)pow(2, maxim / 2 + i);
ref = ref + n;
}
*y = (*u) & (ref);
}
-/*--------------------------------------------------------------------------*/
\ No newline at end of file
+/*--------------------------------------------------------------------------*/
SCICOS_BLOCKS_IMPEXP void extract_bit_32_UH1(scicos_block *block, int flag)
{
int i = 0, maxim = 0;
- long *y = NULL, *u = NULL, ref = 0, n = 0;
+ SCSINT32_COP *y = NULL, *u = NULL, ref = 0, n = 0;
y = Getint32OutPortPtrs(block, 1);
u = Getint32InPortPtrs(block, 1);
maxim = 32;
SCICOS_BLOCKS_IMPEXP void extract_bit_u32_MSB1(scicos_block *block, int flag)
{
int i = 0, maxim = 0;
- unsigned long *y = NULL, *u = NULL, ref = 0, n = 0;
+ SCSUINT32_COP *y = NULL, *u = NULL, ref = 0, n = 0;
int *ipar = NULL;
y = Getuint32OutPortPtrs(block, 1);
u = Getuint32InPortPtrs(block, 1);
ref = 0;
for (i = 0; i < *ipar; i++)
{
- n = (unsigned long)pow(2, maxim - 1 - i);
+ n = (SCSUINT32_COP)pow(2, maxim - 1 - i);
ref = ref + n;
}
*y = (*u) & (ref);
SCICOS_BLOCKS_IMPEXP void extract_bit_u32_RB1(scicos_block *block, int flag)
{
int i = 0, maxim = 0, numb = 0;
- unsigned long *y = NULL, *u = NULL, ref = 0, n = 0;
+ SCSUINT32_COP *y = NULL, *u = NULL, ref = 0, n = 0;
int *ipar = NULL;
y = Getuint32OutPortPtrs(block, 1);
u = Getuint32InPortPtrs(block, 1);
numb = *(ipar + 1) - *ipar + 1;
for (i = 0; i < numb; i++)
{
- n = (unsigned long)pow(2, *ipar + i);
+ n = (SCSUINT32_COP)pow(2, *ipar + i);
ref = ref + n;
}
*y = (*u) & (ref);
SCICOS_BLOCKS_IMPEXP void extract_bit_u32_UH1(scicos_block *block, int flag)
{
int i = 0, maxim = 0;
- unsigned long *y = NULL, *u = NULL, ref = 0, n = 0;
+ SCSUINT32_COP *y = NULL, *u = NULL, ref = 0, n = 0;
y = Getuint32OutPortPtrs(block, 1);
u = Getuint32InPortPtrs(block, 1);
ref = 0;
for (i = 0; i < maxim / 2; i++)
{
- n = (unsigned long)pow(2, maxim / 2 + i);
+ n = (SCSUINT32_COP)pow(2, maxim / 2 + i);
ref = ref + n;
}
*y = (*u) & (ref);
C2F(mgetnc) (&fd, ptr_s, (j = nPoints * mY * nY, &j), fmts, &ierr); /* read short data */
break;
case 4 : /* int32 */
- if ((ptr->work = (void *) scicos_malloc(nPoints * mY * nY * sizeof(long))) == NULL)
+ if ((ptr->work = (void *) scicos_malloc(nPoints * mY * nY * sizeof(SCSINT32_COP))) == NULL)
{
set_block_error(-16);
scicos_free(ptr);
C2F(mgetnc) (&fd, ptr_us, (j = nPoints * mY * nY, &j), fmtus, &ierr); /* read short data */
break;
case 14 : /* uint32 */
- if ((ptr->work = (void *) scicos_malloc(nPoints * mY * nY * sizeof(unsigned long))) == NULL)
+ if ((ptr->work = (void *) scicos_malloc(nPoints * mY * nY * sizeof(SCSUINT32_COP))) == NULL)
{
set_block_error(-16);
scicos_free(ptr);
case 4:
/* ---------------------int32 long--------------------- */
y_l = Getint32OutPortPtrs(block, 1);
- ptr_l = (long*) ptr->work;
+ ptr_l = (SCSINT32_COP *) ptr->work;
if (inow > nPoints)
{
if (OutEnd == 0)
case 14:
/* ---------------------uint32 ulong--------------------- */
y_ul = Getuint32OutPortPtrs(block, 1);
- ptr_ul = (unsigned long*) ptr->work;
+ ptr_ul = (SCSUINT32_COP *) ptr->work;
if (inow > nPoints)
{
if (OutEnd == 0)
case 4:
/* ---------------------int32 long--------------------- */
y_l = Getint32OutPortPtrs(block, 1);
- ptr_l = (long*) ptr->work;
+ ptr_l = (SCSINT32_COP *) ptr->work;
/*y_l[j]=ptr_l[inow+(j)*nPoints];*/
if (inow > nPoints)
{
t2 = ptr->workt[inow + 1];
y1 = (double)ptr_l[inow + j * nPoints];
y2 = (double)ptr_l[inow + 1 + j * nPoints];
- y_l[j] = (long)((y2 - y1) * (t - t1) / (t2 - t1) + y1);
+ y_l[j] = (SCSINT32_COP)((y2 - y1) * (t - t1) / (t2 - t1) + y1);
}
break;
case 11: /*--------------------- uint8 uchar---------------------*/
case 14:
/* ---------------------uint32 ulong--------------------- */
y_ul = Getuint32OutPortPtrs(block, 1);
- ptr_ul = (unsigned long*) ptr->work;
+ ptr_ul = (SCSUINT32_COP *) ptr->work;
/* y_ul[j]=ptr_ul[inow+(j)*nPoints]; */
if (inow > nPoints)
{
t2 = ptr->workt[inow + 1];
y1 = (double)ptr_ul[inow + j * nPoints];
y2 = (double)ptr_ul[inow + 1 + j * nPoints];
- y_ul[j] = (unsigned long)((y2 - y1) * (t - t1) / (t2 - t1) + y1);
+ y_ul[j] = (SCSUINT32_COP)((y2 - y1) * (t - t1) / (t2 - t1) + y1);
}
break;
}
if ((flag == 1) | (flag == 6))
{
int i = 0, j = 0, l = 0, ji = 0, jl = 0, il = 0;
- long *u = NULL, *y = NULL;
+ SCSINT32_COP *u = NULL, *y = NULL;
int mu = 0, ny = 0, my = 0, mo = 0, no = 0;
- long *opar = NULL;
+ SCSINT32_COP *opar = NULL;
double k = 0., D = 0., C = 0.;
mo = GetOparSize(block, 1, 1);
}
else
{
- y[i] = (long)D;
+ y[i] = (SCSINT32_COP)D;
}
}
}
}
else
{
- y[jl] = (long)D;
+ y[jl] = (SCSINT32_COP)D;
}
}
}
if ((flag == 1) | (flag == 6))
{
int i = 0, j = 0, l = 0, ji = 0, jl = 0, il = 0;
- long *u = NULL, *y = NULL;
+ SCSINT32_COP *u = NULL, *y = NULL;
int mu = 0, ny = 0, my = 0, mo = 0, no = 0;
- long *opar = NULL;
+ SCSINT32_COP *opar = NULL;
double k = 0., D = 0., C = 0., t = 0.;
mo = GetOparSize(block, 1, 1);
(t) = -(-((k / 2)) + fabs(t - (double)((int)((t) / ((k / 2)))) * ((k / 2))));
}
}
- y[i] = (long)t;
+ y[i] = (SCSINT32_COP)t;
}
}
else
(t) = -(-((k / 2)) + fabs(t - (double)((int)((t) / ((k / 2)))) * ((k / 2))));
}
}
- y[jl] = (long)t;
+ y[jl] = (SCSINT32_COP)t;
}
}
}
if ((flag == 1) | (flag == 6))
{
int i = 0, j = 0, l = 0, ji = 0, jl = 0, il = 0;
- long *u = NULL, *y = NULL;
+ SCSINT32_COP *u = NULL, *y = NULL;
int mu = 0, ny = 0, my = 0, mo = 0, no = 0;
- long *opar = NULL;
+ SCSINT32_COP *opar = NULL;
double k = 0., D = 0., C = 0.;
mo = GetOparSize(block, 1, 1);
{
D = -k;
}
- y[i] = (long)D;
+ y[i] = (SCSINT32_COP)D;
}
}
else
{
D = -k;
}
- y[jl] = (long)D;
+ y[jl] = (SCSINT32_COP)D;
}
}
}
if ((flag == 1) | (flag == 6))
{
int i = 0, j = 0, l = 0, ji = 0, jl = 0, il = 0;
- unsigned long *u = NULL, *y = NULL;
+ SCSUINT32_COP *u = NULL, *y = NULL;
int mu = 0, ny = 0, my = 0, mo = 0, no = 0;
- unsigned long *opar = NULL;
+ SCSUINT32_COP *opar = NULL;
double k = 0., D = 0., C = 0.;
mo = GetOparSize(block, 1, 1);
}
else
{
- y[i] = (unsigned long)D;
+ y[i] = (SCSUINT32_COP)D;
}
}
}
}
else
{
- y[jl] = (unsigned long)D;
+ y[jl] = (SCSUINT32_COP)D;
}
}
}
if ((flag == 1) | (flag == 6))
{
int i = 0, j = 0, l = 0, ji = 0, jl = 0, il = 0;
- unsigned long *u = NULL, *y = NULL;
+ SCSUINT32_COP *u = NULL, *y = NULL;
int mu = 0, ny = 0, my = 0, mo = 0, no = 0;
- unsigned long *opar = NULL;
+ SCSUINT32_COP *opar = NULL;
double k = 0., D = 0., C = 0., t = 0.;
mo = GetOparSize(block, 1, 1);
(t) = -(-((k / 2)) + fabs(t - (double)((int)((t) / ((k / 2)))) * ((k / 2))));
}
}
- y[i] = (unsigned long)t;
+ y[i] = (SCSUINT32_COP)t;
}
}
else
(t) = -(-((k / 2)) + fabs(t - (double)((int)((t) / ((k / 2)))) * ((k / 2))));
}
}
- y[jl] = (unsigned long)t;
+ y[jl] = (SCSUINT32_COP)t;
}
}
}
if ((flag == 1) | (flag == 6))
{
int i = 0, j = 0, l = 0, ji = 0, jl = 0, il = 0;
- unsigned long *u = NULL, *y = NULL;
+ SCSUINT32_COP *u = NULL, *y = NULL;
int mu = 0, ny = 0, my = 0, mo = 0, no = 0;
- unsigned long *opar = NULL;
+ SCSUINT32_COP *opar = NULL;
double k = 0., D = 0., C = 0.;
mo = GetOparSize(block, 1, 1);
{
D = 0;
}
- y[i] = (unsigned long)D;
+ y[i] = (SCSUINT32_COP)D;
}
}
else
{
D = 0;
}
- y[jl] = (unsigned long)D;
+ y[jl] = (SCSUINT32_COP)D;
}
}
}
{
int i = 0, m = 0, n = 0, nin = 0, k = 0, j = 0, l = 0;
int *ipar = NULL;
- long *y = NULL, *u = NULL;
+ SCSINT32_COP *y = NULL, *u = NULL;
m = GetInPortRows(block, 1);
n = GetInPortCols(block, 1);
y = Getint32OutPortPtrs(block, 1);
l = (l + 1) % 2;
}
}
- *y = (long)l;
+ *y = (SCSINT32_COP)l;
}
else
{
l = (l + 1) % 2;
}
}
- y[i] = (long)l;
+ y[i] = (SCSINT32_COP)l;
}
}
else
{
int i = 0, m = 0, n = 0, nin = 0, k = 0, j = 0, l = 0;
int *ipar = NULL;
- unsigned long *y = NULL, *u = NULL;
+ SCSUINT32_COP *y = NULL, *u = NULL;
m = GetInPortRows(block, 1);
n = GetInPortCols(block, 1);
y = Getuint32OutPortPtrs(block, 1);
l = (l + 1) % 2;
}
}
- *y = (unsigned long)l;
+ *y = (SCSUINT32_COP)l;
}
else
{
l = (l + 1) % 2;
}
}
- y[i] = (unsigned long)l;
+ y[i] = (SCSUINT32_COP)l;
}
}
else
double *mat = NULL;
double *Dt = NULL;
double *off = NULL;
- long *icount = NULL;
+ SCSINT32_COP *icount = NULL;
double t = 0.0;
long long *counter = NULL;
int m = 0;
case SCSINT32_N :
{
- long *u1 = Getint32InPortPtrs(block, 1);
- long *u2 = Getint32InPortPtrs(block, 2);
- long *y1 = Getint32OutPortPtrs(block, 1);
+ SCSINT32_COP *u1 = Getint32InPortPtrs(block, 1);
+ SCSINT32_COP *u2 = Getint32InPortPtrs(block, 2);
+ SCSINT32_COP *y1 = Getint32OutPortPtrs(block, 1);
for (i = 0; i < mu * nu; i++)
{
v = (double)u1[i] * (double)u2[0];
}
else
{
- y1[i] = (long)v;
+ y1[i] = (SCSINT32_COP)v;
}
}
break;
case SCSUINT32_N :
{
- unsigned long *u1 = Getuint32InPortPtrs(block, 1);
- unsigned long *u2 = Getuint32InPortPtrs(block, 2);
- unsigned long *y1 = Getuint32OutPortPtrs(block, 1);
+ SCSUINT32_COP *u1 = Getuint32InPortPtrs(block, 1);
+ SCSUINT32_COP *u2 = Getuint32InPortPtrs(block, 2);
+ SCSUINT32_COP *y1 = Getuint32OutPortPtrs(block, 1);
for (i = 0; i < mu * nu; i++)
{
v = (double)u1[i] * (double)u2[0];
}
else
{
- y1[i] = (unsigned long)v;
+ y1[i] = (SCSUINT32_COP)v;
}
}
break;
case SCSINT32_N :
{
- long *u1 = Getint32InPortPtrs(block, 1);
- long *u2 = Getint32InPortPtrs(block, 2);
- long *y1 = Getint32OutPortPtrs(block, 1);
+ SCSINT32_COP *u1 = Getint32InPortPtrs(block, 1);
+ SCSINT32_COP *u2 = Getint32InPortPtrs(block, 2);
+ SCSINT32_COP *y1 = Getint32OutPortPtrs(block, 1);
for (i = 0; i < mu * nu; i++)
{
v = (double)u1[i] * (double)u2[0];
{
v = rpar[1];
}
- y1[i] = (long)v;
+ y1[i] = (SCSINT32_COP)v;
}
break;
}
case SCSUINT32_N :
{
- unsigned long *u1 = Getuint32InPortPtrs(block, 1);
- unsigned long *u2 = Getuint32InPortPtrs(block, 2);
- unsigned long *y1 = Getuint32OutPortPtrs(block, 1);
+ SCSUINT32_COP *u1 = Getuint32InPortPtrs(block, 1);
+ SCSUINT32_COP *u2 = Getuint32InPortPtrs(block, 2);
+ SCSUINT32_COP *y1 = Getuint32OutPortPtrs(block, 1);
for (i = 0; i < mu * nu; i++)
{
v = (double)u1[i] * (double)u2[0];
{
v = rpar[1];
}
- y1[i] = (unsigned long)v;
+ y1[i] = (SCSUINT32_COP)v;
}
break;
}
int mu1 = GetInPortRows(block, 1);
int nu1 = GetInPortCols(block, 1);
int nu2 = GetInPortCols(block, 2);
- long *u1 = Getint32InPortPtrs(block, 1);
- long *u2 = Getint32InPortPtrs(block, 2);
- long *y = Getint32OutPortPtrs(block, 1);
+ SCSINT32_COP *u1 = Getint32InPortPtrs(block, 1);
+ SCSINT32_COP *u2 = Getint32InPortPtrs(block, 2);
+ SCSINT32_COP *y = Getint32OutPortPtrs(block, 1);
double k = pow(2, 32);
int l = 0;
}
else
{
- y[jl] = (long)(D);
+ y[jl] = (SCSINT32_COP)(D);
}
}
}
int mu1 = GetInPortRows(block, 1);
int nu1 = GetInPortCols(block, 1);
int nu2 = GetInPortCols(block, 2);
- long *u1 = Getint32InPortPtrs(block, 1);
- long *u2 = Getint32InPortPtrs(block, 2);
- long *y = Getint32OutPortPtrs(block, 1);
+ SCSINT32_COP *u1 = Getint32InPortPtrs(block, 1);
+ SCSINT32_COP *u2 = Getint32InPortPtrs(block, 2);
+ SCSINT32_COP *y = Getint32OutPortPtrs(block, 1);
double k = pow(2, 32);
int l = 0;
(t) = -(-((k / 2)) + fabs(t - (double)((int)((t) / ((k / 2)))) * ((k / 2))));
}
}
- y[jl] = (long)t;
+ y[jl] = (SCSINT32_COP)t;
}
}
}
{
if ((flag == 1) | (flag == 6))
{
- long *u1, *u2, *y;
+ SCSINT32_COP *u1, *u2, *y;
double k, C, D;
int mu1, nu1, nu2, i, j, l, ji, jl, il;
int *ipar;
}
if ((D) > ((k / 2) - 1))
{
- y[jl] = (long)((k / 2) - 1);
+ y[jl] = (SCSINT32_COP)((k / 2) - 1);
}
else if ((D) < -((k / 2)))
{
- y[jl] = -(long)((k / 2));
+ y[jl] = -(SCSINT32_COP)((k / 2));
}
else
{
- y[jl] = (long)(D);
+ y[jl] = (SCSINT32_COP)(D);
}
}
}
{
if ((flag == 1) | (flag == 6))
{
- unsigned long *u1, *u2, *y;
+ SCSUINT32_COP *u1, *u2, *y;
double k, C, D;
int mu1, nu1, nu2, i, j, l, ji, jl, il;
int *ipar;
}
else
{
- y[jl] = (unsigned long)(D);
+ y[jl] = (SCSUINT32_COP)(D);
}
}
}
{
if ((flag == 1) | (flag == 6))
{
- unsigned long *u1, *u2, *y;
+ SCSUINT32_COP *u1, *u2, *y;
double k, C, D, t;
int mu1, nu1, nu2, i, j, l, ji, jl, il;
int *ipar;
D = D + C;
}
t = D - (int)(D / (k)) * ((k));
- y[jl] = (unsigned long)t;
+ y[jl] = (SCSUINT32_COP)t;
}
}
}
int mu1 = GetInPortRows(block, 1);
int nu1 = GetInPortCols(block, 1);
int nu2 = GetInPortCols(block, 2);
- unsigned long *u1 = Getuint32InPortPtrs(block, 1);
- unsigned long *u2 = Getuint32InPortPtrs(block, 2);
- unsigned long *y = Getuint32OutPortPtrs(block, 1);
+ SCSUINT32_COP *u1 = Getuint32InPortPtrs(block, 1);
+ SCSUINT32_COP *u2 = Getuint32InPortPtrs(block, 2);
+ SCSUINT32_COP *y = Getuint32OutPortPtrs(block, 1);
double k = pow(2, 32);
}
if (D > (k - 1))
{
- y[jl] = (unsigned long)(k - 1);
+ y[jl] = (SCSUINT32_COP)(k - 1);
}
else if (D < 0)
{
}
else
{
- y[jl] = (unsigned long)(D);
+ y[jl] = (SCSUINT32_COP)(D);
}
}
}
int m = GetInPortRows(block, 1);
int n = GetInPortCols(block, 1);
- long *u1 = Getint32InPortPtrs(block, 1);
- long *u2 = Getint32InPortPtrs(block, 2);
- long *y = Getint32OutPortPtrs(block, 1);
+ SCSINT32_COP *u1 = Getint32InPortPtrs(block, 1);
+ SCSINT32_COP *u2 = Getint32InPortPtrs(block, 2);
+ SCSINT32_COP *y = Getint32OutPortPtrs(block, 1);
int *ipar = GetIparPtrs(block);
if (flag == 1)
int m = GetInPortRows(block, 1);
int n = GetInPortCols(block, 1);
- unsigned long *u1 = Getuint32InPortPtrs(block, 1);
- unsigned long *u2 = Getuint32InPortPtrs(block, 2);
- unsigned long *y = Getuint32OutPortPtrs(block, 1);
+ SCSUINT32_COP *u1 = Getuint32InPortPtrs(block, 1);
+ SCSUINT32_COP *u2 = Getuint32InPortPtrs(block, 2);
+ SCSUINT32_COP *y = Getuint32OutPortPtrs(block, 1);
int *ipar = GetIparPtrs(block);
if (flag == 1)
int i = 0;
int mu = GetInPortRows(block, 1);
int nu = GetInPortCols(block, 1);
- long *u = Getint32InPortPtrs(block, 1);
- long *y = Getint32OutPortPtrs(block, 1);
+ SCSINT32_COP *u = Getint32InPortPtrs(block, 1);
+ SCSINT32_COP *y = Getint32OutPortPtrs(block, 1);
int *ipar = GetIparPtrs(block);
for (i = 0; i < mu * nu; i++)
{
{
int mu = GetInPortRows(block, 1);
int nu = GetInPortCols(block, 1);
- long *u = Getint32InPortPtrs(block, 1);
- long *y = Getint32OutPortPtrs(block, 1);
+ SCSINT32_COP *u = Getint32InPortPtrs(block, 1);
+ SCSINT32_COP *y = Getint32OutPortPtrs(block, 1);
int *ipar = GetIparPtrs(block);
unsigned long k = (unsigned long)pow(2, 32 - 1);
for (i = 0; i < mu * nu; i++)
{
int j = 0;
- long v = u[i];
+ SCSINT32_COP v = u[i];
for (j = 0; j < ipar[0]; j++)
{
y[i] = v & k;
int i = 0;
int mu = GetInPortRows(block, 1);
int nu = GetInPortCols(block, 1);
- long *u = Getint32InPortPtrs(block, 1);
- long *y = Getint32OutPortPtrs(block, 1);
+ SCSINT32_COP *u = Getint32InPortPtrs(block, 1);
+ SCSINT32_COP *y = Getint32OutPortPtrs(block, 1);
int *ipar = GetIparPtrs(block);
for (i = 0; i < mu * nu; i++)
{
int mu = GetInPortRows(block, 1);
int nu = GetInPortCols(block, 1);
- long *u = Getint32InPortPtrs(block, 1);
- long *y = Getint32OutPortPtrs(block, 1);
+ SCSINT32_COP *u = Getint32InPortPtrs(block, 1);
+ SCSINT32_COP *y = Getint32OutPortPtrs(block, 1);
int *ipar = GetIparPtrs(block);
unsigned long k = (unsigned long)pow(2, 32 - 1);
for (i = 0; i < mu * nu; i++)
{
- long v = u[i];
+ SCSINT32_COP v = u[i];
for (j = 0; j < -ipar[0]; j++)
{
y[i] = v & 1;
int i = 0;
int mu = GetInPortRows(block, 1);
int nu = GetInPortCols(block, 1);
- unsigned long *u = Getuint32InPortPtrs(block, 1);
- unsigned long *y = Getuint32OutPortPtrs(block, 1);
+ SCSUINT32_COP *u = Getuint32InPortPtrs(block, 1);
+ SCSUINT32_COP *y = Getuint32OutPortPtrs(block, 1);
int *ipar = GetIparPtrs(block);
for (i = 0; i < mu * nu; i++)