Re: [NTG-context] Fourier and utopia

3 Mar 2018

      On Sat, Mar 3, 2018 at 3:46 PM, Mikael P. Sundqvist 
wrote:
...
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
A small step in the right direction: Blackboard letters and calligraphic
(script) letters seem to work when I add

                { name = "fourier-bb.tfm",  vector = "tex-mb",
skewchar=0x7F },
                { name = "fourier-mcl.tfm",  vector = "tex-sy",
skewchar=0x7F },

to fourier-math.lfg.

/Mikael