summaryrefslogtreecommitdiff
path: root/2762/CH4/EX4.8.2/4_8_2.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2762/CH4/EX4.8.2/4_8_2.sce
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 '2762/CH4/EX4.8.2/4_8_2.sce')
-rwxr-xr-x2762/CH4/EX4.8.2/4_8_2.sce32
1 files changed, 32 insertions, 0 deletions
diff --git a/2762/CH4/EX4.8.2/4_8_2.sce b/2762/CH4/EX4.8.2/4_8_2.sce
new file mode 100755
index 000000000..110821cfc
--- /dev/null
+++ b/2762/CH4/EX4.8.2/4_8_2.sce
@@ -0,0 +1,32 @@
+//Transport Processes and Seperation Process Principles
+//Chapter 4
+//Example 4.8-2
+//Principles of Steady State Heat Transfer
+//given data
+//si units
+Tsat=89.44;
+Tw=87.8;
+Tf=(Tsat+Tw)/2;
+D=0.0254;
+hf=2657.8-374.6;//latent heat using steam tables
+rho1=60.3*16.018;//density of condensed steam
+rhov=0.391;//density of ateam at 10 psia
+mu1=3.24e-4;
+kt=0.675;
+L=0.305;
+Tsat=193;//in K
+delT=3.33;
+g=9.806;
+//assuming laminar film
+Nu=1.13*(((rho1^2)*g*hf*1000*(L^3)/(mu1*kt*(delT)))^(0.25));
+h=Nu*(kt/L);
+A=%pi*D*L;
+q=h*A*(Tsat-Tw);
+m=q/hf;
+kteng=0.390;//
+Leng=1;//in english units
+heng=Nu*(kteng/Leng);
+Deng=1/12;
+Aeng=%pi*Deng*Leng;
+mprintf("avg HT coefficient= %f W/m2 K in si units",h)
+mprintf("avg HT coefficient= %f btu/h ft2 F in english units",heng)