1 files changed, 14 insertions, 0 deletions
diff --git a/1019/CH5/EX5.22/Example_5_22.sce b/1019/CH5/EX5.22/Example_5_22.sce
new file mode 100644
index 000000000..226a97a82
--- /dev/null
+++ b/1019/CH5/EX5.22/Example_5_22.sce
@@ -0,0 +1,14 @@
+//Example 5.22
+clear;
+clc;
+
+//Given
+//log10(P)=(-834.13/T)+(1.75*log(T))-(8.375*0.001*T)+5.3234 pressure in mm of Hg as a function og temperature in K
+Tb=169.25;//boiling point of ethylene in K
+R=8.314;//gas constant in J K^-1 mol^-1
+
+//To determine latent heat of vapourization delHv
+//delHv=R*(T^2)*(dlogP/dT) by clausius clapeyron equation
+delHv=((-R*834.13*2.303)+(1.75*R*Tb*2.303)-(8.375*2.303*0.001*R*(Tb^2)))*0.001;//latent heat of vapourization in kJ
+mprintf('The latent heat of vapourization delHv of ethylene = %f kJ mol^-1',delHv);
+//end
+\ No newline at end of file