summaryrefslogtreecommitdiff
path: root/3733/CH17/EX17.13/EX17_13.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3733/CH17/EX17.13/EX17_13.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3733/CH17/EX17.13/EX17_13.sce')
-rw-r--r--3733/CH17/EX17.13/EX17_13.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/3733/CH17/EX17.13/EX17_13.sce b/3733/CH17/EX17.13/EX17_13.sce
new file mode 100644
index 000000000..dbeccd413
--- /dev/null
+++ b/3733/CH17/EX17.13/EX17_13.sce
@@ -0,0 +1,27 @@
+// Example 17_13
+clc;funcprot(0);
+//Given data
+m_s=5000;// kg
+T_s=50;// °C
+d_i=15;// mm
+d_o=18;// mm
+Theta_o=20;// °C
+T_r=10;//°C
+Theta_i=Theta_o+T_r;// °C
+L=3;// Length in m
+v=2;// Velocity in m/s
+h_o=5000;// J/m^2-s-°C
+h_i=3200;// J/m^2-s-°C
+f_i=0.0002;// m^2-°C/W
+K=80;// W/m-°C
+
+//Calculation
+// At 50°C saturated temperature
+h_fg=2383;// kJ/kg
+Q=(m_s*h_fg)/3600;//kW
+LMTD=(Theta_i-Theta_o)/(log(Theta_i/Theta_o));// °C
+U_o=1/((((1/h_i)+f_i)*(d_o/d_i))+(1/h_o)+(((d_o-d_i)/(d_o+d_i))*(d_o/(1000*K))));// W/m^2°C
+A=((Q*10^3)/(U_o*LMTD));// m^2
+n=(A/(%pi*(d_o/1000)*L));
+printf('\nThe number of tubes required=%0.0f',n);
+// The answer vary due to round off error