Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2005

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

Search the Archive

Finally, a simple example of a mystery

  • To: mathgroup at smc.vnet.net
  • Subject: [mg54040] Finally, a simple example of a mystery
  • From: Steve Gray <stevebg at adelphia.net>
  • Date: Tue, 8 Feb 2005 05:31:31 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

I have this one-line function definition. It was working well until
just now when I opened the file and did Kernel > EvaluateNotebook,
which caused some complaints. I had the function name highlighted in
yellow and for some reason when I inspected this line, there was a small
"space" visible between the e and x in topvertex. (The font is my normal
Courier New and the size is 12 points.) When I edited the space out,
everything worked. These two lines are in a cell by themselves. Could
the highlighting be the problem? Has anyone else seen something like
this? I have had similar things many times before, but I don't recall
whether I had highlighting there or not.  I'm using 5.0.1.0.

When I  save the fixed file and reopen it, the same psuedo-space
appears. By the way, the cursor skips over this space as if it were not
there, but if I delete and retype the e or x, it's ok.

topvertex[gon_] := Ordering[-Transpose[gon][[2]]] [[1]]; (* Returns #
of highest vertex, e.g. 6 for ggon. *)

This section of the plaintext file follows. Note that "topverte" and
"x" are separated by a color callout. It looks like this gets in the
way somehow. But I like to color the functions I define and their calls,
for clarity.

Cell[BoxData[
    RowBox[{
      RowBox[{
        RowBox[{
          StyleBox[
            RowBox[{
              StyleBox["topverte",
                Background->RGBColor[1, 1, 0]], 
              StyleBox["x",
                Background->RGBColor[1, 1, 0]]}]], 
          StyleBox["[",
            Background->RGBColor[1, 1, 0]], 
          StyleBox["gon_",
            Background->RGBColor[1, 1, 0]], 
          StyleBox["]",
            Background->RGBColor[1, 1, 0]]}], 
        ":=", \(\(Ordering[\(-\(Transpose[gon]\)[\([2]\)]\)]\)\ [\([1]\)]\)}],
       ";", "                            ", 
      StyleBox[\( (*\ Returns\ #\ of\ highest\ vertex, \ 
          e . g . \ 6\ for\ \(\(ggon\)\(.\)\)\ *) \),
        FontColor->RGBColor[0, 0, 1]]}]], "Input",
  Background->RGBColor[1, 1, 0.756863]],


Steve Gray


  • Prev by Date: Re: Controlling Print[].
  • Next by Date: Re: Re: Re: Re: Re: New Web Site for Mathematica Users using WikiMedia
  • Previous by thread: Re: Summary: Which[] as Textbook Input, Plot[] Questions
  • Next by thread: Re: Finally, a simple example of a mystery