# Initialisation of Variables
Fe=6.67;#Carbon percentage in Cementite by weight
G=0.77;#Carbon percentage in eutectoid composition in steel by weight
A=0.0218;#Carbon percentage in Ferrite
Fe3C=16.;#Percentage of alpha ferrite in steel
P=95.;#Percentage of Pearlite in Steel
#CALCULATIONS
X1=((Fe3C/100)*(Fe-A))+A;#Carbon content present in Steel
X2=Fe-((P/100)*(Fe-G));#Carbon content present in Steel
print "Carbon content present in Steel:",X1
print "Carbon content present in Steel:",X2
print "The carbon content is on the order of 1.065 to 1.086 percent, consistent with a 10110 steel"
primary_alpha=((0.77-.5)/(0.77-0.0218))*100
pearlite=((0.5-0.0218)/(0.77-0.0218))*100
print "primary alpha in percentage =",round(primary_alpha)
print "pearlite in percentage =",round(pearlite)
#Answer difference is due to roundoff