blob: df0f7f97d0dd426f32593b1acd4497b2552ffca2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
// IMC design for Lewin's example
// 10.8
exec('tf.sci');
exec('myc2d.sci');
exec('imc_stable1.sci');
exec('zpowk.sci',-1);
exec('imcsplit.sci',-1);
exec('flip.sci',-1);
num = 1; den = [250 35 1]; Ts = 3;
G = tf(num,den);
[B,A,k] = myc2d(G,Ts);
alpha = 0.9;
[k,GiN,GiD] = imc_stable1(B,A,k,alpha);
[zk,dzk] = zpowk(k);
Bp = B; Ap = A;
t0 = 0; tfi = 100; st = 1; Nvar = 0;
|
