Services & ResourcesWolfram ForumsMathGroup Archive

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

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

• Follow-Ups:
  • Re: formatting question
    • From: Tomas Garza <tgarza01@prodigy.net.mx>