Bonjour : je réalise un manipulate sur Mathematica 7, somme toute fort simple mais comme je suis débutant, j'a encore quelques problèmes : comment lui faire afficher le résultat d'un calcul mettant en jeu une variable, ici m ; à chaque fois il m'affiche -m^2, mais pas le résultat

Voici le code :
Manipulate[
Plot[{E^(m*x), E^-(m*x), E^(m*a)*(m*x - m*a + 1),
E^(-m*a)*(m*a - m*x + 1)}, {x, -3, 3}, PlotRange -> {-1, 5},
AspectRatio -> 1], {a, -3, 3}, {m, 1, 5},
Text["\!\(\*SubscriptBox[\"\[CapitalDelta]y\",
RowBox[{\"1\", \"*\"}]]\)*\!\(\*SubscriptBox[\"\[CapitalDelta]y\",
RowBox[{\"2\", \" \"}]]\)= " - m^2]]


Merci d'avance!