summaryrefslogtreecommitdiff
path: root/3434/CH9/EX9.2.ii
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3434/CH9/EX9.2.ii
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 '3434/CH9/EX9.2.ii')
-rw-r--r--3434/CH9/EX9.2.ii/Ex9_2_ii.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/3434/CH9/EX9.2.ii/Ex9_2_ii.sce b/3434/CH9/EX9.2.ii/Ex9_2_ii.sce
new file mode 100644
index 000000000..fca953e7c
--- /dev/null
+++ b/3434/CH9/EX9.2.ii/Ex9_2_ii.sce
@@ -0,0 +1,19 @@
+clc
+// given data
+w=0.6 // in km
+h2=2.5 // in km
+p=5/100.0 // porosity
+rhor=3000.0 // density of sediment in kg/m^3
+cr=750.0 // specific heat of sediment in J/kg-K
+rhow=1000.0 // density of water in kg/m^3
+cw=4200.0 // specific heat of water in J/kg-K
+G=35.0 // temperature gradient in degree C/km
+T1=45.0 // temp 1 in degree celsius
+T0=12.0 // temp 2 in degree celsius
+Q=0.75 // water extraction rate in m^3/sec-km^2
+
+tau=((p*rhow*cw+(1-p)*rhor*cr)*w*1000**3/(Q*rhow*cw))/(60*60*24*365) // in years
+
+printf( "Time constant is %.1f years",tau)
+
+// the answer is different in textbook due to wrong calculations