Concrete and Euler

Concrete and Euler

[Emil Hedevang Lohse]

Hello,

Is there an easy way to make ConTeXt use the Concrete Computer Modern
font for normal text and the AMS Euler font for math -- like in
Knuth's book "Concrete Mathematics"?

-- 
Emil Hedevang Lohse <http://home.imf.au.dk/emil/> 

Alle spørgsmål er lige dumme. 
Og spørgsmålet "Kan ænder flyve?" er ikke dumt.

Re: Concrete and Euler

[Adam Lindsay]

I have no idea how to get Concrete to work.

But you remind me that I have a modified version of the Euler macros that
I should finish up and release.

I'll try to get to that sometime soon...

Cheers,
adam


Emil Hedevang Lohse said this at Wed, 12 Mar 2003 10:58:44 +0100:

>
>Hello,
>
>Is there an easy way to make ConTeXt use the Concrete Computer Modern
>font for normal text and the AMS Euler font for math -- like in
>Knuth's book "Concrete Mathematics"?
>
>--
>Emil Hedevang Lohse <http://home.imf.au.dk/emil/>
>
>Alle spørgsmål er lige dumme.
>Og spørgsmålet "Kan ænder flyve?" er ikke dumt.
>_______________________________________________
>ntg-context mailing list
>ntg-context@ntg.nl
>http://www.ntg.nl/mailman/listinfo/ntg-context

--
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
 Adam T. Lindsay                      atl@comp.lancs.ac.uk
 Computing Dept, Lancaster University   +44(0)1524/594.537
 Lancaster, LA1 4YR, UK             Fax:+44(0)1524/593.608
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

Re: Concrete and Euler

[Michal Kvasnicka]

[-- Attachment #1: Type: text/plain, Size: 678 bytes --]

> Is there an easy way to make ConTeXt use the Concrete Computer Modern
> font for normal text and the AMS Euler font for math -- like in
> Knuth's book "Concrete Mathematics"?

Good noon.

Some time ago I typeset my PhD thesis with Concrete. You may use my way. (AMS 
Euler I don't know, sorry). You need the file font-csc.tex (included in this 
mail). Then you have to declare it in your document like this:
	\setupbodyfont[csc,11pt]
And the Concrete is used. But allas! It's bitmapped font, i.e. you can't use 
in electronic document (it looks awfully).

Many greetings. 
M.K.

P.S. This way of declaring fonts may be stupid. Don't tell it to Mr. Hagen. 
:-)

