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

---
 1793/CH7/EX7.1/7q1.sce   | 11 +++++++++++
 1793/CH7/EX7.10/7q10.sce | 13 +++++++++++++
 1793/CH7/EX7.11/7q11.sce | 15 +++++++++++++++
 1793/CH7/EX7.12/7q12.sce | 14 ++++++++++++++
 1793/CH7/EX7.2/7_2.sce   | 12 ++++++++++++
 1793/CH7/EX7.3/7_3.sce   |  9 +++++++++
 1793/CH7/EX7.4/7q4.sce   | 11 +++++++++++
 1793/CH7/EX7.5/7q5.sce   | 14 ++++++++++++++
 1793/CH7/EX7.6/7q6.sce   |  9 +++++++++
 1793/CH7/EX7.8/7q8.sce   |  8 ++++++++
 1793/CH7/EX7.9/7q9.sce   | 10 ++++++++++
 11 files changed, 126 insertions(+)
 create mode 100755 1793/CH7/EX7.1/7q1.sce
 create mode 100755 1793/CH7/EX7.10/7q10.sce
 create mode 100755 1793/CH7/EX7.11/7q11.sce
 create mode 100755 1793/CH7/EX7.12/7q12.sce
 create mode 100755 1793/CH7/EX7.2/7_2.sce
 create mode 100755 1793/CH7/EX7.3/7_3.sce
 create mode 100755 1793/CH7/EX7.4/7q4.sce
 create mode 100755 1793/CH7/EX7.5/7q5.sce
 create mode 100755 1793/CH7/EX7.6/7q6.sce
 create mode 100755 1793/CH7/EX7.8/7q8.sce
 create mode 100755 1793/CH7/EX7.9/7q9.sce

(limited to '1793/CH7')

