1 files changed, 22 insertions, 0 deletions
diff --git a/858/CH3/EX3.14/example_14.sce b/858/CH3/EX3.14/example_14.sce
new file mode 100755
index 000000000..439a75167
--- /dev/null
+++ b/858/CH3/EX3.14/example_14.sce
@@ -0,0 +1,22 @@
+clc
+clear 
+printf("example 3.14 page number 102\n\n")
+
+//to find the fraction of purged recycle and total yield
+
+//x- moles of N2 and H2 recycled; y - moles of N2 H2 purged
+
+Ar_freshfeed = 0.2;
+//argon in fresh feed is equal to argon in purge 
+
+y = 0.2/0.0633;   //argon in purge = 0.0633y
+x = (0.79*100 - y)/(1-0.79);
+printf("y = %f kmol\nx = %f kmol",y,x)
+
+//part 1
+fraction = y/x;
+printf("\n\nfration of recycle that is purged = %f",fraction)
+
+//part 2
+yield = 0.105*(100+x);
+printf("\n\noverall yield of ammonia = %f kmol",yield)