summaryrefslogtreecommitdiff
path: root/647/CH12/EX12.5/Example12_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '647/CH12/EX12.5/Example12_5.sce')
-rwxr-xr-x647/CH12/EX12.5/Example12_5.sce24
1 files changed, 24 insertions, 0 deletions
diff --git a/647/CH12/EX12.5/Example12_5.sce b/647/CH12/EX12.5/Example12_5.sce
new file mode 100755
index 000000000..e5435c7de
--- /dev/null
+++ b/647/CH12/EX12.5/Example12_5.sce
@@ -0,0 +1,24 @@
+clear;
+clc;
+
+// Example: 12.5
+// Page: 481
+
+printf("Example: 12.5 - Page: 481\n\n");
+
+// Solution
+
+//*****Data******//
+// Reaction: N2(g) + 3H2(g) = 2NH3(g)
+Temp = 298;// [K]
+G_NH3 = -16.750;// [kJ/mol]
+R = 8.314;// [J/mol K]
+//***************//
+
+G_N2 = 0;// [kJ/mol]
+G_H2 = 0;// [kJ/mol]
+G_rkn = 2*G_NH3 - G_N2 - 3*G_H2;// [kJ/mol]
+printf("Standard Gibbs free energy change is %.1f kJ/mol\n",G_rkn);
+G_rkn = G_rkn*1000;// [J/mol];
+K = exp(-(G_rkn/(R*Temp)));
+printf("Equilibrium constant is %.2e",K); \ No newline at end of file