summaryrefslogtreecommitdiff
path: root/773/CH6/EX6.03/6_03.sci
blob: 6d8aa8b5ef9141ecf183ca47998bb26e2aea712e (plain)
1
2
3
4
5
6
7
8
9
10
11
//syslin//
exec series.sce;
s=%s;
sys1=syslin('c',3/(s*(s+1)))
sys2=syslin('c',s^2/(3*(s+1)))
sys3=syslin('c',6/(s))
a=(-1)*sys3;  
b=series(sys1,sys2);
y=b/.a   // feedback operation
y=simp(y)
disp(y,"C(s)/R(s)=")