       RE: Re: Re: word processing with mathematica

• To: mathgroup at smc.vnet.net
• Subject: [mg36500] RE: [mg36474] Re: [mg36437] Re: word processing with mathematica
• From: "DrBob" <drbob at bigfoot.com>
• Date: Mon, 9 Sep 2002 00:29:52 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```P.J.,

I'd be very interested in how you created these "fancy" cells.  Do you
open a cell, push Ctrl-Shift-e, type in all that text, then push
Ctrl-Shift-e again?

Bobby Treat

-----Original Message-----
From: P.J. Hinton [mailto:paulh at wolfram.com]
To: mathgroup at smc.vnet.net
Subject: [mg36500] [mg36474] Re: [mg36437] Re: word processing with mathematica

On Sat, 7 Sep 2002, Mark Westwood wrote:

> I too have been trying to use Mathematica (v4.2 most recently) to type
> maths papers and the like but I'm not ready to ditch LaTeX yet.  There
> are just too many cases where I cannot figure out how to achieve what
I
> want in Mathematica, things like:

> - left brackets spanning multiple lines for defining hybrid functions;

You can accomplish this by doing the following:

1) Put your function braches in the rows of a grid box structure.

ShowAutoStyles -> False
SpanMaxSize -> Infinity

The following cell snippet demonstrates how this influences the result.

To view it, paste the Cell[] expression into a notebook and then click
on
Yes when you are prompted on whether the front end should interpret the
result.

Cell[BoxData[
FormBox[
RowBox[{
RowBox[{"f", "(", "x", ")"}], "=",
RowBox[{"{", GridBox[{
{"x",
RowBox[{"x", " ", "<", "0"}]},
{
SuperscriptBox["x", "2"],
RowBox[{"0", "\[LessEqual]", "x", "<", "1"}]},
{
RowBox[{"sin", "(", "x", ")"}],
RowBox[{"1", "\[LessEqual]", "x", "<", "2"}]},
{
RowBox[{"\[CapitalGamma]", "(", "x", ")"}],
RowBox[{"x", "\[GreaterEqual]", "2"}]}
ShowAutoStyles->False,
SpanMaxSize->Infinity]

> - vertical alignment of equals signs in multi-line equations or
> derivations;

Put your equations in a GridBox and set the ColumnAlignments option to a

string containing the equal sign.

Cell[BoxData[
FormBox[GridBox[{
{
RowBox[{
RowBox[{
RowBox[{"3", "x"}], " ", "+", " ",
RowBox[{"4", " ", "y"}]}], " ", "=", " ", "9"}]},
{
RowBox[{
RowBox[{
RowBox[{"2", "x"}], " ", "-", " ",
RowBox[{"7", " ", "y"}]}], "=",
RowBox[{"32", " ", "-", " ",
RowBox[{"sin", "(", "x", ")"}]}]}]}
GridBoxOptions->{ColumnAlignments->{"="}}]

> - setting typefaces in tables of material.

I think the Author Tools material that comes with Mathematica 4.2 might
be

--
P.J. Hinton
User Interface Programmer                         paulh at wolfram.com
Wolfram Research, Inc.
Disclaimer: Opinions expressed herein are those of the author alone.

```

• Prev by Date: Re: Re: Generating Two Unit Orthogonal Vectors (correction)
• Next by Date: RE: Re: ListIntegrate Info.
• Previous by thread: RE: word processing with mathematica
• Next by thread: Re: word processing with mathematica