summaryrefslogtreecommitdiff
path: root/1022
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:38:01 +0530
committerprashantsinalkar2017-10-10 12:38:01 +0530
commitf35ea80659b6a49d1bb2ce1d7d002583f3f40947 (patch)
treeeb72842d800ac1233e9d890e020eac5fd41b0b1b /1022
parent7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (diff)
downloadScilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.gz
Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.bz2
Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.zip
updated the code
Diffstat (limited to '1022')
-rwxr-xr-x1022/CH14/EX14.7/14_7.sce46
1 files changed, 24 insertions, 22 deletions
diff --git a/1022/CH14/EX14.7/14_7.sce b/1022/CH14/EX14.7/14_7.sce
index 9c7b98756..3619456b8 100755
--- a/1022/CH14/EX14.7/14_7.sce
+++ b/1022/CH14/EX14.7/14_7.sce
@@ -1,22 +1,24 @@
-clc
-//initialisation of variables
-P= 1 //atm
-T= 11 //C
-Csf= 0.006
-r= 1/3
-s= 1
-cl= 4.218 //J/gm K
-hfg= 2257 //J/gm
-Pr= 1.75
-ul= 283.1*10^-3 //gm/m s
-s= 57.78*10^-3 //N/m
-pl= 958*10^3 //gm/m^3
-pv= 598 //gm/m^3
-gc= 10^3 //gm m/N s^2
-g= 9.8 //m/s^2
-//CALCULATIONS
-p= pl-pv
-q= ((((cl*dt)/(hfg*Csf*Pr^s))^(1/r))*(ul*hfg))/(gc/(g*p))^(1/2)
-h= q/T
-//RESULTS
-printf ('Heat transfer coefficient for nucleate boiling= %.2e W/m^2 C',h)
+clc
+//initialisation of variables
+P= 1 //atm
+T= 11 //C
+Tsat = 170.03
+Csf= 0.006
+r= 1/3
+s= 1
+dt = Tsat - T
+cl= 4.218 //J/gm K
+hfg= 2257 //J/gm
+Pr= 1.75
+ul= 283.1*10^-3 //gm/m s
+s= 57.78*10^-3 //N/m
+pl= 958*10^3 //gm/m^3
+pv= 598 //gm/m^3
+gc= 10^3 //gm m/N s^2
+g= 9.8 //m/s^2
+//CALCULATIONS
+p= pl-pv
+q= ((((cl*dt)/(hfg*Csf*Pr^s))^(1/r))*(ul*hfg))/(gc/(g*p))^(1/2)
+h= q/T
+//RESULTS
+printf ('Heat transfer coefficient for nucleate boiling= %.2e W/m^2 C',h) \ No newline at end of file