diff options
Diffstat (limited to '534/CH3')
| -rw-r--r-- | 534/CH3/EX3.1/3_1_Human_Heat_Loss_part2.sce | 44 | ||||
| -rw-r--r-- | 534/CH3/EX3.10/3_10_Finned_Cylinder.sce | 29 | ||||
| -rw-r--r-- | 534/CH3/EX3.11/3_11_Fuel_cell.sce | 45 | ||||
| -rw-r--r-- | 534/CH3/EX3.12/3_12_Human_Heat_Loss_part3.sce | 37 | ||||
| -rw-r--r-- | 534/CH3/EX3.2/3_2_Chip_Operating_Temperature.sce | 21 | ||||
| -rw-r--r-- | 534/CH3/EX3.3/3_3_Carbon_Nanotube.sce | 42 | ||||
| -rw-r--r-- | 534/CH3/EX3.4/3_4_Conical_Section.sce | 21 | ||||
| -rw-r--r-- | 534/CH3/EX3.5/3_5_Critical_Thickness.sce | 22 | ||||
| -rw-r--r-- | 534/CH3/EX3.6/3_6_Spherical_Composite.sce | 30 | ||||
| -rw-r--r-- | 534/CH3/EX3.7/3_7_Composite_Plane_Wall.sce | 24 | ||||
| -rw-r--r-- | 534/CH3/EX3.8/3_8_Theoretical_Problem.sce | 8 | ||||
| -rw-r--r-- | 534/CH3/EX3.9/3_9_Rod_Fin.sce | 40 |
12 files changed, 363 insertions, 0 deletions
diff --git a/534/CH3/EX3.1/3_1_Human_Heat_Loss_part2.sce b/534/CH3/EX3.1/3_1_Human_Heat_Loss_part2.sce new file mode 100644 index 000000000..7043393fc --- /dev/null +++ b/534/CH3/EX3.1/3_1_Human_Heat_Loss_part2.sce @@ -0,0 +1,44 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.1 Page 104 \n') //Example 3.1
+// Find Skin Temperature & Aerogel Insulation Thickness
+
+A=1.8; // [m^2] Area for Heat transfer i.e. both surfaces
+Ti = 35+273; //[K] - Inside Surface Temperature of Body
+Tsurr = 10+273; //[K] - Temperature of surrounding
+Tf = 283; //[K] - Temperature of Fluid Flow
+e=.95; // Emissivity of Surface
+Lst=.003; //[m] - Thickness of Skin
+kst=.3; // [W/m.K] Effective Thermal Conductivity of Body
+kins = .014; // [W/m.K] Effective Thermal Conductivity of Aerogel Insulation
+hr = 5.9; //[W/m^2.k] - Natural Thermal Convectivity from body to air
+stfncnstt=5.67*10^(-8); // [W/m^2.K^4] - Stefan Boltzmann Constant
+q = 100; //[W] Given Heat rate
+
+//Using Conducion Basic Eq 3.19
+Rtot = (Ti-Tsurr)/q;
+//Also
+//Rtot=Lst/(kst*A) + Lins/(kins*A)+(h*A + hr*A)^-1
+//Rtot = 1/A*(Lst/kst + Lins/kins +(1/(h+hr)))
+
+//Thus
+//For Air,
+h=2; //[W/m^2.k] - Natural Thermal Convectivity from body to air
+Lins1 = kins * (A*Rtot - Lst/kst - 1/(h+hr));
+
+//For Water,
+h=200; //[W/m^2.k] - Natural Thermal Convectivity from body to air
+Lins2 = kins * (A*Rtot - Lst/kst - 1/(h+hr));
+
+Tsa=305; //[K] Body Temperature Assumed
+
+//Temperature of Skin is same in both cases as Heat Rate is same
+//q=(kst*A*(Ti-Ts))/Lst
+Ts = Ti - q*Lst/(kst*A);
+
+//Also from eqn of effective resistance Rtot F
+printf("\n\n (I) In presence of Air, Insulation Thickness = %.1f mm",Lins1*1000)
+
+printf("\n (II) In presence of Water, Insulation Thickness = %.1f mm",Lins2*1000);
+printf("\n\n Temperature of Skin = %.2f degC",Ts-273);
+//END
\ No newline at end of file diff --git a/534/CH3/EX3.10/3_10_Finned_Cylinder.sce b/534/CH3/EX3.10/3_10_Finned_Cylinder.sce new file mode 100644 index 000000000..772e9dd20 --- /dev/null +++ b/534/CH3/EX3.10/3_10_Finned_Cylinder.sce @@ -0,0 +1,29 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.10 Page 156 \n'); //Example 3.10
+// Study of motorcycle finned cylinder
+
+H = .15; //[m] height
+k = 186; //[W/m.K] alumunium at 400K
+h = 50; //[W/m^2.K] Heat convection coefficient
+Tsurr = 300; //[K] Temperature of surrounding air
+To = 500; //[K] Temp inside
+
+//Dimensions of Fin
+N = 5;
+t = .006; //[m] Thickness
+L = .020; //[m] Length
+r2c = .048; //[m]
+r1 = .025; //[m]
+
+Af = 2*%pi*(r2c^2-r1^2);
+At = N*Af + 2*%pi*r1*(H-N*t);
+
+//Using fig 3.19
+nf = .95;
+
+qt = h*At*[1-N*Af*(1-nf)/At]*(To-Tsurr);
+qwo = h*(2*%pi*r1*H)*(To-Tsurr);
+
+printf("\n\n Heat Transfer Rate with the fins =%i W \n Heat Transfer Rate without the fins =%i W \n Thus Increase in Heat transfer rate of %i W is observed with fins",qt,qwo,qt-qwo);
+//END
\ No newline at end of file diff --git a/534/CH3/EX3.11/3_11_Fuel_cell.sce b/534/CH3/EX3.11/3_11_Fuel_cell.sce new file mode 100644 index 000000000..e98810a0b --- /dev/null +++ b/534/CH3/EX3.11/3_11_Fuel_cell.sce @@ -0,0 +1,45 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.11 Page 158 \n'); //Example 3.11
+// Study of Fuel-cell fan system
+
+Wc =.05; //[m] width
+H = .026; //[m] height
+tc = .006; //[m] thickness of cell
+V = 9.4; //[m/sec] vel of cooling air
+P = 9; //[W] Power generated
+C = 1000; //[W/(m^3/s)] Ratio of fan power consumption to vol flow rate
+k = 200; //[W/m.K] alumunium
+Tsurr = 25+273.15; //[K] Temperature of surrounding air
+Tc = 56.4+273.15; //[K] Temp of fuel cell
+Rtcy = 10^-3; //[K/W] Contact thermal resistance
+tb = .002; //[m] thickness of base of heat sink
+Lc = .05; //[m] length of fuel cell
+//Dimensions of Fin
+tf = .001; //[m] Thickness
+Lf = .008; //[m] Length
+
+Vf = V*[Wc*(H-tc)]; //[m^3/sec] Volumetric flow rate
+Pnet = P - C*Vf;
+
+
+P = 2*(Lc+tf);
+Ac = Lc*tf;
+N = 22;
+a=(2*Wc - N*tf)/N;
+h = 19.1; ///[W/m^2.K]
+q = 11.25; //[W]
+m = (h*P/(k*Ac))^.5;
+Rtf = (h*P*k*Ac)^(-.5)/ tanh(m*Lf);
+Rtc = Rtcy/(2*Lc*Wc);
+Rtbase = tb/(2*k*Lc*Wc);
+Rtb = 1/[h*(2*Wc-N*tf)*Lc];
+Rtfn = Rtf/N;
+Requiv = [Rtb^-1 + Rtfn^-1]^-1;
+Rtot = Rtc + Rtbase + Requiv;
+
+Tc2 = Tsurr +q*(Rtot);
+
+printf("\n\n (a) Power consumed by fan is more than the generated power of fuel cell, and hence system cannot produce net power = %.2f W \n\n (b) Actual fuel cell Temp is close enough to %.1f degC for reducing the fan power consumption by half ie Pnet = %.1f W, we require 22 fins, 11 on top and 11 on bottom.",Pnet, Tc2-273, C*Vf/2);
+
+//END
\ No newline at end of file diff --git a/534/CH3/EX3.12/3_12_Human_Heat_Loss_part3.sce b/534/CH3/EX3.12/3_12_Human_Heat_Loss_part3.sce new file mode 100644 index 000000000..29515666e --- /dev/null +++ b/534/CH3/EX3.12/3_12_Human_Heat_Loss_part3.sce @@ -0,0 +1,37 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.12 Page 163 \n'); //Example 3.12
+// Heat loss from body & temp at inner surface
+
+hair = 2; //[W/m^2.K] Heat convection coefficient air
+hwater = 200; //[W/m^2.K] Heat convection coefficient water
+hr = 5.9 ; //[W/m^2.K] Heat radiation coefficient
+Tsurr = 297; //[K] Temperature of surrounding air
+Tc = 37+273; //[K] Temp inside
+e = .95;
+A = 1.8 ; //[m^2] area
+//Prop of blood
+w = .0005 ; //[s^-1] perfusion rate
+pb = 1000; //[kg/m^3] blood density
+cb = 3600; //[J/kg] specific heat
+//Dimensions & properties of muscle & skin/fat
+Lm = .03 ; //[m]
+Lsf = .003 ; //[m]
+km = .5 ; //[W/m.K]
+ksf = .3; //[W/m.K]
+q = 700; //[W/m^3] Metabolic heat generation rate
+
+Rtotair = (Lsf/ksf + 1/(hair + hr))/A;
+Rtotwater = (Lsf/ksf + 1/(hwater))/A;
+
+m = (w*pb*cb/km)^.5;
+Theta = -q/(w*pb*cb);
+
+Tiair = (Tsurr*sinh(m*Lm) + km*A*m*Rtotair*[Theta + (Tc + q/(w*pb*cb))*cosh(m*Lm)])/(sinh(m*Lm)+km*A*m*Rtotair*cosh(m*Lm));
+qair = (Tiair - Tsurr)/Rtotair;
+
+Tiwater = (Tsurr*sinh(m*Lm) + km*A*m*Rtotwater*[Theta + (Tc + q/(w*pb*cb))*cosh(m*Lm)])/(sinh(m*Lm)+km*A*m*Rtotwater*cosh(m*Lm));
+qwater = (Tiwater - Tsurr)/Rtotwater;
+
+printf("\n\n For Air \n Temp excess Ti = %.1f degC and Heat loss rate =%.1f W \n\n For Water \n Temp excess Ti = %.1f degC and Heat loss rate =%.1f W ",Tiair-273,qair,Tiwater-273,qwater);
+//END
\ No newline at end of file diff --git a/534/CH3/EX3.2/3_2_Chip_Operating_Temperature.sce b/534/CH3/EX3.2/3_2_Chip_Operating_Temperature.sce new file mode 100644 index 000000000..efa8e4165 --- /dev/null +++ b/534/CH3/EX3.2/3_2_Chip_Operating_Temperature.sce @@ -0,0 +1,21 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.2 Page 107 \n'); //Example 3.2
+// Chip Operating Temperature
+
+Tf = 25+273; //[K] - Temperature of Fluid Flow
+
+L=.008; //[m] - Thickness of Aluminium
+k=239; // [W/m.K] Effective Thermal Conductivity of Aluminium
+Rc=.9*10^-4; //[K.m^2/W] Maximum permeasible Resistane of Epoxy Joint
+q=10^4; //[W/m^2] Heat dissipated by Chip
+h=100; //[W/m^2.k] - Thermal Convectivity from chip to air
+
+//Temperature of Chip
+//q=(Tc-Tf)/(1/h)+(Tc-Tf)/(Rc+(L/k)+(1/h))
+
+Tc = Tf + q*(h+1/(Rc+(L/k)+(1/h)))^-1;
+
+printf("\n\n Temperature of Chip = %.2f degC",Tc-273);
+printf("\n Chip will Work well below its maximum allowable Temperature ie 85 degC")
+//END
\ No newline at end of file diff --git a/534/CH3/EX3.3/3_3_Carbon_Nanotube.sce b/534/CH3/EX3.3/3_3_Carbon_Nanotube.sce new file mode 100644 index 000000000..5777c56d4 --- /dev/null +++ b/534/CH3/EX3.3/3_3_Carbon_Nanotube.sce @@ -0,0 +1,42 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.3 Page 109 \n'); //Example 3.3
+// Find Thermal conductivity of Carbon Nanotube
+
+D = 14 * 10^-9; // [m]Dia of Nanotube
+s = 5*10^-6; // [m]Distance between the islands
+Ts = 308.4; //[K] Temp of sensing island
+Tsurr = 300; //[K] Temp of surrounding
+q = 11.3*10^-6; //[W] Total Rate of Heat flow
+
+//Dimension of platinum line
+wpt = 10^-6; //[m]
+tpt = 0.2*10^-6; //[m]
+Lpt = 250*10^-6; //[m]
+//Dimension of Silicon nitride line
+wsn = 3*10^-6; //[m]
+tsn = 0.5*10^-6; //[m]
+Lsn = 250*10^-6; //[m]
+//From Table A.1 Platinum Temp Assumed = 325K
+kpt = 71.6; //[W/m.K]
+//From Table A.2, Silicon Nitride Temp Assumed = 325K
+ksn = 15.5; //[W/m.K]
+
+Apt = wpt*tpt; //Cross sectional area of platinum support beam
+Asn = wsn*tsn-Apt; //Cross sectional area of Silicon Nitride support beam
+Acn = %pi*D^2/4; //Cross sectional Area of Carbon nanotube
+
+Rtsupp = [kpt*Apt/Lpt + ksn*Asn/Lsn]^-1; //[K/W] Thermal Resistance of each support
+
+qs = 2*(Ts-Tsurr)/Rtsupp; //[W] Heat loss through sensing island support
+qh = q - qs; //[W] Heat loss through heating island support
+
+Th = Tsurr + qh*Rtsupp/2; //[K] Temp of Heating island
+
+//For portion Through Carbon Nanotube
+//qs = (Th-Ts)/(s/(kcn*Acn));
+
+kcn = qs*s/(Acn*(Th-Ts));
+
+printf("\n\n Thermal Conductivity of Carbon nanotube = %.2f W/m.K",kcn);
+//END
\ No newline at end of file diff --git a/534/CH3/EX3.4/3_4_Conical_Section.sce b/534/CH3/EX3.4/3_4_Conical_Section.sce new file mode 100644 index 000000000..6a5ab42a3 --- /dev/null +++ b/534/CH3/EX3.4/3_4_Conical_Section.sce @@ -0,0 +1,21 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.4 Page 113 \n'); //Example 3.4
+// Temperature Distribution And Heat rate
+
+a = 0.25;
+x1 = .05; //[m] Distance of smaller end
+x2 = .25; //[m] Distance of larger end
+T1 = 400; //[K] Temperature of smaller end
+T2 = 600; //[K] Temperature of larger end
+k = 3.46; //[W/m.K] From Table A.2, Pyroceram at Temp 285K
+
+x = linspace(0.05,.25,100);
+T=(T1 + (T1-T2)*[(x^-1 - x1^-1)/(x1^-1 - x2^-1)]);
+clf();
+plot(x,T);
+xtitle(" Temp vs distance x", "x (m)", "T (K)");
+
+qx = %pi*a^2*k*(T1-T2)/(4*[1/x1 - 1/x2]); //[W]
+printf("\n\n Heat Transfer rate = %.2f W",qx);
+//END
\ No newline at end of file diff --git a/534/CH3/EX3.5/3_5_Critical_Thickness.sce b/534/CH3/EX3.5/3_5_Critical_Thickness.sce new file mode 100644 index 000000000..6010ca20d --- /dev/null +++ b/534/CH3/EX3.5/3_5_Critical_Thickness.sce @@ -0,0 +1,22 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.5 Page 119 \n'); //Example 3.5
+// Critical Thickness
+
+k = .055; //[W/m.K] From Table A.3, Cellular glass at Temp 285K
+h = 5; //[W/m^2.K]
+ri = 5*10^-3; //[m] radius of tube
+
+rct = k/h; // [m] Critical Thickness of Insulation for maximum Heat loss or minimum resistance
+
+x = linspace(0,.07,100);
+ycond=(2.30*log10((x+ri)/ri)/(2*%pi*k));
+yconv=(2*%pi*(x+ri)*h)^-1;
+ytot=yconv+ycond;
+clf();
+plot(x,ycond,x,yconv,x,ytot);
+xtitle("Resistance vs Radii", "r-ri (m)", "R (m.K/W)");
+legend ("Rcond", "Rconv", "Rtotal");
+
+printf("\n\n Critical Radius is = %.3f m \n Heat transfer will increase with the addition of insulation up to a thickness of %.3f m",rct,rct-ri);
+//END
\ No newline at end of file diff --git a/534/CH3/EX3.6/3_6_Spherical_Composite.sce b/534/CH3/EX3.6/3_6_Spherical_Composite.sce new file mode 100644 index 000000000..8cc30f96a --- /dev/null +++ b/534/CH3/EX3.6/3_6_Spherical_Composite.sce @@ -0,0 +1,30 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.6 Page 122 \n'); //Example 3.6
+// Heat conduction through Spherical Container
+
+k = .0017; //[W/m.K] From Table A.3, Silica Powder at Temp 300K
+h = 5; //[W/m^2.K]
+r1 = 25*10^-2; //[m] Radius of sphere
+r2 = .275; //[m] Radius including Insulation thickness
+
+//Liquid Nitrogen Properties
+T = 77; //[K] Temperature
+rho = 804; //[kg/m^3] Density
+hfg = 2*10^5; //[J/kg] latent heat of vaporisation
+
+//Air Properties
+Tsurr = 300; //[K] Temperature
+h = 20 ;//[W/m^2.K] convection coefficient
+
+Rcond = (1/r1-1/r2)/(4*%pi*k); //Using Eq 3.36
+Rconv = 1/(h*4*%pi*r2^2);
+q = (Tsurr-T)/(Rcond+Rconv);
+
+printf("\n\n (a)Rate of Heat transfer to Liquid Nitrogen %.2f W",q);
+
+//Using Energy Balance q - m*hfg = 0
+m=q/hfg; //[kg/s] mass of nirtogen lost per second
+mc = m/rho*3600*24*10^3;
+printf("\n\n (b)Mass rate of nitrogen boil off %.2f Litres/day",mc);
+//END
\ No newline at end of file diff --git a/534/CH3/EX3.7/3_7_Composite_Plane_Wall.sce b/534/CH3/EX3.7/3_7_Composite_Plane_Wall.sce new file mode 100644 index 000000000..158bf8276 --- /dev/null +++ b/534/CH3/EX3.7/3_7_Composite_Plane_Wall.sce @@ -0,0 +1,24 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.7 Page 129 \n'); //Example 3.7
+// Composite Plane wall
+
+Tsurr = 30+273; //[K] Temperature of surrounding Water
+h = 1000; //[W/m^2.K] Heat Convection Coeff of Water
+kb = 150; //[W/m.K] Material B
+Lb = .02; //[m] Thickness Material B
+ka = 75; //[W/m.K] Material A
+La = .05; //[m] Thickness Material A
+qa = 1.5*10^6; //[W/m^3] Heat generation at wall A
+qb = 0; //[W/m^3] Heat generation at wall B
+
+T2 = Tsurr + qa*La/h;
+
+Rcondb = Lb/kb;
+Rconv = 1/h;
+T1 = Tsurr +(Rcondb + Rconv)*(qa*La);
+//From Eqn 3.43
+T0 = qa*La^2/(2*ka) + T1;
+
+printf("\n\n (a) Inner Temperature of Composite To = %i degC \n (b) Outer Temperature of the Composite T2 = %i degC",T0-273,T2-273);
+//END
\ No newline at end of file diff --git a/534/CH3/EX3.8/3_8_Theoretical_Problem.sce b/534/CH3/EX3.8/3_8_Theoretical_Problem.sce new file mode 100644 index 000000000..53252c834 --- /dev/null +++ b/534/CH3/EX3.8/3_8_Theoretical_Problem.sce @@ -0,0 +1,8 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.8 Page 134 \n')// Example 3.8
+//Theoretical Problem
+
+printf('\n The given example is theoretical and does not involve any numerical computation')
+
+//End
diff --git a/534/CH3/EX3.9/3_9_Rod_Fin.sce b/534/CH3/EX3.9/3_9_Rod_Fin.sce new file mode 100644 index 000000000..45d279305 --- /dev/null +++ b/534/CH3/EX3.9/3_9_Rod_Fin.sce @@ -0,0 +1,40 @@ +clear;
+clc;
+printf('FUNDAMENTALS OF HEAT AND MASS TRANSFER \n Incropera / Dewitt / Bergman / Lavine \n EXAMPLE 3.9 Page 145 \n'); //Example 3.9
+// Heat conduction through Rod
+
+kc = 398; //[W/m.K] From Table A.1, Copper at Temp 335K
+kal = 180; //[W/m.K] From Table A.1, Aluminium at Temp 335K
+kst = 14; //[W/m.K] From Table A.1, Stainless Steel at Temp 335K
+h = 100; //[W/m^2.K] Heat Convection Coeff of Air
+Tsurr = 25+273; //[K] Temperature of surrounding Air
+D = 5*10^-3; //[m] Dia of rod
+To = 100+273.15; //[K] Temp of opposite end of rod
+
+//For infintely long fin m = h*P/(k*A)
+mc = (4*h/(kc*D))^.5;
+mal = (4*h/(kal*D))^.5;
+mst = (4*h/(kst*D))^.5;
+x = linspace(0,.300,100);
+Tc = Tsurr + (To - Tsurr)*2.73^(-mc*x) - 273;
+Tal = Tsurr + (To - Tsurr)*2.73^(-mal*x) -273;
+Tst = Tsurr + (To - Tsurr)*2.73^(-mst*x) -273;
+clf();
+plot(x,Tc,x,Tal,x,Tst);
+xtitle("Temp vs Distance", "x (m)", "T (degC)");
+legend ("Cu", "2024 Al", "316 SS");
+
+//Using eqn 3.80
+qfc = (h*%pi*D*kc*%pi/4*D^2)^.5*(To-Tsurr);
+qfal = (h*%pi*D*kal*%pi/4*D^2)^.5*(To-Tsurr);
+qfst = (h*%pi*D*kst*%pi/4*D^2)^.5*(To-Tsurr);
+
+printf("\n\n (a) Heat rate \n For Copper = %.2f W \n For Aluminium = %.2f W \n For Stainless steel = %.2f W",qfc,qfal,qfst);
+
+//Using eqn 3.76 for satisfactory approx
+Linfc = 2.65/mc;
+Linfal = 2.65/mal;
+Linfst = 2.65/mst;
+
+printf("\n\n (a) Rods may be assumed to be infinite Long if it is greater than equal to \n For Copper = %.2f m \n For Aluminium = %.2f m \n For Stainless steel = %.2f m",Linfc,Linfal,Linfst);
+//END
\ No newline at end of file |