//Example 13.1//

a=25000;//amu //average molecular weight of polyethylene
C=12.01;//amu //atomic mass of carbon //(From Appendix)
H=1.008;//amu // atomic mass of Hydrogen ////(From Appendix)
b=2;//number of atoms
d=4;//number of atoms
n=a/((b*C)+(d*H))
mprintf("n = %i ",n)