summaryrefslogtreecommitdiff
path: root/965/CH4/EX4.9/9.sci
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /965/CH4/EX4.9/9.sci
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 '965/CH4/EX4.9/9.sci')
-rw-r--r--965/CH4/EX4.9/9.sci31
1 files changed, 31 insertions, 0 deletions
diff --git a/965/CH4/EX4.9/9.sci b/965/CH4/EX4.9/9.sci
new file mode 100644
index 000000000..c177318d8
--- /dev/null
+++ b/965/CH4/EX4.9/9.sci
@@ -0,0 +1,31 @@
+clc;
+clear all;
+disp("time for cooling")
+D=10/1000;//m Diameter of plastic sphere
+ti=75;// degree C
+t=35;// degree C
+ta=23;// degree C
+V=10;// m/s
+//for copper
+kcu=400;// W/m.K
+rhocu=8933;// kg/m^3
+ccu=380;// J/kg.C
+//for air at 23 degree C
+mu=18.16*10^(-6);// N.s/m^2
+v=15.36*10^(-6);//m^2/s
+ka=0.0258;// W/m.K
+Pr=0.709
+mus=19.78*10^(-6);// N.s/m^2 at 35 degree C
+
+Re=V*D/v
+l=Re^0.5;
+m=Re^(2/3);
+n=Pr^0.4;
+p=(mu/mus)^0.25;
+Nu=2+(0.4*l+0.06*m)*n*p
+h=ka*Nu/D;
+X=(t-ta)/(ti-ta);
+Y=-h*6/(rhocu*ccu*D);
+tau=(log (X))/Y;// sec
+disp("s",tau,"time taken to cool tau =")
+