summaryrefslogtreecommitdiff
path: root/257/CH12
diff options
context:
space:
mode:
Diffstat (limited to '257/CH12')
-rw-r--r--257/CH12/EX12.1/eg_12_1.sce3
-rw-r--r--257/CH12/EX12.11/example_12_11.sce5
-rw-r--r--257/CH12/EX12.12/example_12_12.sce4
-rw-r--r--257/CH12/EX12.13/example_12_13.sce4
-rw-r--r--257/CH12/EX12.14/example_12_14.sce4
-rw-r--r--257/CH12/EX12.15/example_12_15.sce4
-rw-r--r--257/CH12/EX12.16/example_12_16.sce5
-rw-r--r--257/CH12/EX12.17/example_12_17.sce3
-rw-r--r--257/CH12/EX12.18/example_12_18.sce3
-rw-r--r--257/CH12/EX12.19/eg_12_19.sce7
-rw-r--r--257/CH12/EX12.2/eg_12_2.sce6
-rw-r--r--257/CH12/EX12.20/eg_12_20.sce6
-rw-r--r--257/CH12/EX12.21/example_12_21.sce3
-rw-r--r--257/CH12/EX12.23/example_12_23.sce5
-rw-r--r--257/CH12/EX12.24/example_12_24.sce3
-rw-r--r--257/CH12/EX12.26/eg_12_26.sce4
-rw-r--r--257/CH12/EX12.27/eg_12_27.sce3
-rw-r--r--257/CH12/EX12.28/example_12_28.sce3
-rw-r--r--257/CH12/EX12.29/eg_12_29.sce5
-rw-r--r--257/CH12/EX12.3/eg_12_3.sce6
-rw-r--r--257/CH12/EX12.4/eg_12_4.sce6
-rw-r--r--257/CH12/EX12.6/eg_12_6.sce3
-rw-r--r--257/CH12/EX12.7/eg_12_7.sce3
-rw-r--r--257/CH12/EX12.8/eg_12_8.sce4
-rw-r--r--257/CH12/EX12.9/eg_12_9.sce4
25 files changed, 106 insertions, 0 deletions
diff --git a/257/CH12/EX12.1/eg_12_1.sce b/257/CH12/EX12.1/eg_12_1.sce
new file mode 100644
index 000000000..3c14bb427
--- /dev/null
+++ b/257/CH12/EX12.1/eg_12_1.sce
@@ -0,0 +1,3 @@
+s=%s
+GH=syslin('c',10/s)
+nyquist(GH) \ No newline at end of file
diff --git a/257/CH12/EX12.11/example_12_11.sce b/257/CH12/EX12.11/example_12_11.sce
new file mode 100644
index 000000000..04069765a
--- /dev/null
+++ b/257/CH12/EX12.11/example_12_11.sce
@@ -0,0 +1,5 @@
+s=%s;
+sys1=syslin('c',10*(s+3)/((s-1)*(s)))
+nyquist(sys1)
+show_margins(sys1,'nyquist')
+
diff --git a/257/CH12/EX12.12/example_12_12.sce b/257/CH12/EX12.12/example_12_12.sce
new file mode 100644
index 000000000..91bebd074
--- /dev/null
+++ b/257/CH12/EX12.12/example_12_12.sce
@@ -0,0 +1,4 @@
+s=%s;
+sys1=syslin('c',k*(0.05*s+1)*(1+s)/((10*s+1)*(s-1)))
+nyquist(sys1)
+show_margins(sys1,'nyquist')
diff --git a/257/CH12/EX12.13/example_12_13.sce b/257/CH12/EX12.13/example_12_13.sce
new file mode 100644
index 000000000..316902f9f
--- /dev/null
+++ b/257/CH12/EX12.13/example_12_13.sce
@@ -0,0 +1,4 @@
+s=%s;
+sys1=syslin('c',100*(1+5*s)/(s^4*(s+1)))
+nyquist(sys1)
+show_margins(sys1,'nyquist')
diff --git a/257/CH12/EX12.14/example_12_14.sce b/257/CH12/EX12.14/example_12_14.sce
new file mode 100644
index 000000000..20c914ea9
--- /dev/null
+++ b/257/CH12/EX12.14/example_12_14.sce
@@ -0,0 +1,4 @@
+s=%s;
+sys1=syslin('c',k*(s+5)/(s*(s-2)))
+nyquist(sys1)
+//show_margins(sys1,'nyquist')
diff --git a/257/CH12/EX12.15/example_12_15.sce b/257/CH12/EX12.15/example_12_15.sce
new file mode 100644
index 000000000..32a316e72
--- /dev/null
+++ b/257/CH12/EX12.15/example_12_15.sce
@@ -0,0 +1,4 @@
+s=%s;
+sys1=syslin('c',50/(s*(0.1*s+1)*(1+0.2*s)))
+nyquist(sys1)
+//show_margins(sys1,'nyquist')
diff --git a/257/CH12/EX12.16/example_12_16.sce b/257/CH12/EX12.16/example_12_16.sce
new file mode 100644
index 000000000..7f270af0c
--- /dev/null
+++ b/257/CH12/EX12.16/example_12_16.sce
@@ -0,0 +1,5 @@
+s=%s;
+sys1=syslin('c',10/(s^2*(0.25*s+1)*(1+0.5*s)))
+nyquist(sys1)
+//show_margins(sys1,'nyquist')
+
diff --git a/257/CH12/EX12.17/example_12_17.sce b/257/CH12/EX12.17/example_12_17.sce
new file mode 100644
index 000000000..05429f32a
--- /dev/null
+++ b/257/CH12/EX12.17/example_12_17.sce
@@ -0,0 +1,3 @@
+s=%s;
+sys1=syslin('c',k*(s+1)/((s-1)*(s)))
+nyquist(sys1) \ No newline at end of file
diff --git a/257/CH12/EX12.18/example_12_18.sce b/257/CH12/EX12.18/example_12_18.sce
new file mode 100644
index 000000000..58e6a8ef6
--- /dev/null
+++ b/257/CH12/EX12.18/example_12_18.sce
@@ -0,0 +1,3 @@
+s=%s;
+sys1=syslin('c',5/((1-s)*(s)))
+nyquist(sys1) \ No newline at end of file
diff --git a/257/CH12/EX12.19/eg_12_19.sce b/257/CH12/EX12.19/eg_12_19.sce
new file mode 100644
index 000000000..356ddd0c8
--- /dev/null
+++ b/257/CH12/EX12.19/eg_12_19.sce
@@ -0,0 +1,7 @@
+disp("as omega=0 point is on the positive real axis, so the plot for 0+ and 0- is the point itself")
+
+disp("no pole at origin. type=0")
+
+disp("two pole at origin. type=2")
+
+disp("system is stable as N=0. in fig12.49, system is unstable as N=4. z=4") \ No newline at end of file
diff --git a/257/CH12/EX12.2/eg_12_2.sce b/257/CH12/EX12.2/eg_12_2.sce
new file mode 100644
index 000000000..fee17e60d
--- /dev/null
+++ b/257/CH12/EX12.2/eg_12_2.sce
@@ -0,0 +1,6 @@
+//poles and zeroes
+s=%s
+sys=syslin('c',1/(k*s+1))
+plzr(sys)
+
+
diff --git a/257/CH12/EX12.20/eg_12_20.sce b/257/CH12/EX12.20/eg_12_20.sce
new file mode 100644
index 000000000..c22cf13dd
--- /dev/null
+++ b/257/CH12/EX12.20/eg_12_20.sce
@@ -0,0 +1,6 @@
+//poles and zeroes
+s=%s
+sys=syslin('c',1/((2*s+1)*(1+5*s)*(s)))
+plzr(sys)
+
+
diff --git a/257/CH12/EX12.21/example_12_21.sce b/257/CH12/EX12.21/example_12_21.sce
new file mode 100644
index 000000000..935466e88
--- /dev/null
+++ b/257/CH12/EX12.21/example_12_21.sce
@@ -0,0 +1,3 @@
+s=%s;
+sys1=syslin('c',(s+1)/((s-4)*(s^2)))
+nyquist(sys1) \ No newline at end of file
diff --git a/257/CH12/EX12.23/example_12_23.sce b/257/CH12/EX12.23/example_12_23.sce
new file mode 100644
index 000000000..3789ecaee
--- /dev/null
+++ b/257/CH12/EX12.23/example_12_23.sce
@@ -0,0 +1,5 @@
+s=%s;
+sys1=syslin('c',(s+8)*(s+2)/((s^3)))
+nyquist(sys1)
+show_margins(sys1,'nyquist')
+
diff --git a/257/CH12/EX12.24/example_12_24.sce b/257/CH12/EX12.24/example_12_24.sce
new file mode 100644
index 000000000..cd68c89c5
--- /dev/null
+++ b/257/CH12/EX12.24/example_12_24.sce
@@ -0,0 +1,3 @@
+s=%s;
+sys1=syslin('c',k*(s+2)^2/((s)^3))
+nyquist(sys1) \ No newline at end of file
diff --git a/257/CH12/EX12.26/eg_12_26.sce b/257/CH12/EX12.26/eg_12_26.sce
new file mode 100644
index 000000000..7491dd97d
--- /dev/null
+++ b/257/CH12/EX12.26/eg_12_26.sce
@@ -0,0 +1,4 @@
+
+s=%s
+sys=syslin('c',(12)/(s*(s+2)*(s+1)))
+plzr(sys)
diff --git a/257/CH12/EX12.27/eg_12_27.sce b/257/CH12/EX12.27/eg_12_27.sce
new file mode 100644
index 000000000..3c14bb427
--- /dev/null
+++ b/257/CH12/EX12.27/eg_12_27.sce
@@ -0,0 +1,3 @@
+s=%s
+GH=syslin('c',10/s)
+nyquist(GH) \ No newline at end of file
diff --git a/257/CH12/EX12.28/example_12_28.sce b/257/CH12/EX12.28/example_12_28.sce
new file mode 100644
index 000000000..e1020736f
--- /dev/null
+++ b/257/CH12/EX12.28/example_12_28.sce
@@ -0,0 +1,3 @@
+s=%s;
+sys1=syslin('c',k/((s-1)*(s)*(s+4)))
+nyquist(sys1) \ No newline at end of file
diff --git a/257/CH12/EX12.29/eg_12_29.sce b/257/CH12/EX12.29/eg_12_29.sce
new file mode 100644
index 000000000..f8c8a7aba
--- /dev/null
+++ b/257/CH12/EX12.29/eg_12_29.sce
@@ -0,0 +1,5 @@
+s=%s;
+sys1=syslin('c',10000*(s+1)*(s+3)/(s*(s+2)*(s-4)))
+nyquist(sys1)
+show_margins(sys1,'nyquist')
+
diff --git a/257/CH12/EX12.3/eg_12_3.sce b/257/CH12/EX12.3/eg_12_3.sce
new file mode 100644
index 000000000..384bbcdae
--- /dev/null
+++ b/257/CH12/EX12.3/eg_12_3.sce
@@ -0,0 +1,6 @@
+//poles and zeroes
+s=%s
+sys=syslin('c',1/((k*s+1)*(s)))
+plzr(sys)
+
+
diff --git a/257/CH12/EX12.4/eg_12_4.sce b/257/CH12/EX12.4/eg_12_4.sce
new file mode 100644
index 000000000..9c49ecc91
--- /dev/null
+++ b/257/CH12/EX12.4/eg_12_4.sce
@@ -0,0 +1,6 @@
+//poles and zeroes
+s=%s
+sys=syslin('c',1/((k*s+1)*(s^2)))
+plzr(sys)
+
+
diff --git a/257/CH12/EX12.6/eg_12_6.sce b/257/CH12/EX12.6/eg_12_6.sce
new file mode 100644
index 000000000..3b1294ec3
--- /dev/null
+++ b/257/CH12/EX12.6/eg_12_6.sce
@@ -0,0 +1,3 @@
+s=%s
+GH=syslin('c',k/(s*(s+2)*(s+10)))
+nyquist(GH) \ No newline at end of file
diff --git a/257/CH12/EX12.7/eg_12_7.sce b/257/CH12/EX12.7/eg_12_7.sce
new file mode 100644
index 000000000..369438a05
--- /dev/null
+++ b/257/CH12/EX12.7/eg_12_7.sce
@@ -0,0 +1,3 @@
+s=%s
+GH=syslin('c',40/((s+4)*(s^2+2*s+2)))
+nyquist(GH) \ No newline at end of file
diff --git a/257/CH12/EX12.8/eg_12_8.sce b/257/CH12/EX12.8/eg_12_8.sce
new file mode 100644
index 000000000..cc71cf5a3
--- /dev/null
+++ b/257/CH12/EX12.8/eg_12_8.sce
@@ -0,0 +1,4 @@
+s=%s
+h=syslin('c',(1+0.5*s)/(1+0.1*s)*(1+0.02*s)*(s^2));
+nyquist(h)
+//show_margins(h,'nyquist')
diff --git a/257/CH12/EX12.9/eg_12_9.sce b/257/CH12/EX12.9/eg_12_9.sce
new file mode 100644
index 000000000..93da42004
--- /dev/null
+++ b/257/CH12/EX12.9/eg_12_9.sce
@@ -0,0 +1,4 @@
+s=%s;
+sys=syslin('c',10/(s^2)*(s+2))
+nyquist(sys)
+show_margins(sys,'nyquist') \ No newline at end of file