diff --git a/1793/CH7/EX7.1/7q1.sce b/1793/CH7/EX7.1/7q1.sce
new file mode 100755
index 000000000..ba26d78be
--- /dev/null
+++ b/1793/CH7/EX7.1/7q1.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+L= 30 //cm
+A= 177 //cm^2
+h= 50 //cm
+Q= 350 //cm^3
+t= 300 //sec
+//claculations
+k=Q*L/(A*h*t)
+//results
+printf ('hydraulic conductivity = % 3f cm/sec ',k)
diff --git a/1793/CH7/EX7.10/7q10.sce b/1793/CH7/EX7.10/7q10.sce
new file mode 100755
index 000000000..9c2dcada2
--- /dev/null
+++ b/1793/CH7/EX7.10/7q10.sce
@@ -0,0 +1,13 @@
+clc
+//initialisation of variables
+k1= 0.302e-7 //cm/sec
+k2= 0.12e-7 //cm/sec
+e1= 1.1
+e2= 0.9
+e= 0.75
+//calcualtions
+n= (log10((k1/k2)*((1+e1)/(1+e2))))/log10(e1/e2)
+C= k1/(e1^n/(1+e1))
+k= C*(e^n/(1+e))
+//results
+printf ('hydraulic conductivity = %e cm/sec ',k')
diff --git a/1793/CH7/EX7.11/7q11.sce b/1793/CH7/EX7.11/7q11.sce
new file mode 100755
index 000000000..a389ccc0d
--- /dev/null
+++ b/1793/CH7/EX7.11/7q11.sce
@@ -0,0 +1,15 @@
+clc
+//initialisation of variables
+H1= 2 //m
+H2= 3 //m
+H3= 4 //m
+k1= 1e-4 //cm/sec
+k2= 3.2e-2 //cm/sec
+k3= 4.1e-5 //cm/sec
+//calculations
+H= H1+H2+H3
+Kh= (1/H)*((k1*H1)+(k2*H2)+(k3*H3))
+Kv= H/((H1/k1)+(H2/k2)+(H3/k3))
+P= Kh/Kv
+//results
+printf ('ration of equivalent hydraulic conductivity = % 2f ',P)
diff --git a/1793/CH7/EX7.12/7q12.sce b/1793/CH7/EX7.12/7q12.sce
new file mode 100755
index 000000000..5c094d9c0
--- /dev/null
+++ b/1793/CH7/EX7.12/7q12.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+H= 450 //mm
+h= 150 //mm
+k1= 1e-2 //cm/sec
+k2= 3e-3 //cm/sec
+k3= 4.9e-4 //cm/sec
+h1= 300 //mm
+//calculations
+Kv= H/(h*(1/k1+1/k2+1/k3))
+i= h1/H
+q= Kv*i*100*3600
+//results
+printf ('rate of water supply = % 2f cm/hr ',q)
diff --git a/1793/CH7/EX7.2/7_2.sce b/1793/CH7/EX7.2/7_2.sce
new file mode 100755
index 000000000..bf7e5db2a
--- /dev/null
+++ b/1793/CH7/EX7.2/7_2.sce
@@ -0,0 +1,12 @@
+clc
+//initialisation of variables
+L= 203 //mm
+A= 10.3 //cm^2
+a= 0.39 //cm^2
+h0= 508 //mm
+h180= 305 //mm
+t= 180 //sec
+//calculations
+k= 2.303*a*L*log10(h0/h180)/(A*t)
+//results
+printf ('hydraulic conductivity of sand = % 2f in/sec ',k)
diff --git a/1793/CH7/EX7.3/7_3.sce b/1793/CH7/EX7.3/7_3.sce
new file mode 100755
index 000000000..5c8dd60df
--- /dev/null
+++ b/1793/CH7/EX7.3/7_3.sce
@@ -0,0 +1,9 @@
+clc
+//initialisation of varilables
+k= 3e-7 //cm/sec
+n= 0.0911e-4 //g*sec/cm^2
+dw= 1 //g/cc
+//calculations
+K= k*n/dw
+//results
+printf ('absolute premeability = % 4f cm^2 ',K)
diff --git a/1793/CH7/EX7.4/7q4.sce b/1793/CH7/EX7.4/7q4.sce
new file mode 100755
index 000000000..6285ccdfb
--- /dev/null
+++ b/1793/CH7/EX7.4/7q4.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+k= 5.3e-5 //m/sec
+H= 3 //m
+a= 0.139 //radians
+//calculations
+A= H*cos(a)
+i= sin(a)
+q= k*i*A*3600
+//results
+printf ('rate of seepage = % 4f m^3/hr/m ',q)
diff --git a/1793/CH7/EX7.5/7q5.sce b/1793/CH7/EX7.5/7q5.sce
new file mode 100755
index 000000000..21d909224
--- /dev/null
+++ b/1793/CH7/EX7.5/7q5.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+L= 50 //m
+k= 0.08e-2//m/sec
+h= 4 //m
+H1= 3 //m
+H= 8 //m
+a= 0.139 //radians
+//calculations
+i= h*cos(a)/L
+A= H1*cos(a)
+q= k*i*A
+//results
+printf ('flow rate = % 2f m^3/sec/m ',q)
diff --git a/1793/CH7/EX7.6/7q6.sce b/1793/CH7/EX7.6/7q6.sce
new file mode 100755
index 000000000..363e3dbc8
--- /dev/null
+++ b/1793/CH7/EX7.6/7q6.sce
@@ -0,0 +1,9 @@
+clc
+//initialisation of variables
+k1= 0.02 //cm/sec
+e1= 0.5 
+e2= 0.65
+//calculations
+k2= k1*(e2^3/(1+e2))/(e1^3/(1+e1))
+//results
+printf ('hydraulic conductivity at void ratio of 0.65 = % 2f cm/sec ',k2)
diff --git a/1793/CH7/EX7.8/7q8.sce b/1793/CH7/EX7.8/7q8.sce
new file mode 100755
index 000000000..644a094a2
--- /dev/null
+++ b/1793/CH7/EX7.8/7q8.sce
@@ -0,0 +1,8 @@
+clc
+//initialisation of variables
+e= 0.6
+D10= 0.09 //mm
+//calculations
+k= 2.4622*(D10^2*(e^3/(1+e)))^0.7825
+//results
+printf ('hydraulic conductivity = % 4f cm/sec ',k)
diff --git a/1793/CH7/EX7.9/7q9.sce b/1793/CH7/EX7.9/7q9.sce
new file mode 100755
index 000000000..0ea46862c
--- /dev/null
+++ b/1793/CH7/EX7.9/7q9.sce
@@ -0,0 +1,10 @@
+clc
+//initialisation of variables
+e= 0.6
+D10= 0.09 //mm
+D60= 0.16 //mm
+//calculations
+Cu=D60/D10
+k= 35*(e^3/(1+e))*(Cu^0.6)*(D10^2.32)
+//results
+printf ('hydraulic conductivity = % 3f cm/sec ',k)
-- 
cgit