diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1670/CH7/EX7.3 | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '1670/CH7/EX7.3')
-rwxr-xr-x | 1670/CH7/EX7.3/7_3.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/1670/CH7/EX7.3/7_3.sce b/1670/CH7/EX7.3/7_3.sce new file mode 100755 index 000000000..ac94dd29e --- /dev/null +++ b/1670/CH7/EX7.3/7_3.sce @@ -0,0 +1,18 @@ +//Example 7.3
+//Richardson Extrapolation
+//Page no. 233
+clc;close;clear;
+
+t=[1,1.1,1.2,1.3,1.4]
+I=[8.2277,7.2428,5.9908,4.5260,2.9122]
+h=0.1;
+deff('y=f1(x,h1)','y=(I(x+h1)-I(x-h1))/(2*h)')
+deff('y=f2(x,h1)','y=(I(x+2*h1)-I(x-2*h1))/(4*h)')
+deff('y=f3(x,h1)','y=(I(x+h1)-I(x-h1))/(2*h)')
+x=3;h1=1;
+D0h=f1(x,h1)
+printf('\nD0(h) = %g\n',D0h)
+D02h=f2(x,h1)
+printf('\nD0(2h) = %g\n',D02h)
+I1=(4*D0h-D02h)/x
+printf('\nI` (1.2) = %g',I1)
\ No newline at end of file |