summaryrefslogtreecommitdiff
path: root/1752/CH4/EX4.9/exa_4_9.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1752/CH4/EX4.9/exa_4_9.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1752/CH4/EX4.9/exa_4_9.sce')
-rwxr-xr-x1752/CH4/EX4.9/exa_4_9.sce26
1 files changed, 26 insertions, 0 deletions
diff --git a/1752/CH4/EX4.9/exa_4_9.sce b/1752/CH4/EX4.9/exa_4_9.sce
new file mode 100755
index 000000000..516bbffcc
--- /dev/null
+++ b/1752/CH4/EX4.9/exa_4_9.sce
@@ -0,0 +1,26 @@
+//Exa 4.9
+clc;
+clear;
+close;
+//given data
+rho=8500;// in kg/m^3
+C=400;// J/kgK
+toh=1;// in sec
+h= 400;// in W/m^2 degree C
+t=198;// in degree C
+t_i=25;// in degree C
+t_infinite=200;// in degree C
+
+// Part (1)
+// toh =rho*V*C/(h*A) = rho*C*l_s/h
+l_s= toh*h/(rho*C);
+// l_s = V/A = r/3
+r=3*l_s;// in m
+r=r*10^3;// in mm
+d=2*r;// in m
+disp(d,"Junction diameter needed for the thermocouple in mili miter");
+
+// Part(ii)
+// toh= -rho*V*C/(h*A)*log((t-t_infinite)/(t_i-t_infinite))
+toh = -toh*log((t-t_infinite)/(t_i-t_infinite));
+disp(toh,"Time required for the thermocouple junction to reach 198 degree C in seconds");