From f35ea80659b6a49d1bb2ce1d7d002583f3f40947 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:38:01 +0530
Subject: updated the code

---
 75/CH4/EX4.10/ex_9.sce | 5 +++--
 75/CH4/EX4.8/ex_7.sce  | 6 ++++--
 2 files changed, 7 insertions(+), 4 deletions(-)

(limited to '75/CH4')

diff --git a/75/CH4/EX4.10/ex_9.sce b/75/CH4/EX4.10/ex_9.sce
index b3ba594e2..15d7a7339 100755
--- a/75/CH4/EX4.10/ex_9.sce
+++ b/75/CH4/EX4.10/ex_9.sce
@@ -1,7 +1,8 @@
-        //    PG (227)
+//    PG (227)
 
 deff('[y]=f(x)','y=exp(x)')
-c3=0.994571+0.997308*x+0.542991*x^2+0.177347*x^3;
+x = -1:0.01:1;
+c3=0.994571+0.997308*x+0.542991*x.^2+0.177347*x.^3;
 norm(exp(x)-c3,'inf')
 
 //    as obtained in the example 6, c4 = 0.00547, T4(x) = (-1)
diff --git a/75/CH4/EX4.8/ex_7.sce b/75/CH4/EX4.8/ex_7.sce
index 01c0b0149..8ef400009 100755
--- a/75/CH4/EX4.8/ex_7.sce
+++ b/75/CH4/EX4.8/ex_7.sce
@@ -1,4 +1,4 @@
-        //    PG (220)
+//    PG (220)
 
 deff('[y]=f(x)','y=exp(x)')
 
@@ -22,7 +22,9 @@ C4=2*(integrate('exp(cos(x))*cos(4*x)','x',0,3.14))/(3.14)
 C5=2*(integrate('exp(cos(x))*cos(5*x)','x',0,3.14))/(3.14)
 
 //    we obtain
+x=0:.01:%pi;                // defining the range of x
+
 c1=1.266+1.130*x;
-c3=0.994571+0.997308*x+0.542991*x^2+0.177347*x^3;
+c3=0.994571+0.997308*x+0.542991*x.^2+0.177347*x.^3;
 norm(exp(x)-c1,'inf')
 norm(exp(x)-c3,'inf')
\ No newline at end of file
-- 
cgit