19
19
* See the file ./license.txt
21
/*--------------------------------------------------------------------------*/
21
22
#include "scicos_block4.h"
23
void matz_reimc(scicos_block *block,int flag)
23
#include "dynlib_scicos_blocks.h"
24
/*--------------------------------------------------------------------------*/
25
SCICOS_BLOCKS_IMPEXP void matz_reimc(scicos_block *block,int flag)
32
mu=GetOutPortRows(block,1);
33
nu=GetOutPortCols(block,1);
34
u1=GetRealInPortPtrs(block,1);
35
u2=GetRealInPortPtrs(block,2);
36
y1r=GetRealOutPortPtrs(block,1);
37
y1i=GetImagOutPortPtrs(block,1);
29
int mu = GetOutPortRows(block,1);
30
int nu = GetOutPortCols(block,1);
31
double *u1 = GetRealInPortPtrs(block,1);
32
double *u2 = GetRealInPortPtrs(block,2);
33
double *y1r = GetRealOutPortPtrs(block,1);
34
double *y1i = GetImagOutPortPtrs(block,1);
42
/*--------------------------------------------------------------------------*/