MathGroup Archive 2006

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

Search the Archive

Re: Mathematica Font problems

  • To: mathgroup at smc.vnet.net
  • Subject: [mg66981] Re: Mathematica Font problems
  • From: "ragfield" <ragfield at gmail.com>
  • Date: Tue, 6 Jun 2006 06:27:17 -0400 (EDT)
  • References: <e5js73$e3d$1@smc.vnet.net><e5mhb7$kc7$1@smc.vnet.net> <e5ttai$ecg$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Skillman Hunter wrote:
> Rob, thanks for your response but I don't agree with you.
> In the Tutorial, on Page 10, the last equation, if the right arrow is
> selected alone,
> the Mathematica Format>Font menu shows "Courier New".
> In the "Program Files" folder, the Mathematica installation has a Fonts
> folder
> which has two sub-folders, TrueType and Type1.
> The TrueType folder is all Mathematica1.ttf-Mathematica7mb.ttf.
> The Type1 folder has four Courier fonts: "cour.pfa", courb.pfa", courbi.pfa"
> and "couri.pfa".
> There are 48 fonts in the Type1 folder including the Mathematica1.pfa
> series.
> I looked at the files with WinHex and the beginning of the "cour.pfa" file
> says "PS-AdobeFont-1.0 Courier 001.003".
> So these are clearly Courier fonts that I believe are used by Mathematica to
> have the special characters like the right arrow.

I believe these Type1 fonts are only used for PostScript export.
Mathematica really does substitute Mathematica1Mono for Courier when it
draws this character.  You can verify this by evaluating:

DisplayString[Graphics[Text[
  StyleForm["a\[Rule]b", FontFamily -> "Courier"], {0, 0}]]]

Note in the PostScript output that "a" and "b" are drawn with Courier,
while the \[Rule] is drawn with Mathematica1Mono:

/Courier-MISO findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(a) show
69.000 13.000 moveto
%%IncludeResource: font Mathematica1Mono
%%IncludeFont: Mathematica1Mono
/Mathematica1Mono findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(\256) show
76.188 13.000 moveto
%%IncludeResource: font Courier-MISO
%%IncludeFont: Courier-MISO
/Courier-MISO findfont 10.000 scalefont
[1 0 0 -1 0 0 ] makefont setfont
0.000 0.000 0.000 setrgbcolor
(b) show

-Rob
User Interface Developer
Wolfram Research


  • Prev by Date: Re: schur decomposition and mathematica
  • Next by Date: Re: piecewise integration
  • Previous by thread: Re: Mathematica Font problems
  • Next by thread: Re: Problem with Limit