Source Browser ?

1local common  = fonts.goodies.load("common-math.lfg")
2local presets = common.mathematics.tweaks.presets
3
4local integral_variants = {  bottomright = -0.20 }
5----- integral_top      = {  topright    =  0.05 }
6local integral_bottom   = {  bottomright = -0.20 }
7
8return {
9    name = "pagella-math",
10    version = "1.00",
11    comment = "Goodies that complement pagella.",
12    author = "Hans Hagen & Mikael Sundqvist",
13    copyright = "ConTeXt development team",
14    mathematics = {
15        parameters = {
16            AccentTopShiftUp                  =   10,
17            FlattenedAccentTopShiftUp         =   20,
18            AccentBaseDepth                   =   80,
19            DelimiterPercent                  =   85,
20            DelimiterShortfall                =  400,
21            DelimiterDisplayPercent           =   90,
22            DelimiterDisplayShortfall         =  400,
23            DisplayOperatorMinHeight          = 1800, -- 1500 in font
24            SuperscriptShiftUp                =  386, -- 354 in font
25            SubscriptShiftDown                =  200, -- 232 in font
26            SubscriptShiftDownWithSuperscript = "1.4*SubscriptShiftDown", -- 1.5* in math-act
27            PrimeShiftUp                      = "1.1*SuperscriptShiftUp",
28            PrimeShiftUpCramped               = "1.1*SuperscriptShiftUp",
29        },
30        tweaks = {
31            aftercopying = {
32                {
33                    tweak    = "version",
34                    expected = "Version 1.632",
35                },
36                {
37                    tweak   = "fixprimes",
38                    factor  = 0.8,
39                },
40                {
41                    tweak    = "replacealphabets",
42                    feature  = "euleroverpagella",
43                    filename = "euler-math.otf",
44                    list     = {
45                        { source = "lowercasenormal",      target = "lowercaseitalic" },
46                        { source = "lowercasebold",        target = "lowercasebolditalic" },
47                        { source = "lowercasegreeknormal", target = "lowercasegreekitalic" },
48                        { source = "lowercasegreekbold",   target = "lowercasegreekbolditalic" },
49                        { source = "uppercasenormal",      target = "uppercaseitalic" },
50                        { source = "uppercasebold",        target = "uppercasebolditalic" },
51                        { source = "uppercasegreeknormal", target = "uppercasegreekitalic" },
52                        { source = "uppercasegreekbold",   target = "uppercasegreekbolditalic" },
53                        { source = "lowercasenormal",      target = "lowercasenormal" },
54                        { source = "lowercasebold",        target = "lowercasebold" },
55                        { source = "lowercasegreeknormal", target = "lowercasegreeknormal" },
56                        { source = "lowercasegreekbold",   target = "lowercasegreekbold" },
57                        { source = "uppercasenormal",      target = "uppercasenormal" },
58                        { source = "uppercasebold",        target = "uppercasebold" },
59                        { source = "uppercasegreeknormal", target = "uppercasegreeknormal" },
60                        { source = "uppercasegreekbold",   target = "uppercasegreekbold" },
61                        { source = "digitsnormal",         target = "digitsnormal" },
62                        --
63                        -- either
64                        --
65                     -- { source = { first = 0x0007B, last = 0x0007D } }, -- { }
66                     -- { source = { first = 0x0005B, last = 0x0005D } }, -- [ ]
67                     -- { source = { first = 0x00028, last = 0x00029 } }, -- ( )
68                     -- { source = { first = 0x02100, last = 0x02BFF } }, -- symbols -- has snippets of {} () []
69                        --
70                        -- or (probably even more)
71                        --
72                        { source = { first = 0x02100, last = 0x0239A } }, -- symbols -- has snippets of {} () []
73                        { source = { first = 0x023B5, last = 0x02BFF } }, -- symbols -- has snippets of {} () []
74                        --
75                        { source = { first = 0x1D400, last = 0x1D7FF } }, -- various alphabets
76                    },
77                },
78                {
79                    tweak = "addmirrors",
80                },
81                {
82                    tweak = "addcomposites",
83                },
84                {
85                    tweak   = "fixoldschool",
86                    feature = "euleroverpagella",
87                },
88                {
89                    tweak   = "replacealphabets",
90                    list    = {
91                        {
92                            source   = { first = 0x02980 }, -- triplebar
93                            filename = "texgyrepagellamathcompanion-regular.otf",
94                        },
95                    },
96                },
97                presets.scripttocalligraphic { },
98                presets.rsfstoscript         { },
99                presets.rsfsuprighttoscript  { },
100                presets.moderntocalligraphic { },
101                presets.eulertocalligraphic  { },
102                presets.xitsarabic           { rscale  = 0.95 },
103                presets.fallbacks            { },
104                presets.moveitalics          { correct = true },
105                presets.moveitalics          { correct = true, letters = true },
106                presets.moveintegrals        { factor  = 1.5  }, -- we need to check the 1.5
107                presets.wipeanchors          { },
108                presets.wipeitalics          { },
109                {
110                    tweak = "checkaccents",
111                },
112                {
113                    tweak = "wipecues",
114                },
115                {
116                    tweak   = "parameters",
117                    feature = "euleroverpagella",
118                    list    = {
119                        RadicalRuleThickness = 54,
120                    }
121                },
122                {
123                    tweak = "setovershoots",
124                    list  = {
125                        {
126                            target       = "uppercasescript",
127                         -- quad         = true, -- to be decided
128                            topovershoot = 0.05,
129                        },
130                        {
131                            target       = "uppercaseboldscript",
132                         -- quad         = true, -- to be decided
133                            topovershoot = 0.05,
134                        },
135                    },
136                },
137                -- Accents are a mess. We migrate the extensibles from the combiners to the base accent
138                -- and then need to tweak the width (which is auto set because it was zero with a large
139                -- accent anchor offset). First we copy and fix.
140                {
141                    tweak = "extendaccents",
142                },
143                {
144                    tweak = "flattenaccents",
145                },
146                {
147                    tweak = "fixaccents",
148                },
149                -- First we set the dimensions of the initial accent which started out as zero but we want
150                -- a proper width.
151--                 {
152--                     tweak = "dimensions",
153--                     list  = {
154--                         [0x00300] = { width = 0.9 }, -- widegrave
155--                         [0x00301] = { width = 0.9 }, -- wideacute
156--                         [0x00302] = { width = 1.4, anchor = 1.20, xoffset =  .10 }, -- widehat
157--                         [0x00303] = { width = 1.4, anchor = 1.20, xoffset =  .10 }, -- widetilde
158--                         [0x00306] = { width = 1.4, anchor = 1.20, xoffset =  .10 }, -- widebreve
159--                         [0x0030A] = { width = 0.9, xoffset = -.0 }, -- widering -- weird this one
160--                         [0x0030C] = { width = 1.4, anchor = 1.20, xoffset = .10 }, -- widecheck
161--                     },
162--                 },
163                -- Then we deal with all offsets and heights in one go. So we treat the initial accent
164                -- as well as the variants here.
165                {
166                    tweak = "dimensions",
167                    list  = {
168                     -- here we want to apply to all
169                        [0x020DB] = { yoffset = -0.01, height = .95, all = true }, -- widedddot : 0x20DB (self)
170                    },
171                },
172                -- We now copy these to the not wide slots so that we can set these to stretch as well,
173                -- if only because it is less confusing and more consistent.
174                {
175                    tweak = "copyaccents",
176                },
177                -- So far for the accents.
178                {
179                    tweak = "radicaldegreeanchors",
180                    list  = {
181                        ["0x221A.parts.bottom"] = { location = "left", hfactor  = 0.0, vfactor  = 1.1 },
182                    }
183                },
184                {
185                    tweak = "fixslashes",
186                },
187                {
188                    tweak = "kerns",
189                    list  = {
190                        [0x002F]                = { topleft  = -0.2,  bottomright = -0.2  },
191                        --
192                        ["0x7D.parts.top"]      = { topright = -0.15,                     }, -- right brace top
193                        ["0x7D.parts.bottom"]   = {                   bottomright = -0.15 }, -- right brace bottom
194                        ["0x7D.variants.*"]     = { topright = -0.15, bottomright = -0.15 }, -- right brace variants
195                        ["0x29.parts.top"]      = { topright = -0.25,                     }, -- right parenthesis top
196                        ["0x29.parts.bottom"]   = {                   bottomright = -0.25 }, -- right parenthesis bottom
197                        ["0x29.variants.*"]     = { topright = -0.2,  bottomright = -0.2  }, -- right parenthesis variants
198                        ["0x221A.parts.top"]    = { topright =  0.2,                      }, -- right radical top
199                        ["0x221A.parts.bottom"] = {                   bottomright =  0.2  }, -- right radical bottom
200                        ["0x221A.variants.*"]   = { topright =  0.2,  bottomright =  0.2  }, -- right radical variants
201                        -- angle
202                        [0x27E9]                = { topright = -0.2,  bottomright = -0.2  },
203                        ["0x27E9.variants.*"]   = { topright = -0.3,  bottomright = -0.3  },
204                        [0x27EB]                = { topright = -0.2,  bottomright = -0.2  },
205                        ["0x27EB.variants.*"]   = { topright = -0.3,  bottomright = -0.3  },
206                        --
207                        [0x0393]                = { bottomright = -0.20, }, -- upright Gamma
208                        --
209                        ["0x222B.parts.bottom"] = { bottomright = -0.20 }, -- int
210                        ["0x222C.parts.bottom"] = { bottomright = -0.15 }, -- iint
211                        ["0x222D.parts.bottom"] = { bottomright = -0.10 }, -- iiint
212                        ["0x2A0C.parts.bottom"] = { bottomright = -0.05 }, -- iiiint
213                    },
214                },
215                presets.addmathkerns { },
216                {
217                    tweak = "checkspacing",
218                },
219                {
220                    tweak = "addscripts",
221                },
222                {
223                    tweak = "addprivates",
224                },
225                {
226                    tweak = "accentdimensions",
227                },
228                {
229                    tweak = "addrules",
230                },
231                {
232                    tweak = "addarrows",
233                },
234--                 {
235--                     tweak   = "addbars",
236--                     advance = 0.2,
237-- variant = 2,
238--                 },
239                {
240                    tweak    = "replacerules",
241                    fraction = { height = .215, yoffset = .785 },
242                    radical  = { height = .215, yoffset = .785, leftoffset = .1, rightoffset = .1 },
243                    stacker  = { height = .215, yoffset = .785 },
244                },
245                -- on the radical we adapt the offset and give some extra height (prevent clipping)
246                {
247                    tweak    = "replacerules",
248                    feature  = "euleroverpagella",
249                    fraction = { height = .15, yoffset = .85 },
250                    radical  = { height = .22, yoffset = .8, leftoffset = .05, rightoffset = .05, leftoverlap = .01 },
251                    stacker  = { height = .15, yoffset = .85 },
252                },
253                {
254                    tweak = "addactuarian",
255                },
256                {
257                    tweak = "addequals",
258                },
259                {
260                    tweak   = "addfourier",
261                    variant = 1,
262                },
263--                 {
264--                     tweak   = "addprimed",
265--                 },
266                {
267                    tweak = "kernpairs",
268                    list = {
269                        -- beware: we kept the italic correction in spite of punctuation class
270                        [0x1D453] = { -- f
271                            [0x3A] = -.1,
272                            [0x3B] = -.1,
273                        },
274                    },
275                },
276                -- this is the mkiv section
277                {
278                    tweak   = "emulatelmtx",
279                    feature = "emulatelmtx",
280                    comment = "this is for mkiv",
281                },
282                {
283                    tweak   = "parameters",
284                    feature = "emulatelmtx",
285                    comment = "this is for mkiv",
286                    list    = {
287                        AccentBaseHeight = 400,
288                    }
289                },
290            },
291        },
292        bigslots = {
293            1, 3, 5, 7
294        },
295        alternates = {
296            dotless = { feature = 'dtls', value = 1, comment = "Mathematical Dotless Forms" },
297        },
298    },
299}
300