1 files changed, 12 insertions, 0 deletions
diff --git a/2120/CH2/EX2.13/exa_2_13.sce b/2120/CH2/EX2.13/exa_2_13.sce
new file mode 100755
index 000000000..d34e993fd
--- /dev/null
+++ b/2120/CH2/EX2.13/exa_2_13.sce
@@ -0,0 +1,12 @@
+// Exa 2.13
+clc;
+clear;
+close;
+// Given data
+T1= 300;// in K
+T2= 900;// in K
+m=2;// in kg
+Cp= '40+600/sqrt(T)+7000/T';// in kJ/kg mole K
+delta_H=m* integrate('40-600/sqrt(T)+7000/T','T',T1,T2);// in kJ/kg mole
+delta_H= delta_H/17.03;// in kJ/kg
+disp(delta_H,"Change in enthalpy in kJ/kg is : ")