1 files changed, 16 insertions, 0 deletions
diff --git a/1100/CH19/EX19.6/19_6.sce b/1100/CH19/EX19.6/19_6.sce
new file mode 100755
index 000000000..e66edeac3
--- /dev/null
+++ b/1100/CH19/EX19.6/19_6.sce
@@ -0,0 +1,16 @@
+clc
+//initialisation of variables
+Tw= 200 //F
+Ta= 600 //F
+cpb= 0.25 // Btu/lb F
+tf= 0.68
+uf= 0.000017 //lbm/sec ft
+D= 0.902 //in
+V= 100 //fps
+d= 0.0375 //lb/cu ft
+//CALCULATIONS
+Nre= (D/12)*V*d/uf
+Npr= 0.68
+h= cpb*V*3600*d*0.023/(Nre^0.2*Npr^(2/3))
+//RESULTS
+printf ('Film coefficient = %.1f Btu/sq ft hr F',h)