summaryrefslogtreecommitdiff
path: root/662/DEPENDENCIES/file02.sci
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /662/DEPENDENCIES/file02.sci
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '662/DEPENDENCIES/file02.sci')
-rwxr-xr-x662/DEPENDENCIES/file02.sci25
1 files changed, 25 insertions, 0 deletions
diff --git a/662/DEPENDENCIES/file02.sci b/662/DEPENDENCIES/file02.sci
new file mode 100755
index 000000000..4c83682e8
--- /dev/null
+++ b/662/DEPENDENCIES/file02.sci
@@ -0,0 +1,25 @@
+//Programming Example 8.11
+//Interval reduction Routine
+ //Second File
+
+
+function[]= reduce()
+ global yl
+ global yr
+ global a
+ global b
+ global xl
+ global xr //external variables
+ xl=a+0.5 *(b-a-cnst);
+ xr=xl+cnst;
+ yl=curve(xl);
+ yr=curve(xr);
+ if(yl>yr) then //retain left interval
+ b=xr;
+ return;
+ end
+ if(yl<yr) then //retain right interval
+ a=xl;
+ return;
+ end
+endfunction