[prev in list] [next in list] [prev in thread] [next in thread] 

List:       scilab-users
Subject:    [Scilab-users] Atoms toolbox : iodelay toolbox by S.steer
From:       Lucien Povy <lucien.povy () free ! fr>
Date:       2021-10-05 15:24:00
Message-ID: da5f6f16-a6ae-eb15-807f-9e3f6d62bb1f () free ! fr
[Download RAW message or body]

Hello all,

With new version of Scilab >6.1? we cannot use iodelay toolbox : problem 
with %rd_string.

I propose a new version of this macro. (pièce jointe %rd_string)

Regards

lucien.povy@free.fr


["%rd_string.sci" (text/plain)]

// ====================================================================
// Copyright (C) - lucien.povy@free.fr. Carantec 2020.
// This file must be used under the terms of the GNU GPL v2.0 licence.
// This source file is licensed as described in the file COPYING, which
// you should have received as part of this distribution.  The terms
// are also available at    
// https://www.gnu.org/licenses/licenses.en.html
// ====================================================================
// String output of iodelay systems matrices for scilab > 6.1.?
// ====================================================================
function txt=%rd_string(H)
  r= H.H; d=H.iodelay;
  [m,n]=size(r);
  Sr=string(r)(:);//for systems without delay.
  Sd=string(-d)(:);//now the delays.
  w="*exp("+Sd+"*"+varn(r)+")";
  w(find(d==0))="";
  for j=2:3:3*m*n-1
    Sr(j)=part("-",ones(1,length(Sr(j))));
  end
  Srl=[]; Stxt=[];
  for i=1:m*n
    Srl=[Srl;[Sr(3*(i-1)+1:3*i);blanks(length(Sr(3*i)))]];
    pw(i)=part("",1:length(w(i)));
    Stxt=[Stxt;[pw(i);w(i);pw(i);blanks(length(w(i)))]];
  end
tx=Srl+Stxt;
txt=matrix(tx,size(tx,"*")/n,n);
txt=blanks(4)+txt;
endfunction



_______________________________________________
users mailing list
users@lists.scilab.org
http://lists.scilab.org/mailman/listinfo/users


[prev in list] [next in list] [prev in thread] [next in thread]