From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 2087/CH3/EX3.21/example3_21.sce | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100755 2087/CH3/EX3.21/example3_21.sce

(limited to '2087/CH3/EX3.21')

diff --git a/2087/CH3/EX3.21/example3_21.sce b/2087/CH3/EX3.21/example3_21.sce
new file mode 100755
index 000000000..55c126a66
--- /dev/null
+++ b/2087/CH3/EX3.21/example3_21.sce
@@ -0,0 +1,30 @@
+
+
+//example 3.21
+//calculate reservior capacity
+clc;
+//given
+W=0.4;                     //amount of water available from precipitation
+Cl=0.15;                   //Channel loss
+RL=0.1;                    //reservior loss
+B=[120 320 120 200 100];   //Base period
+D=[1800 800 900 1400 1200];//Duty at field
+A=[500 600 300 1200 500];  //Area under crop
+
+for i=1:5
+    delta(i)=8.64*B(i)/D(i);
+end
+
+for i=1:5
+    V(i)=delta(i)*A(i);
+   
+end
+s=0;
+for i=1:5
+    s=s+V(i);
+end
+C=s*(1-W)/((1-Cl)*(1-RL));
+
+mprintf("Reservior capacity=%i ha-m.",C);
+
+
-- 
cgit