MathGroup Archive 2001

[Date Index] [Thread Index] [Author Index]

Search the Archive

Disappearing equation number

  • To: mathgroup at smc.vnet.net
  • Subject: [mg27964] Disappearing equation number
  • From: "Dr Stephen P Luttrell" <luttrell at signal.dra.hmg.gb>
  • Date: Tue, 27 Mar 2001 01:26:02 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

I have $Version = "4.1 for Microsoft Windows (November 2, 2000)".

I have a problem with disappearing equation numbers when I use
TextAlignment->AlignmentMarker. This is best seen by pasting the
accompanying notebook expression into a Mathematica notebook.

Any suggestions on how to work around this problem?


Notebook[{

Cell[CellGroupData[{
Cell["Problem with Disappearing Equation Numbers", "Section"],

Cell[TextData[{
  "The following cell does ",
  StyleBox["not",
    FontSlant->"Italic"],
  " use TextAlignment->AlignmentMarker."
}], "Text"],

Cell[BoxData[{
    \(TraditionalForm\`x +
        y = \[AlignmentMarker]z\), "\[IndentingNewLine]",
    \(TraditionalForm\`x = \[AlignmentMarker]y -
        z\), "\[IndentingNewLine]",
    \(TraditionalForm\`x + y +
        x = \[AlignmentMarker]1\)}], "NumberedEquation"],

Cell["\<\
The following cell is identical to the previous cell, except that it \
uses TextAlignment->AlignmentMarker. Where has the equation number \
gone?\
\>", "Text"],

Cell[BoxData[{
    \(TraditionalForm\`x +
        y = \[AlignmentMarker]z\), "\[IndentingNewLine]",
    \(TraditionalForm\`x = \[AlignmentMarker]y -
        z\), "\[IndentingNewLine]",
    \(TraditionalForm\`x + y +
        x = \[AlignmentMarker]1\)}], "NumberedEquation",
  TextAlignment->AlignmentMarker],

Cell[TextData[{
  "This problem did not occur with ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " 4.0 (for Windows), but does occur with ",
  StyleBox["Mathematica",
    FontSlant->"Italic"],
  " 4.1 (for Windows)."
}], "Text"]
}, Open  ]]
},
FrontEndVersion->"4.1 for Microsoft Windows",
ScreenRectangle->{{0, 1024}, {0, 695}},
WindowSize->{496, 599},
WindowMargins->{{18, Automatic}, {Automatic, 23}},
StyleDefinitions -> "Report.nb"
]


--
Stephen P Luttrell
Room EX21, Defence Evaluation and Research Agency
Malvern, Worcs, WR14 3PS, U.K.
luttrell at signal.dera.gov.uk
01684-894046 (phone), 01684-894384 (fax)




  • Prev by Date: Re: setdelayed function
  • Next by Date: Re: Puzzled over (un)changing argument symbols in functions
  • Previous by thread: AW: Importing figures
  • Next by thread: Re: Disappearing equation number