1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
|
local dimensions, kerns if CONTEXTLMTXMODE == 0 then
-- local kern_250 = { bottomright = { { kern = -250 } }, force = true }
-- kerns = {
-- [0x1D449] = kern_250, --
-- [0x1D44A] = kern_250, -- 𝑊
-- }
dimensions = {
default = { -- experimental values
[0x02044] = { xoffset = 275, width = 600 },
-- primes
[0xFE932] = { width = 200 },
[0xFE933] = { width = 500 },
[0xFE934] = { width = 800 },
[0xFE935] = { width = 1100 },
-- reverse primes
[0xFE935] = { width = 200 },
[0xFE936] = { width = 500 },
[0xFE937] = { width = 800 },
},
}
end
-- RadicalVerticalGap = 50
-- RadicalDisplayStyleVerticalGap = 175
-- RadicalVerticalGap = 166
-- RadicalDisplayStyleVerticalGap = 345
local function FixRadicalDisplayStyleVerticalGap(value,target,original)
local o = original.mathparameters.RadicalVerticalGap -- 50
return 2 * o * target.parameters.factor
end
return {
name = "lucida-opentype-math",
version = "1.00",
comment = "Goodies that complement lucida opentype.",
author = "Hans Hagen",
copyright = "ConTeXt development team",
mathematics = {
tweaks = {
aftercopying = {
{
tweak = "dimensions",
list = {
-- nothing yet
},
},
{
tweak = "fixprimes",
factor = 0.85,
},
{
tweak = "fakeprimes",
factor = 0.75,
},
{
tweak = "checkspacing",
},
{
tweak = "addscripts",
},
},
},
parameters = {
RadicalDisplayStyleVerticalGap = FixRadicalDisplayStyleVerticalGap,
},
alternates = {
italic = { feature = 'ss01', value = 1, comment = "Mathematical Alternative Lowercase Italic" },
arrow = { feature = 'ss02', value = 1, comment = "Mathematical Alternative Smaller Arrows" },
operator = { feature = 'ss03', value = 1, comment = "Mathematical Alternative Smaller Operators" },
calligraphic = { feature = 'ss04', value = 1, comment = "Mathematical Alternative Calligraphic Characters" },
zero = { feature = 'ss05', value = 1, comment = "Mathematical Alternative Zero" },
partial = { feature = 'ss20', value = 1, comment = "Mathematical Alternative Upright Partial Differential" },
},
--
-- experimental fixes for mkiv:
--
dimensions = dimensions,
kerns = kerns,
},
}
|
