From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 1328/CH18/EX18.9/18_9.sce | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 1328/CH18/EX18.9/18_9.sce

(limited to '1328/CH18/EX18.9/18_9.sce')

diff --git a/1328/CH18/EX18.9/18_9.sce b/1328/CH18/EX18.9/18_9.sce
new file mode 100644
index 000000000..9c2aa3e96
--- /dev/null
+++ b/1328/CH18/EX18.9/18_9.sce
@@ -0,0 +1,21 @@
+printf("\t example 18.9 \n");
+G=60; // lb/(hr)*(ft^2)
+De=1/12; // ft
+theta=6; // hr
+cs=41.3; // Btu/(ft^3)*(F)
+c=0.0191; // Btu/(ft^3)*(F)
+f=0.45; // void fraction
+T=90;
+T1=200;
+t0=50;
+h=(0.79*(G/De)^0.7); // eq 18.90
+printf("\t h is : %.1f \n",h);
+X=(h*theta/(cs*(1-f)));
+Y=(T-t0)/(T1-t0);
+printf("\t X is : %.0f \n",X);
+printf("\t Y is : %.3f \n",Y);
+row=0.0807; // lb/(ft^3) air
+Z=24.5; // Z=(h*x*row/(c*G)), by comparing X an Y in fig 18.21
+x=24.5*(c*G/(h*row));
+printf("\t x is : %.1f ft \n",x);
+// end
-- 
cgit