Reg :: Termination of this script

[Sumit Adhikari]

Following script is not terminating. It is stuck at line :

Hcic = Hcic_num / Hcic_den ;


SCRIPT :
-----------


clear all ;

stacksize('max');

z = poly(0,'z');

N = 32 ;
M = 3    ;


M = 1024 ;
Hn = syslin('c',(z^M - 1.0), (z^M));
Hcic_num = Hn*Hn*Hn;

Hd = syslin('c',(z- 1.0), (z));
Hcic_den = Hd*Hd*Hd ;

Hcic = Hcic_num / Hcic_den ;


Npoints = 1024*1024;
[hzm,fr]=frmag(Hcic,Npoints);
SBW = 1024*1024;
frm = fr*SBW;


//xbasc(0);xset('window',0);
plot(log10(frm(2:Npoints)),20*log10(hzm(2:Npoints)),"red"); mtlb_grid("on");
xbasc(0);xset('window',0);plot(frm(1:Npoints),hzm(1:Npoints),"red");
mtlb_grid("on");
xbasc(1);xset('window',1);plzr(H); mtlb_grid("on");



-- 

--------------------------------------------
Sumit Adhikari
System Design Engineer
austriamicrosystems AG
Business Unit : Automotive
Mob : 00-91-9885271710/00-91-9000161710
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.scilab.org/pipermail/users/attachments/20091126/3df88610/attachment.htm>