1 files changed, 14 insertions, 0 deletions
diff --git a/413/CH4/EX4.5/Table_4_5.sce b/413/CH4/EX4.5/Table_4_5.sce
new file mode 100644
index 000000000..e38fbfbc0
--- /dev/null
+++ b/413/CH4/EX4.5/Table_4_5.sce
@@ -0,0 +1,14 @@
+clc
+clear
+function a=rat(x)
+    a=(1.0018+0.6727*x +0.1598*x.*x)/(1-0.3263*x)    
+endfunction
+function a=che(x)
+    a=0.9946+0.9973.*x+x.*x.*0.543+x.*x.*x.*0.1772
+    endfunction
+function out=tab4(y)   
+out=[y,exp(y),che(y),exp(y)-che(y), rat(y),exp(y)-rat(y)]
+endfunction
+for y=-1:0.2:1
+disp(tab4(y)')
+end
+\ No newline at end of file