diff options
Diffstat (limited to '686/CH3/EX3.1')
-rwxr-xr-x | 686/CH3/EX3.1/Ex3_1.sci | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/686/CH3/EX3.1/Ex3_1.sci b/686/CH3/EX3.1/Ex3_1.sci new file mode 100755 index 000000000..01c060bcb --- /dev/null +++ b/686/CH3/EX3.1/Ex3_1.sci @@ -0,0 +1,21 @@ +clc();
+clear;
+
+// To calculate the length of the well
+
+d = 0.06/12; // diameter of the thermometer in ft
+h = 18.5; // heat teansfer coefficient in Btu/hr-ft^2-F
+k = 32; // Thermal conductivity in Btu/hr-ft^2-F
+s = 0.036/12; // thickness of wall in ft
+m = sqrt(h/(k*s)); // parameter
+
+// Error is less than 0.05% of the dfference between the gas temperature and the tube well temperature. Hence a=m*l
+
+a = 6; // a=m*l
+l = a/m; // Length of well in ft
+printf("The length of well is %.2f ft",l)
+
+
+
+
+
|