From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 965/CH4/EX4.6/6.sci | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 965/CH4/EX4.6/6.sci

(limited to '965/CH4/EX4.6/6.sci')

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 =")
+
-- 
cgit