1 files changed, 11 insertions, 0 deletions
diff --git a/779/CH11/EX11.4/11_4.sce b/779/CH11/EX11.4/11_4.sce
new file mode 100755
index 000000000..d66f3ebf0
--- /dev/null
+++ b/779/CH11/EX11.4/11_4.sce
@@ -0,0 +1,11 @@
+T = (3754-3063)/(23.03-19.49);
+P = exp(23.03-(3754/195.2));
+R = 8.3143;
+Lsub = R*3754;
+Lvap = 3063*R;
+Lfu = Lsub-Lvap;
+disp("K",T,"Temperature of triple point is")
+disp("mm Hg",P,"Pressure of triple point is")
+disp("kJ/kg mol",Lsub,"Latent heat of sublimation is")
+disp("kJ/kg mol",Lvap,"Latent heat of vapourization is")
+disp("kJ/kg mol",Lfu,"Latent heat of fusion is")
+\ No newline at end of file