Subsections


Extractor

\epsfig{file=EXTRACTOR.eps,width=90.00pt}

Library

Branching

Description

Dialog Box

Set block parameters
indices to extract 1

Default properties

Interfacing function

scilab/macros/scicos_blocks/branching/EXTRACTOR.sci

Computational function (type 4)


#include "scicos_block.h"
#include <math.h>

void extractor(scicos_block *block,int flag)
{
  int i,j;
  if(flag==1){
    for(i=0;i<block->nipar;++i){
      j=block->ipar[i]-1;
      if(j<0) j=0;
      if(j>=block->insz[0]) j=block->insz[0]-1;
      block->outptr[0][i]=block->inptr[0][j];
    }
  }
}


Ramine Nikoukhah 2004-06-22