diff options
Diffstat (limited to '2048/CH11/EX11.2/recursion_ex1.sce')
-rwxr-xr-x | 2048/CH11/EX11.2/recursion_ex1.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/2048/CH11/EX11.2/recursion_ex1.sce b/2048/CH11/EX11.2/recursion_ex1.sce new file mode 100755 index 000000000..aca798303 --- /dev/null +++ b/2048/CH11/EX11.2/recursion_ex1.sce @@ -0,0 +1,12 @@ +// Recursive computation of Ej and Fj for the system presented in Example 11.2 on page 408.
+// 11.2
+
+exec('poladd.sci',-1);
+exec('polsize.sci',-1);
+exec('recursion.sci',-1);
+
+C = [1 0.5]; dC = 1;
+A = [1 -0.6 -0.16]; dA = 2;
+j = 2;
+[Fj,dFj,Ej,dEj] = recursion(A,dA,C,dC,j)
+
|