//Example 10.10//
xc=15;//mol % //cubic phase composition of CaO
x=7;//mol % //x for overall composition
xm=2;//mol % //monoclinic phase composition of CaO
m=(xc-x)/(xc-xm)*100
mprintf("m = %i mol percent",m)