MathGroup Archive 2003

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

Search the Archive

formatting question

  • To: mathgroup at smc.vnet.net
  • Subject: [mg42337] formatting question
  • From: "Michael Alfaro" <malfaro at ucdavis.edu>
  • Date: Tue, 1 Jul 2003 08:45:43 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Hi, I would like to post to mathgroup but when I paste code out of a notebook, it 
looks like this: (using a Mac in OSX)

\!\(\*
  StyleBox[\(Clear[uDiagonal,
    uAngYZ, uAngW, uAngX, uAngY, uAngZ, y, x]\[IndentingNewLine]
    \(uDiagonal[input_, fixed_, angleA_] := ?\((\((input\^2 +
    fixed\^2)\) - \((2*input*fixed\ *Cos[
    angleA\ *\ \((Pi/180)\)\ ])\))\);\)\[IndentingNewLine]\[IndentingNewLine]\
\[IndentingNewLine]
    \(uAngYZ[fixed_, \ input_, coupler_, \ output_, \
              angleA_] := \
                  ArcCos[\((coupler\^2 + \ output\^2 - \((uDiagonal[input,
                      fixed, angleA])\)\^2)\)/\((2*coupler*
                output)\)]\ *\((180/Pi)\);\)\[IndentingNewLine]

Can you please tell me how to export code from mathematica into something that 
will appear legible on the newsgroup?

Thanks!

Michael


  • Prev by Date: how do I portably discard stderr for MathLink programs
  • Next by Date: Why can't NIntegrate integrate this well-behaved function?
  • Previous by thread: Re: how do I portably discard stderr for MathLink programs
  • Next by thread: Re: formatting question