summaryrefslogtreecommitdiff
path: root/965/CH4/EX4.6/6.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.6/6.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.6/6.sci')
-rw-r--r--965/CH4/EX4.6/6.sci17
1 files changed, 17 insertions, 0 deletions
diff --git a/965/CH4/EX4.6/6.sci b/965/CH4/EX4.6/6.sci
new file mode 100644
index 000000000..6bc58b726
--- /dev/null
+++ b/965/CH4/EX4.6/6.sci
@@ -0,0 +1,17 @@
+clc;
+clear all;
+disp("Initial cooling rate ")
+R=25/1000;//m radius of steel ball
+rho=7800;//kg/m^3
+c=2;//kJ/kg.K
+ti=900;// degree C
+ta=30;// degree C
+tau=1*60;//seconds
+h=30;// W/m^2.C
+
+//(t-ta)/(ti-ta)=exp(-h*As*tau/(rho*V*cp))
+t=ta+(ti-ta)*exp(-h*3*tau/(rho*R*c*1000));
+disp("degree C", t,"temperature t =")
+R=ti-t;
+disp("C/min",ceil(R),"Rate of cooling =")
+