initial commit / add all books

1 files changed, 20 insertions, 0 deletions

diff --git a/587/CH1/EX1.8/example1_8.sce b/587/CH1/EX1.8/example1_8.sce
new file mode 100755
index 000000000..56161439a
--- /dev/null
+++ b/587/CH1/EX1.8/example1_8.sce
@@ -0,0 +1,20 @@
+clear;

+clc;

+

+//Example1.8[Measuring Convection Heat Transfer coefficient]

+//Given:-

+T_ambient=15;//Temperature of room[degree Celcius]

+T_surface=152;//Temperature of surface of wire[degree Celcius]

+L=2;//Length of wire[m]

+D=0.003;//Diameter of wire[m]

+V=60;//Voltage drop across the current wire[Volts]

+I=1.5;//Current flowing in the wire[amp]

+//Solution:-

+//When steady conditions are reached, the rate of heat loss from the wire equals the rate of heat generation in the wire as a result of resistance heating

+Q_=V*I;//[W]

+disp("W",Q_,"The rate of heat generated in the wire as a result of resistance heating is")

+As=%pi*D*L;//Surface Area of the wire[m^2]

+//Using Newton's Law of Cooling

+//and assuming all heat loss in wire to occur by convection

+h=Q_/(As*(T_surface-T_ambient));//[W/m^2.degree Celcius]

+disp("W/m^2.degree Celcius",h,"The convection Heat Transfer coefficient is" )