summaryrefslogtreecommitdiff
path: root/3557/CH9/EX9.6/Ex9_6.sce
blob: b03ddb6589cfacb9be04721ca181e6ce61297f0f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
    //Example 9.6//
//(a)
x1=70;//wt % //x1 is the overall composition
xa=30;//wt % //composition of two phases
xb=90;//wt % //composition of two phases
xl=60;//wt %//
a=1;//kg
mb1=((x1-xa)/(xb-xa))*a
mprintf("mb1 = %f kg ",mb1)
b=10^3;//g//As 1kg = 10^3grams
mb3=mb1*b////As 1kg = 10^3grams
mprintf("\nmb1= %i g",mb3)
mb2=((x1-xl)/(xb-xl))*a
mprintf("\n mb2 = %f kg ",mb2)
mb4=mb2*b//As 1kg = 10^3g
mprintf("\nmb4= %i g",mb4)
fp=mb4/mb3
mprintf("\n fp =%f ",fp)