Scilab Function
eng

scicos_sim

File content

function sim=scicos_sim(v1,v2,v3,v4,v5,..
                        v6,v7,v8,v9,v10,..
                        v11,v12,v13,v14,v15,..
                        v16,v17,v18,v19,v20,..
                        v21,v22,v23,v24,v25,..
                        v26,v27,v28,v29,v30,..
                        v31,v32,v33,v34,v35,..
                        v36,v37,v38,v39,v40)
// Copyright INRIA
  if exists('funs','local')==0 then funs=[],end
  if exists('xptr','local')==0 then xptr=[],end
  if exists('zptr','local')==0 then zptr=[],end
  if exists('ozptr','local')==0 then ozptr=[],end
  if exists('zcptr','local')==0 then zcptr=[],end
  if exists('inpptr','local')==0 then inpptr=[],end
  if exists('outptr','local')==0 then outptr=[],end
  if exists('inplnk','local')==0 then inplnk=[],end
  if exists('outlnk','local')==0 then outlnk=[],end
  if exists('rpar','local')==0 then rpar=[],end
  if exists('rpptr','local')==0 then rpptr=[],end
  if exists('ipar','local')==0 then ipar=[],end
  if exists('ipptr','local')==0 then ipptr=[],end
  if exists('opar','local')==0 then opar=list(),end
  if exists('opptr','local')==0 then opptr=[],end
  if exists('clkptr','local')==0 then clkptr=[],end
  if exists('ordptr','local')==0 then ordptr=[],end
  if exists('execlk','local')==0 then execlk=[],end
  if exists('ordclk','local')==0 then ordclk=[],end
  if exists('cord','local')==0 then cord=[],end
  if exists('oord','local')==0 then oord=[],end
  if exists('zord','local')==0 then zord=[],end
  if exists('critev','local')==0 then critev=[],end
  if exists('nb','local')==0 then nb=[],end
  if exists('ztyp','local')==0 then ztyp=[],end
  if exists('nblk','local')==0 then nblk=[],end
  if exists('ndcblk','local')==0 then ndcblk=[],end
  if exists('subscr','local')==0 then subscr=[],end
  if exists('funtyp','local')==0 then funtyp=[],end
  if exists('iord','local')==0 then iord=[],end
  if exists('labels','local')==0 then labels=[],end
  if exists('modptr','local')==0 then modptr=[],end
  sim=tlist(['scs','funs','xptr','zptr','ozptr',..
             'zcptr','inpptr','outptr','inplnk','outlnk','rpar',..
             'rpptr','ipar','ipptr','opar','opptr',..
	     'clkptr','ordptr','execlk','ordclk','cord','oord','zord',..
	     'critev','nb','ztyp','nblk','ndcblk','subscr','funtyp',..
             'iord','labels','modptr'],..
             funs,xptr,zptr,ozptr,zcptr,inpptr,..
             outptr,inplnk,outlnk,rpar,rpptr,ipar,ipptr,..
             opar,opptr,clkptr,ordptr,..
             execlk,ordclk,cord,oord,zord,..
             critev,nb,ztyp,nblk,ndcblk,..
             subscr,funtyp,iord,labels,modptr)
endfunction