summaryrefslogtreecommitdiff
path: root/3434/CH9/EX9.2.i
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.i
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.i')
-rw-r--r--3434/CH9/EX9.2.i/Ex9_2_i.sce23
1 files changed, 23 insertions, 0 deletions
diff --git a/3434/CH9/EX9.2.i/Ex9_2_i.sce b/3434/CH9/EX9.2.i/Ex9_2_i.sce
new file mode 100644
index 000000000..fca95355b
--- /dev/null
+++ b/3434/CH9/EX9.2.i/Ex9_2_i.sce
@@ -0,0 +1,23 @@
+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
+
+T2=T0+G*h2 // initial temp in degree celsius
+
+thetao=T2-T1 // in degree celsius
+
+E0byA=(p*rhow*(1000**3)*cw+(1-p)*rhor*(1000**3)*cr)*w*thetao // in J/km^2
+
+printf( "The heat content is %.2e J/km^2",E0byA)
+
+// the answer is different in textbook due to wrong thetao