summaryrefslogtreecommitdiff
path: root/617/CH4/EX4.9
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /617/CH4/EX4.9
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 '617/CH4/EX4.9')
-rwxr-xr-x617/CH4/EX4.9/Example4_9.sci25
1 files changed, 25 insertions, 0 deletions
diff --git a/617/CH4/EX4.9/Example4_9.sci b/617/CH4/EX4.9/Example4_9.sci
new file mode 100755
index 000000000..8456fd2f8
--- /dev/null
+++ b/617/CH4/EX4.9/Example4_9.sci
@@ -0,0 +1,25 @@
+clc();
+clear;
+
+// to compute the temperatures at different points
+
+a=0.53; // thermal diffusivity in ft^2/hr
+M=4; // the value of 4 is selected for M
+x=6/12; // thickness of wall in ft
+delx=2/12;
+delr=delx^2/(a*M); // at time interval the heat transfeered will change the temperature of sink from tb2 to tb2o
+printf("the time interval is to be of %.3f hr \n",delr);
+
+// the temperature is constant in the whole wall initiallt 100 degF and afterwards it changes to 1000 degF.
+// we know qo=Z*delx*dely*rho*Cp(tb2'-tb2)/delr So on solving equations we get tb2'=(tb1+tb3+ta2+tc2)/4
+// Using above formula we can calculate the different temperatures as given below in degF
+
+ta=[100 550 775 888 944];
+tb=[100 550 775 888 944];
+tc=[100 550 775 888 944];
+td=[100 550 775 888 944];
+printf(" the temperatures at different positions 0.052 hr after, are as follows \n");
+printf(" the temperature at point a is %d degF \n",ta(5));
+printf(" the temperature at point a is %d degF \n",tb(5));
+printf(" the temperature at point a is %d degF \n",tc(5));
+printf(" the temperature at point a is %d degF \n",td(5)); \ No newline at end of file