3

I have added

\usepackage[uprightmonomath]{wrisym}

to the preamble to get Mathematica input fonts. I can access them by using \mathversion{mono} and \mathversion{monobold}.

But wrisym has also changed the fonts for mathversion{normal} and \mathversion{bold} to Times. What can I do to make the normal and bold correspond to the default Computer Modern?

(p.s. The default main-body text font also changed to Times. So I also needed to get the default main-body text to be Computer Modern. With help from egreg, I achieved it by adding \renewcommand{\rmdefault}{cmr} to the preamble.)

1 Answer 1

3

I believe you don't want to load wrisym, but rather just to define new math versions:

\DeclareMathVersion{mono}
\DeclareMathVersion{monobold}
\SetSymbolFont{letters}{mono}{OML}{wttum}{m}{n}
\SetSymbolFont{operators}{mono}{OT1}{wttr}{m}{n}
\SetSymbolFont{symbols}{mono}{OMS}{wtty}{m}{n}
\SetSymbolFont{largesymbols}{mono}{OMX}{wttv}{m}{n}
\SetSymbolFont{letters}{monobold}{OML}{wttum}{b}{n}
\SetSymbolFont{operators}{monobold}{OT1}{wttr}{b}{n}
\SetSymbolFont{symbols}{monobold}{OMS}{wtty}{b}{n}
\SetSymbolFont{largesymbols}{monobold}{OMX}{wttv}{b}{n}

This code in your document will define the math fonts to use under

\mathversion{mono}

or

\mathversion{monobold}

without doing any change to the default text and math fonts.

7
  • This is very nice; and things are really shaping up. I still need to address two things (but I got one of them on my own; woot!). (1) By adding these definitions, the monospaced fonts became narrower than before. But after reading in the manual msymdoc.pdf, I noticed that I could fix this by changing tt to cr; e.g. change wttum to wcrum.. etc. (2) There are a handful special Mathematica characters (like double-struck letters and "Alias-Delimiter") which I need to access. Would you help me find how to get these characters?
    – QuantumDot
    Oct 25, 2014 at 22:18
  • @QuantumDot Look in wrisym.sty under "Delimiters" and "Double Struck". My impression is that you're asking for a whole new package.
    – egreg
    Oct 25, 2014 at 22:22
  • Yep, that's what I'm doing now: and I found that I can get the necessary characters by adding e.g. \DeclareMathSymbol{\DoubleStruckG}{\mathord}{symbols}{number} \let\dsg=\DoubleStruckG to the preamble. Where I need to figure out what number I need.
    – QuantumDot
    Oct 25, 2014 at 22:30
  • @QuantumDot You get those only if the symbols font is one of the Mathematica fonts. It's far more complicated than just adding \DeclareMathSymbols.
    – egreg
    Oct 25, 2014 at 22:32
  • Are you serious?? That's really depressing. I just need like 4 double-struck characters, and the alias delimiter... Ok, I'll spend another half-hour before giving up.
    – QuantumDot
    Oct 25, 2014 at 22:34

You must log in to answer this question.

Not the answer you're looking for? Browse other questions tagged .