diff options
Diffstat (limited to '587/CH2/EX2.6/example2_6.sce')
-rwxr-xr-x | 587/CH2/EX2.6/example2_6.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/587/CH2/EX2.6/example2_6.sce b/587/CH2/EX2.6/example2_6.sce new file mode 100755 index 000000000..fcf80bc41 --- /dev/null +++ b/587/CH2/EX2.6/example2_6.sce @@ -0,0 +1,14 @@ +clear;
+clc;
+
+//Example2.6[Heat Conduction in a Short Cylinder]
+//Given:-
+//Radius R and height h of the small cylinder
+T=300;//Temperature of cylinder[degree Celcius]
+T_ambient=20;//Temperature of ambient air[degree Celcius]
+//Variation is thermal conductivity is negligible
+//The cylinder is cooled unifromly from the top and bottom surfaces in the z-direction as well as the lateral surface in the radial r-direction.Also Temperature at any point in the ball changes with time during cooling. Therefore this is a two dimensional transient heat conduction problem i.e. T=T(r,z,t)
+disp("The differential equation governing the variation of temperature in the billet is ")
+disp("((1/r)(d/dr)(k*r(dT/dr)))+((d/dz)(k(dT/dz)))=rho*c(dT/dt)")
+disp("In case of constant thermal conductivity it reduces to")
+disp("((1/r)(d/dr)(r(dT/dr)))+(d^2)T/(dz^2)=(1/a)(dT/dt)")
\ No newline at end of file |