summaryrefslogtreecommitdiff
path: root/1073/CH3/EX3.43
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1073/CH3/EX3.43
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 '1073/CH3/EX3.43')
-rwxr-xr-x1073/CH3/EX3.43/3_43.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/1073/CH3/EX3.43/3_43.sce b/1073/CH3/EX3.43/3_43.sce
new file mode 100755
index 000000000..f28a6d143
--- /dev/null
+++ b/1073/CH3/EX3.43/3_43.sce
@@ -0,0 +1,13 @@
+clc;
+clear;
+//Example 3.4
+lambda=2257 //[kJ/kg]
+lambda=lambda*1000 //in [J/kg]
+rho_l=957.9 //rho*l[kg/m^3]
+rho_v=0.5955 //[kg/m^3]
+sigma=5.89*10^-2 //[N/m]
+g=9.81 //[m/s^2]
+//Peak heat flux is given by
+Q_by_A_max=(%pi/24)*(lambda*rho_v^0.5*(sigma*g*(rho_l-rho_v))^(1/4)) //W/m^2
+Q_by_A_max=Q_by_A_max/(10^6) //MW/(sq m)
+printf("\n Peak heat flux is %f MW/sq m",Q_by_A_max);