[-- Attachment #2: font-csc.tex --]
[-- Type: text/x-tex, Size: 3180 bytes --]

%D \module
%D   [       file=font-con,
%D        version=1995.1.1,
%D          title=\CONTEXT\ Font Macros,
%D       subtitle=Concrete Roman,
%D         author=Hans Hagen,
%D           date=\currentdate,
%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for 
%C details. 

%D The Concrete Modern Roman is just an alternative Computer 
%D Modern Roman. 

\definebodyfont [12pt] [rm] 
  [tf=cscr10   at 12pt,   % scaled \magstep1
   tfa=cscr10  at 14.4pt,
   tfb=cscr10  at 17.28pt,
   tfc=cscr10  at 20.74pt,
   tfd=cscr10  at 24.88pt,
   bf=cscbx10  at 12pt,
   bfa=cscbx10 at 14.4pt,
   bfb=cscbx10 at 17.28pt,
   bfc=cscbx10 at 20.74pt,
   bfd=cscbx10 at 24.88pt,
   it=cscti10  at 12pt,   % scaled \magstep1
   sl=cscsl10  at 12pt,   % scaled \magstep1
   sc=csccsc10 at 12pt]   % scaled \magstep1

\definebodyfont [12pt] [mm]
  [mr=cscr10   at 12pt,
   ex=xccex10 at 12pt,
   mi=xccmi10 at 12pt,
   sy=xccsy10 at 12pt]

\definebodyfont [11pt] [rm] 
  [tf=cscr10   at 11pt,   % scaled \magstephalf
   tfa=cscr10  at 13.2pt,
   tfb=cscr10  at 15.84pt,
   tfc=cscr10  at 19pt,
   tfd=cscr10  at 22.8pt,
   bf=cscbx10  at 11pt,
   bfa=cscbx10 at 13.2pt,
   bfb=cscbx10 at 15.84pt,
   bfc=cscbx10 at 19pt,
   bfd=cscbx10 at 22.8pt,
   it=cscti10  at 11pt,   % scaled \magstephalf
   sl=cscsl10  at 11pt,   % scaled \magstephalf
   sc=csccsc10 at 11pt]   % scaled \magstephalf

\definebodyfont [11pt] [mm]
  [mr=cscr10   at 11pt,
   ex=xccex10 at 11pt,
   mi=xccmi10 at 11pt,
   sy=xccsy10 at 11pt]

\definebodyfont [10pt] [rm] 
  [tf=cscr10,
   tfa=cscr10 scaled \magstep1,
   tfb=cscr10 scaled \magstep2,
   tfc=cscr10 scaled \magstep3,
   tfd=cscr10 scaled \magstep4,
   bf=cscbx10,
   bfa=cscbx10 scaled \magstep1,
   bfb=cscbx10 scaled \magstep2,
   bfc=cscbx10 scaled \magstep3,
   bfd=cscbx10 scaled \magstep4,
   it=cscti10,
   sl=cscsl10,
   sc=csccsc10]

\definebodyfont [10pt] [mm]
  [mr=cscr10,
   ex=xccex10 at 10pt,
   mi=xccmi10 at 10pt,
   sy=xccsy10 at 10pt]

\definebodyfont [9pt] [rm] 
  [tf=cscr9,
   bf=cscbx10 at 9pt,
   it=cscti10 at 9pt,
   sl=cscsl10 at 9pt,
   sc=csccsc10 at 9pt]

\definebodyfont [9pt] [mm]
  [mr=cscr9,
   ex=xccex9,
   mi=xccmi9,
   sy=xccsy9]

\definebodyfont [8pt] [rm] 
  [tf=cscr8,
   bf=cscbx10 at 8pt,
   it=cscti10 at 8pt,
   sl=cscsl10 at 8pt,
   sc=csccsc10 at 8pt]

\definebodyfont [8pt] [mm]
  [mr=cscr8,
   ex=xccex8,
   mi=xccmi8,
   sy=xccsy8]

\definebodyfont [7pt] [rm] 
  [tf=cscr7,
   bf=cscbx10 at 7pt,
   it=cscti10 at 7pt,
   sl=cscsl10 at 7pt,
   sc=csccsc10 at 7pt]

\definebodyfont [7pt] [mm]
  [mr=cscr7,
   ex=xccex7,
   mi=xccmi7,
   sy=xccsy7]

\definebodyfont [6pt] [rm] 
  [tf=cscr6,
   bf=cscbx10 at 6pt,
   it=cscti10 at 6pt,
   sl=cscsl10 at 6pt,
   sc=csccsc10 at 6pt]

\definebodyfont [6pt] [mm]
  [mr=cscr6,
   ex=xccex6,
   mi=xccmi6,
   sy=xccsy6]

\definebodyfont [5pt] [rm] 
  [tf=cscr5,
   bf=cscbx10 at 5pt,
   it=cscti10 at 10pt,
   sl=cscsl10 at 10pt,
   sc=csccsc10 at 10pt]

\definebodyfont [5pt] [mm]
  [mr=cscr5,
   ex=xccex5,
   mi=xccmi5,
   sy=xccsy5]

\endinput

Re: Concrete and Euler

[Emil Hedevang Lohse]

[-- Attachment #1: Type: text/plain, Size: 1684 bytes --]

Michal Kvasnicka <quasar@econ.muni.cz> writes:

> > Is there an easy way to make ConTeXt use the Concrete Computer
> > Modern font for normal text and the AMS Euler font for math --
> > like in Knuth's book "Concrete Mathematics"?
> 
> Good noon.
> 
> Some time ago I typeset my PhD thesis with Concrete. You may use my
> way. (AMS Euler I don't know, sorry). You need the file font-csc.tex
> (included in this mail). Then you have to declare it in your
> document like this: \setupbodyfont[csc,11pt] And the Concrete is
> used. But allas! It's bitmapped font, i.e. you can't use in
> electronic document (it looks awfully).

Thanks, but I can't make it work. I created a file called test.tex
containing the lines

 \setupbodyfont[csc,11pt]
 \starttext
 Test
 \stoptext

and placed font-csc.tex in the same directory, and then I ran 'texexec
test' but got the following error.

 ! Emergency stop.
 <to be read again> 
                    \relax 
 \xxdododefinefont ...tspec {#4}\newfontidentifier 
                                                   \let \localrelativefontsiz...
 
 \fontstrategy ...ame #1\csname #2#3#4#5\endcsname 
                                                   \tryingfontfalse \fi 
 <inserted text> ...yle \fontalternative \fontsize 
                                                   \fi \iftryingfont \fontstr...
 
 \synchronizefont ...strategy \the \fontstrategies 
                                                   \relax \fi \ifskipfontchar...
 <argument> \getvalue {\@style@ \fontstyle }
                                            \edef \fontstyle {\fontstyle }\if...
 ...
 l.1 \setupbodyfont[csc,11pt]

I don't know what to do.

Here is the log file: 

[-- Attachment #2: test.log --]
[-- Type: application/octet-stream, Size: 4450 bytes --]

This is pdfeTeX, Version 3.14159-1.10b-2.1 (Web2C 7.4.5) (format=cont-en 2003.3.10)  14 MAR 2003 13:51
entering extended mode
\write18 enabled.
**&cont-en test.tex
(./test.tex{/a/brugere/smaug.imf.au.dk/raid/rohan/emil/Local/teTeX-2.0.2/share/
texmf/pdftex/config/pdftex.cfg}

ConTeXt  ver: 2003.3.9  fmt: 2003.3.10  int: english  mes: english

language       : language en is active
<protectionstate 0>
system         : cont-new loaded

(/a/brugere/smaug.imf.au.dk/raid/rohan/emil/Local/teTeX-2.0.2/share/texmf/tex/c
ontext/base/cont-new.tex
systems        : beware: some patches loaded from cont-new.tex!
)
system         : cont-old loaded

(/a/brugere/smaug.imf.au.dk/raid/rohan/emil/Local/teTeX-2.0.2/share/texmf/tex/c
ontext/base/cont-old.tex
loading        : Context Old Macros
)
system         : cont-fil loaded

(/a/brugere/smaug.imf.au.dk/raid/rohan/emil/Local/teTeX-2.0.2/share/texmf/tex/c
ontext/base/cont-fil.tex
loading        : Context File Synonyms
)
system         : cont-sys loaded

(/a/brugere/smaug.imf.au.dk/raid/rohan/emil/Local/teTeX-2.0.2/share/texmf/tex/c
ontext/base/cont-sys.tex
specials       : loading definition file tpd

(/a/brugere/smaug.imf.au.dk/raid/rohan/emil/Local/teTeX-2.0.2/share/texmf/tex/c
ontext/base/spec-tpd.tex
specials       : loading definition file fdf

(/a/brugere/smaug.imf.au.dk/raid/rohan/emil/Local/teTeX-2.0.2/share/texmf/tex/c
ontext/base/spec-fdf.tex <unprotect 3> <unprotect 4>
system (E-TEX) : [line 1815] \ifcsname 
<unprotect 5> <protect 5> <protect 4> <protect 3>)
specials       : fdf loaded
<unprotect 3> <protect 3>)
specials       : fdf,tpd loaded
)
bodyfont       : 12pt rm is loaded
language       : patterns 2:2-en-2 3:2-uk-2 4:2-de-2 5:2-fr-2 6:2-es-2 7:2-it-2
 8:2-nl-2 loaded
specials       : fdf,tpd loaded
\openout2 = `test.tui'.

system         : test.top loaded
(./test.top)
\openout0 = `test-mpgraph.mp'.

\openout0 = `test-mprun.mp'.

\openout0 = `mpgraph.mp'.

\openout0 = `mprun.mp'.


pdftex         : needs map file: original-context-symbol.map
pdftex         : needs map file: pl0-ams-cmr.map
pdftex         : needs map file: original-vogel-symbol.map

(/a/brugere/smaug.imf.au.dk/raid/rohan/emil/Local/teTeX-2.0.2/share/texmf/tex/c
ontext/base/type-pre.tex)
bodyfont       : variant csc is loaded
(./font-csc.tex)
! Font \*11ptrmtf*=cscr10 at 11.0pt not loadable: Metric (TFM) file not found.
<to be read again> 
                   \relax 
\xxdododefinefont ...tspec {#4}\newfontidentifier 
                                                  \let \localrelativefontsiz...

\fontstrategy ...ame #1\csname #2#3#4#5\endcsname 
                                                  \tryingfontfalse \fi 
<inserted text> ...yle \fontalternative \fontsize 
                                                  \fi \iftryingfont \fontstr...

\synchronizefont ...strategy \the \fontstrategies 
                                                  \relax \fi \ifskipfontchar...
<argument> \getvalue {\@style@ \fontstyle }
                                           \edef \fontstyle {\fontstyle }\if...
...
l.1 \setupbodyfont[csc,11pt]
                            
? 
! Emergency stop.
<to be read again> 
                   \relax 
\xxdododefinefont ...tspec {#4}\newfontidentifier 
                                                  \let \localrelativefontsiz...

\fontstrategy ...ame #1\csname #2#3#4#5\endcsname 
                                                  \tryingfontfalse \fi 
<inserted text> ...yle \fontalternative \fontsize 
                                                  \fi \iftryingfont \fontstr...

\synchronizefont ...strategy \the \fontstrategies 
                                                  \relax \fi \ifskipfontchar...
<argument> \getvalue {\@style@ \fontstyle }
                                           \edef \fontstyle {\fontstyle }\if...
...
l.1 \setupbodyfont[csc,11pt]
                            
End of file on the terminal!

 
Here is how much of TeX's memory you used:
 729 strings out of 67888
 11590 string characters out of 727238
 4408596 words of memory out of 5521800
 30691 multiletter control sequences out of 10000+50000
 10284 words of font info for 34 fonts, out of 500000 for 1000
 62 hyphenation exceptions out of 1000
 32i,1n,35p,192b,53s stack positions out of 1500i,500n,5000p,200000b,5000s
 0 PDF objects out of 300000
 0 named destinations out of 131072
 0 words of extra memory for PDF output out of 65536
No pages of output.

[-- Attachment #3: Type: text/plain, Size: 143 bytes --]


/Emil

-- 
Emil Hedevang Lohse <http://home.imf.au.dk/emil/> 

Alle spørgsmål er lige dumme. 
Og spørgsmålet "Kan ænder flyve?" er ikke dumt.

Re: Concrete and Euler

[Guy Worthington]

Emil Hedevang Lohse wrote:

> Is there an easy way to make ConTeXt use the Concrete Computer
> Modern font for normal text and the AMS Euler font for math

On the assumption that a partial solution is better than none, here's
what I came up with.  You'll notice when you use the \tt font switch the
script does f*ck-all -- it just ignores my rscale parameter.

The first script I've called  type-concrete.tex  and have installed it
in the directory  ./texmf/tex/context/user/  and then updated my
filenames datebase.

% -type-concrete.tex ----

\starttypescript [concreteTT] 

   \definetypeface [concreteTT] [tt] [mono]  [computer-modern] [default]
        [rscale=1.1]

\stoptypescript

\starttypescript [ccr]

   \usetypescript  [serif] [concrete] [name,size]

   \usetypescript  [mono]  [concreteTT]  [name]
   \usetypescript  [mono]  [default]     [size]

   \usetypescript  [math]  [euler]    [name,size]


\stoptypescript

% ----------

The second script is a test file:

% ----------

\usetypescriptfile [type-concrete]
\usetypescript [ccr]
\setupbodyfont [serif,10pt]

\starttext

\input tufte

{\tt \input knuth }

$$ 10\mu + 20\Gamma = 30 $$

\stoptext

% ---------

Re: Concrete and Euler

[Michal Kvasnicka]

Oops. I'm stupid. I'm not using Concrete, but the Czech version of Concrete 
(accents are added). You have to replace cscr10 in the font-csc.tex with 
ccr10 etc. -- for all fonts. Then it should work. (Or you may install the 
Czech one.) :-)

Sorry once more. Have a nice day,
M.K.