summaryrefslogtreecommitdiff
path: root/617/CH4/EX4.5
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.5
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.5')
-rwxr-xr-x617/CH4/EX4.5/Example4_5.sci12
1 files changed, 12 insertions, 0 deletions
diff --git a/617/CH4/EX4.5/Example4_5.sci b/617/CH4/EX4.5/Example4_5.sci
new file mode 100755
index 000000000..65a309602
--- /dev/null
+++ b/617/CH4/EX4.5/Example4_5.sci
@@ -0,0 +1,12 @@
+clc();
+clear;
+// To estimate the time lag of temperature (sine) wave
+t = 24; // Time period of tempearture wave in hr
+k = 0.6; // Thermal conductivity of wall in Btu/hr-ft-degF
+Cp = 0.2; // Specific heat capacity of wall in Btu/lb-degF
+y = 110; // specific gravity in lb/ft^3
+x = 8/12; // Distance from surface in ft
+a = k/(y*Cp); // Thermal diffusivity in ft^2/hr
+n=1/t; // frequency in /hr
+delr = x/(2*sqrt(a*%pi*n); // Time lag in hr
+printf("Time lag of the temperature at a point 8 in from surface is %.1f hr", delr;