summaryrefslogtreecommitdiff
path: root/858/CH3/EX3.14/example_14.sce
blob: 439a75167afe92d74804e16e19e8c40717dbc725 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
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)