1 files changed, 27 insertions, 0 deletions
diff --git a/632/CH4/EX4.11/example4_11.sce b/632/CH4/EX4.11/example4_11.sce
new file mode 100755
index 000000000..5018af369
--- /dev/null
+++ b/632/CH4/EX4.11/example4_11.sce
@@ -0,0 +1,27 @@
+//clc()
+//N2 + 3H2 = 2NH3
+V1 = 100;//m^3 ( 1 = N2)
+V2 = V1 * 3;// ( According to Avagadros principle, equal volumes of all gases under similar condition contains same no. of moles)
+disp("m^3",V2,"(a)Volume of hydrogen required at same condition = ")
+P1 = 20;//bar
+T1 = 350;//K
+P2 = 5;//bar
+T2 = 290;//K
+V3 = 3 * V1 * P1 * T2 / ( P2 * T1);
+disp("m^3",V3,"(b)Volume required at 50 bar and 290K = ")
+m = 1000;//kg ( ammonia )
+N = m / 17.03;//kmol
+N1 = N/2;// ( nitrogen)
+N2 = N * 3 / 2;//(hydrogen)
+P3 = 50;//bar
+T3 = 600;//K
+Pstp = 1.01325;//bar
+Tstp = 273.15;//K
+Vstp = 22.414;//m^3/kmol
+V1stp = N1 * Vstp;
+V4 = V1stp * Pstp * T3 / (P3 * Tstp);// ( nitrogen at 50 bar and 600K)
+V5 = V4 * 2 ;// ( ammonia at 50 bar and 600K)
+V6 = V4 * 3 ;// ( hydrogen at 50 bar and 600K)
+disp("m^3",V4,"(c)Volume of nitrogen at 50 bar and 600K")
+disp("m^3",V6,"   Volume of hydrogen at 50 bar and 600K")
+disp("m^3",V5,"   Volume of ammonia at 50 bar and 600K")
+\ No newline at end of file