From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 122/CH9/EX9.7/exa9_7.sce | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100755 122/CH9/EX9.7/exa9_7.sce (limited to '122/CH9/EX9.7/exa9_7.sce') diff --git a/122/CH9/EX9.7/exa9_7.sce b/122/CH9/EX9.7/exa9_7.sce new file mode 100755 index 000000000..1820e9076 --- /dev/null +++ b/122/CH9/EX9.7/exa9_7.sce @@ -0,0 +1,23 @@ +// Example 9-7 +// Finding e to the power At using laplace transforms + +clear; clc; +xdel(winsid()); //close all windows + +// please edit the path +// cd ""; +// exec("pf_residu.sci"); +// exec("ilaplace.sci"); + +s = %s; +A = [0 1; 0 -2]; +L = inv(s*eye(2,2) - A); +disp(L, 'inv(sI - A) ='); + +// Find the Inverse Laplace transform +for i = 1:2 + for j = 1:2 + phi(i,j) = ilaplace(L(i,j)); + end; +end; +disp(phi,'e^At ='); -- cgit