From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 944/CH5/EX5.39/example5_39_TACC.sce | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100755 944/CH5/EX5.39/example5_39_TACC.sce

(limited to '944/CH5/EX5.39')

diff --git a/944/CH5/EX5.39/example5_39_TACC.sce b/944/CH5/EX5.39/example5_39_TACC.sce
new file mode 100755
index 000000000..3b234bdfb
--- /dev/null
+++ b/944/CH5/EX5.39/example5_39_TACC.sce
@@ -0,0 +1,20 @@
+//example 5.39
+
+clear;
+clc;
+
+disp("0.5N2(g)+1.5H2(g)<=>NH3(g)");
+//Given:
+T=298;//Temperature[K]
+Kp=900;//Equilibrium constant for above reaction
+P1=0.32;//partial pressure of N2(g)[bar]
+P2=0.73;//partial pressure of H2(g)[bar]
+P3=0.98;//partial pressure of NH3(g)[bar]
+R=8.314;//Universal gas constant[J/K/mol]
+
+//To find the reaction Gibb's energy
+G=-R*T*log(Kp);
+x=(P1^0.5)*(P2^1.5);
+p=P3/x;
+Gr=(G+R*T*log(p))*0.001;
+printf("The reaction Gibbs free energy is %f KJ/mol ",Gr);
-- 
cgit