summaryrefslogtreecommitdiff
path: root/587/CH2/EX2.13/example2_13.sce
diff options
context:
space:
mode:
Diffstat (limited to '587/CH2/EX2.13/example2_13.sce')
-rwxr-xr-x587/CH2/EX2.13/example2_13.sce20
1 files changed, 20 insertions, 0 deletions
diff --git a/587/CH2/EX2.13/example2_13.sce b/587/CH2/EX2.13/example2_13.sce
new file mode 100755
index 000000000..8328d0729
--- /dev/null
+++ b/587/CH2/EX2.13/example2_13.sce
@@ -0,0 +1,20 @@
+clear;
+clc;
+
+//Example2.13[Heat Conduction in the Base Plate of an Iron]
+//Given:-
+k=15;//[W/m.degree Celcius]
+A=300*10^(-4);//Base Area[m^2]
+L=0.005;//Thickness[m]
+T_surr=20;//Temp of surrounding[degree Celcius]
+h=80;//Convection het transfer coefficient[W/m^2.degree Celcius]
+Q=1200;//[W]
+//Solution:-
+q=Q/A;//[W/m^2]
+disp("W/m^2",q,"Uniform Heat Flux to whicj inner surface of the base plate is subjected")
+//Integration Constants
+C1=-q/k;
+C2=T_surr+(q/h)+(q*L/k);
+T_0=T_surr+q*((L/k)+(1/h));//[degree Celcius]
+T_L=T_surr+q*(1/h);//[degree Celcius]
+disp("respectively","degree Celcius",T_L,"and","degree Celcius",round(T_0),"The temperatures at the inner and outer surfaces of the plate i.e. at x=0 and x=L are") \ No newline at end of file