summaryrefslogtreecommitdiff
path: root/416/CH8/EX8.4/exp8_4ff.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /416/CH8/EX8.4/exp8_4ff.sce
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 '416/CH8/EX8.4/exp8_4ff.sce')
-rwxr-xr-x416/CH8/EX8.4/exp8_4ff.sce41
1 files changed, 41 insertions, 0 deletions
diff --git a/416/CH8/EX8.4/exp8_4ff.sce b/416/CH8/EX8.4/exp8_4ff.sce
new file mode 100755
index 000000000..ce00a5d6b
--- /dev/null
+++ b/416/CH8/EX8.4/exp8_4ff.sce
@@ -0,0 +1,41 @@
+clear
+clc
+disp("example 8.4")
+flow=[1500 1000 500 500 500 1200 2900 2900 1000 400 600 1600]
+cod=1000//constant demand
+[m n]=size(flow)
+mf(1)=1500
+for i=2:n
+ mf(i)=mf(i-1)+flow(i)
+end
+plot(mf)
+dd=1:cod:mf(n)
+avg=sum(flow)/12
+if cod<avg then
+ for x=1:6
+ t=flow(1,x)
+ if t>cod|t==avg then
+
+ t=0
+ else
+ t=cod-t
+ end
+ flow1(1,x)=t;
+ end
+
+ else
+ for x=1:12
+ t=flow(1,x)
+ a=cod
+ if t>a|t==avg then
+ t=0
+ else
+ t=t-cod
+ end
+ flow1(1,x)=t;
+ end
+end
+
+sto=sum(flow1)
+printf("storage capacity of plant is %dsec-m-month",sto)
+