front end equation formatting
- To: mathgroup at smc.vnet.net
- Subject: [mg112496] front end equation formatting
- From: "Scot T. Martin" <smartin at seas.harvard.edu>
- Date: Fri, 17 Sep 2010 06:42:45 -0400 (EDT)
First Cell[] below shows an equation of equally sized character. Second
Cell[] makes a smaller font of the terms in the FractionBox[]. Does anyone
know how to set the formatting so that the font does not get smaller?
Thank!
Cell[BoxData[
FormBox[
RowBox[{"h", "=",
FractionBox["j", "k"]}], TraditionalForm]], "Input",
CellChangeTimes->{{3.4936705626324425`*^9, 3.4936705700112553`*^9}}]
Cell[TextData[{
"then, ",
Cell[BoxData[
FormBox[
RowBox[{"h", "=",
FractionBox["j", "k"]}],
TraditionalForm]],FormatType->"TraditionalForm"]
}], "Text",
CellChangeTimes->{{3.4936705831308784`*^9, 3.4936705899480906`*^9}}]