summaryrefslogtreecommitdiff
path: root/3432/CH5/EX5.4/Ex5_4.sce
blob: 2a17aed8361e8f4ff923797f664d57868f75608a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//Example 5.4
//Root locus for satellite attitude control with modified 
//PD control or Lead compensator.

xdel(winsid())//close all graphics Windows
clear;
clc;

//------------------------------------------------------------------
//System transfer function and its root locus 

s=poly(0,'s');
sysL=(s+1)/(s^2*(s+12));
evans(sysL,100)

//Title, labels and grid to the figure
exec .\fig_settings.sci; // custom script for setting figure properties
title(['Root locus for', '$L(s)=(s+1)/s^2(s+12)$'],'fontsize',3)
zoom_rect([-6 -3 2 3])
h=legend('');
h.visible = "off"

//------------------------------------------------------------------