2 files changed, 26 insertions, 0 deletions
diff --git a/3878/CH22/EX22.2/Ex22_2.sce b/3878/CH22/EX22.2/Ex22_2.sce
new file mode 100644
index 000000000..72805a316
--- /dev/null
+++ b/3878/CH22/EX22.2/Ex22_2.sce
@@ -0,0 +1,10 @@
+clear
+// Variable declaration
+T_d=37// The dry bulb temperature of air in °C
+T_w=25.4// The cooling temperature of water in °C
+cf=0.80// Contact factor
+
+// Calculation
+T_df=T_d-(cf*(T_d-T_w))// The dry bulb temperature (final) in °C
+printf("\n The dry bulb temperature (final)=%2.1f °C point D ",T_df)
+printf("\n \nThe wet bulb is now 18.9°C and the enthalpy is 53 kJ/kg.")
diff --git a/3878/CH22/EX22.3/Ex22_3.sce b/3878/CH22/EX22.3/Ex22_3.sce
new file mode 100644
index 000000000..cfde6d548
--- /dev/null
+++ b/3878/CH22/EX22.3/Ex22_3.sce
@@ -0,0 +1,16 @@
+clear
+// Variable declaration
+T_d=26// The dry bulb temperature of air in °C
+T_w=20// The wet bulb temperature of water in °C
+T_win=29// The temperature of water at inlet in °C
+T_wout=24// The temperature of water at outlet in °C
+C_pw=4.187// The specific heat capacity of water in kJ/kg.K
+
+// Calculation
+Q=C_pw*(T_win-T_wout)// Heat from water in kJ/kg
+h_ain=57.1// Enthalpy of entering air in kJ/kg
+h_aout=78.1// Enthalpy of leaving air in kJ/kg
+printf("\n \nHeat from water=%2.0f kJ/kg \nEnthalpy of entering air=57.1 kJ/kg \nEnthalpy of leaving air=78.1 kJ/kg",Q)
+
+printf("\n From the chart, the air leaves at approximately 25.7°C dry bulb")
+