summaryrefslogtreecommitdiff
path: root/1340/CH4/EX4.10
diff options
context:
space:
mode:
Diffstat (limited to '1340/CH4/EX4.10')
-rwxr-xr-x1340/CH4/EX4.10/4_10.sce18
1 files changed, 0 insertions, 18 deletions
diff --git a/1340/CH4/EX4.10/4_10.sce b/1340/CH4/EX4.10/4_10.sce
deleted file mode 100755
index 58ecd4673..000000000
--- a/1340/CH4/EX4.10/4_10.sce
+++ /dev/null
@@ -1,18 +0,0 @@
-clc;
-s = %s;
-C1 = 26.25*(s+4)/(s*(s+3.5)*(s+5)*(s+6));
-pf = pfss(C1);
-disp(pf);
-k = numer(pf(4));
-disp("cannot be made",C1,"second order approx of",k,"since the residue of pole at -3.5,which is close to zero at 4 is =");
-C2 = 26.25*(s+4)/(s*(s+4.01)*(s+5)*(s+6));
-pf1 = pfss(C2);
-disp(pf1);
-l = numer(pf(4));
-disp("is small compared to the residues at other poles",l,"residue of pole at -4.01");
-C2 = C2 -pf1(4);
-syms t s;
-td = ilaplace(C2,s,t)
-disp(td,"second order approx of C2 = ")
-
-