Fourier and utopia

* Fourier and utopia
@ 2018-03-03 14:46 Mikael P. Sundqvist
  2018-03-03 18:17 ` Mikael P. Sundqvist
  0 siblings, 1 reply; 3+ messages in thread
From: Mikael P. Sundqvist @ 2018-03-03 14:46 UTC (permalink / raw)
  To: mailing list for ConTeXt users

[-- Attachment #1.1: Type: text/plain, Size: 3449 bytes --]

Dear Hans and dear list,

I try to use the fourier/utopia combination in mkiv (I used that
combination for my PhD thesis in mkii 10 years ago).

First of all, I have downloaded the fourier fonts from ctan at
https://ctan.org/tex-archive/fonts/fourier-GUT . The fonts are found by
mtxrun.

I have one folder containing type-fourier.mkiv, fourier-math.lfg and
testfile.tex. Everything seems to be found by the system, so the problem is
probably in my files somewhere. The resulting pdf after compiling
testfile.text is attached.

Any ideas of what I am missing?

Additionally, the fourier fonts come with fourier-bb.tfm (probably with
blackboard bold), fourier-mcl (probably so that one can use mathcal). Any
ideas on how to use them in the fourier-math.lfg file?

If more information is needed, then please tell me.

/Mikael

%%%
type-fourier.mkiv:
%%%
\starttypescriptcollection[fourier]
    \starttypescript [serif] [fourier]
        \definefontsynonym [Utopia-Regular]     [file:putr8a.afm]
        \definefontsynonym [Utopia-Italic]      [file:putri8a.afm]
        \definefontsynonym [Utopia-Bold]        [file:putb8a.afm]
        \definefontsynonym [Utopia-BoldItalic]  [file:putbi8a.afm]
    \stoptypescript

    \starttypescript [serif] [fourier] [name]
                \setups[font:fallback:serif]
        \definefontsynonym [Serif]            [Utopia-Regular]
        \definefontsynonym [SerifItalic]      [Utopia-Italic]
        \definefontsynonym [SerifBold]        [Utopia-Bold]
        \definefontsynonym [SerifBoldItalic]  [Utopia-BoldItalic]
    \stoptypescript

    \starttypescript [math] [fourier] [all]
        \loadfontgoodies[fourier-math]
        \definefontsynonym [MathRoman]     [fourierrm@fourier-rm]
    \stoptypescript

    \starttypescript [fourier]
        \definetypeface [\typescriptone] [rm] [serif] [fourier] [default]
        \definetypeface [\typescriptone] [ss] [sans]  [modern]  [default]
        \definetypeface [\typescriptone] [tt] [mono]  [modern]  [default]
        \definetypeface [\typescriptone] [mm] [math]  [fourier] [default]
        \quittypescriptscanning
    \stoptypescript
\stoptypescriptcollection

%%%
fourier-math.lfg:
%%%
return {
    name = "fourier-math",
    version = "1.00",
    comment = "Math font Fourier for Utopia.",
    mathematics = {
        mapfiles = {
            "fourier.map",
            "mkiv-base.map",
        },
        virtuals = {
            ["fourier-rm"] = {
                { name = "putr8a", features = "virtualmath", main = true },
                { name = "fourier-ml.tfm",  vector = "tex-mr",
skewchar=0x7F },
                { name = "fourier-mlit.tfm", vector = "tex-mi",
skewchar=0x7F },
                { name = "fourier-mlit.tfm", vector = "tex-it",
skewchar=0x7F },
                { name = "fourier-mlb.tfm",  vector = "tex-bf",
skewchar=0x7F },
                { name = "fourier-mlitb.tfm", vector = "tex-bi",
skewchar=0x7F },
                { name = "fourier-ms.tfm",  vector = "tex-sy",
skewchar=0x30, parameters = true },
                { name = "fourier-mex.tfm",  vector = "tex-ex", extension =
true },
                msam,
                msbm,
            },
        }
    }
}

%%%
testfile.tex:
%%%
\loadtypescriptfile[type-fourier]
\setupbodyfont[fourier,12pt]

\starttext
\startTEXpage[offset=3bp]
Some math: $y''=(y')'$.
A displayed formula:
\startformula
f(x) = f(0)+\int_0^x \bigl(f'(t)\bigr)\,dt.
\stopformula
\stopTEXpage
\stoptext

[-- Attachment #1.2: Type: text/html, Size: 5063 bytes --]

[-- Attachment #2: testfile.pdf --]
[-- Type: application/pdf, Size: 13989 bytes --]

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

___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://context.aanhet.net
archive  : https://bitbucket.org/phg/context-mirror/commits/
wiki     : http://contextgarden.net
___________________________________________________________________________________

^ permalink raw reply	[flat|nested] 3+ messages in thread