summaryrefslogtreecommitdiff
path: root/3557/CH9/EX9.5/Ex9_5.sce
blob: f7832055918f82c84796cfb1264adf45549754fb (plain)
1
2
3
4
5
6
7
8
9
//Example 9.5//

xcub=15;//wt % //cubic phase
x1=8;//mol % CaO//x1 is the overall composition
xmono=2;//wt % //monoclinic phase
monoclinic=(xcub-x1)/(xcub-xmono)*100
mprintf("monoclinic = %f mol percent",monoclinic)
cubic=(x1-xmono)/(xcub-xmono)*100
mprintf("\ncubic = %f mol percent",cubic)