I want Mathematica to give a symbolic output, actually, the last cell of the attached notebook, is a real number which has to be written out as an explicit function of the declared real parameters, defined at the beginning of the notebook. However, I do not succeed in Mathematica giving the result. May someone help me?
Attachments: