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

---
 599/CH6/EX6.9/example6_9.sce | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100755 599/CH6/EX6.9/example6_9.sce

(limited to '599/CH6/EX6.9/example6_9.sce')

diff --git a/599/CH6/EX6.9/example6_9.sce b/599/CH6/EX6.9/example6_9.sce
new file mode 100755
index 000000000..393ec1fda
--- /dev/null
+++ b/599/CH6/EX6.9/example6_9.sce
@@ -0,0 +1,22 @@
+
+clear;
+clc;
+printf("\t Example 6.9\n");
+
+            //determine the drying condition of sample 0.3*0.3 size.sheet lost weight at rate of 10^-4 kg/s until the moisture fell to 60 percent
+            
+x1=.75;                //moisture content on wet basis
+xbar=0.1;                //equilllibrium moisture on dry basis
+xcr=0.6;                //critical moisture content
+Ls=0.90;                //mass of bone dry solid ais the drying surface
+A=0.3*0.3*2;            //both upper surafce and lower surface are exposed
+//A*Nc=10^-4;
+x2=.2;                //moisture content on wet basis  finally after drying
+Xcr=0.6/0.4;          //crtical moisture content
+X1=3;                 //moisture content on dry basis  intially
+X2=0.25;              //moisture content on dry basis  finally after drying
+Xbar=0.1/0.9;        //equillibrium moisture 
+tbar=Ls/(10^-4) * ((X1-Xcr)+(Xcr-Xbar)*log((Xcr-Xbar)/(X2-Xbar)));
+printf("\n the time for drying the sheets from 75 to 25 percent moisture under same drying conditions is :%f hr",tbar/3600);
+
+//end
\ No newline at end of file
-- 
cgit