mult-mps.lua /size: 8824 b    last modification: 2020-07-01 14:35
1
return
{
2
tex
=
{
3
"
btex
"
,
"
etex
"
,
"
verbatimtex
"
,
4
}
,
5
shortcuts
=
{
6
"
..
"
,
"
...
"
,
"
--
"
,
"
---
"
,
"
&
"
,
"
\\
"
,
7
}
,
8
primitives
=
{
-- to be checked
9
"
charcode
"
,
"
day
"
,
"
linecap
"
,
"
linejoin
"
,
"
miterlimit
"
,
"
month
"
,
"
pausing
"
,
10
"
prologues
"
,
"
showstopping
"
,
"
time
"
,
"
tracingcapsules
"
,
"
tracingchoices
"
,
"
mpprocset
"
,
11
"
tracingcommands
"
,
"
tracingequations
"
,
"
tracinglostchars
"
,
12
"
tracingmacros
"
,
"
tracingonline
"
,
"
tracingoutput
"
,
"
tracingrestores
"
,
13
"
tracingspecs
"
,
"
tracingstats
"
,
"
tracingtitles
"
,
"
truecorners
"
,
14
"
warningcheck
"
,
"
year
"
,
15
"
false
"
,
"
nullpicture
"
,
"
pencircle
"
,
"
penspec
"
,
"
true
"
,
16
"
and
"
,
"
angle
"
,
"
arclength
"
,
"
arctime
"
,
"
ASCII
"
,
"
boolean
"
,
"
bot
"
,
17
"
char
"
,
"
color
"
,
"
cosd
"
,
"
cycle
"
,
"
decimal
"
,
"
directiontime
"
,
"
floor
"
,
"
fontsize
"
,
18
"
hex
"
,
"
infont
"
,
"
intersectiontimes
"
,
"
known
"
,
"
void
"
,
"
length
"
,
"
llcorner
"
,
19
"
lrcorner
"
,
"
makepath
"
,
"
makepen
"
,
"
mexp
"
,
"
mlog
"
,
"
normaldeviate
"
,
"
not
"
,
20
"
numeric
"
,
"
oct
"
,
"
odd
"
,
"
or
"
,
"
path
"
,
"
pair
"
,
"
pen
"
,
"
penoffset
"
,
"
picture
"
,
"
point
"
,
21
"
postcontrol
"
,
"
precontrol
"
,
"
reverse
"
,
"
rotated
"
,
"
scaled
"
,
22
"
shifted
"
,
"
sind
"
,
"
slanted
"
,
"
sqrt
"
,
"
str
"
,
"
string
"
,
"
subpath
"
,
"
substring
"
,
23
"
transform
"
,
"
transformed
"
,
"
ulcorner
"
,
"
uniformdeviate
"
,
"
unknown
"
,
24
"
urcorner
"
,
"
xpart
"
,
"
xscaled
"
,
"
xxpart
"
,
"
xypart
"
,
"
ypart
"
,
"
yscaled
"
,
"
yxpart
"
,
25
"
yypart
"
,
"
zscaled
"
,
26
"
addto
"
,
"
clip
"
,
"
input
"
,
"
interim
"
,
"
let
"
,
"
newinternal
"
,
"
save
"
,
"
setbounds
"
,
"
setgroup
"
,
27
"
shipout
"
,
"
show
"
,
"
showdependencies
"
,
"
showtoken
"
,
"
showvariable
"
,
28
"
special
"
,
29
"
begingroup
"
,
"
endgroup
"
,
"
of
"
,
"
curl
"
,
"
tension
"
,
"
and
"
,
"
controls
"
,
30
"
interpath
"
,
"
on
"
,
"
off
"
,
31
"
def
"
,
"
vardef
"
,
"
enddef
"
,
"
expr
"
,
"
suffix
"
,
"
text
"
,
"
primary
"
,
"
secondary
"
,
32
"
tertiary
"
,
"
primarydef
"
,
"
secondarydef
"
,
"
tertiarydef
"
,
33
"
randomseed
"
,
"
also
"
,
"
contour
"
,
"
doublepath
"
,
34
"
withcolor
"
,
"
withcmykcolor
"
,
"
withpen
"
,
35
"
dashed
"
,
36
"
envelope
"
,
37
"
if
"
,
"
else
"
,
"
elseif
"
,
"
fi
"
,
"
for
"
,
"
endfor
"
,
"
forever
"
,
"
exitif
"
,
"
within
"
,
38
"
forsuffixes
"
,
"
step
"
,
"
until
"
,
39
"
charlist
"
,
"
extensible
"
,
"
fontdimen
"
,
"
headerbyte
"
,
"
kern
"
,
"
ligtable
"
,
40
"
boundarychar
"
,
"
chardp
"
,
"
charext
"
,
"
charht
"
,
"
charic
"
,
"
charwd
"
,
"
designsize
"
,
41
"
fontmaking
"
,
"
charexists
"
,
42
"
cullit
"
,
"
currenttransform
"
,
"
gfcorners
"
,
"
grayfont
"
,
"
hround
"
,
43
"
imagerules
"
,
"
lowres_fix
"
,
"
nodisplays
"
,
"
notransforms
"
,
"
openit
"
,
44
"
displaying
"
,
"
currentwindow
"
,
"
screen_rows
"
,
"
screen_cols
"
,
45
"
pixels_per_inch
"
,
"
cull
"
,
"
display
"
,
"
openwindow
"
,
"
numspecial
"
,
46
"
totalweight
"
,
"
autorounding
"
,
"
fillin
"
,
"
proofing
"
,
"
tracingpens
"
,
47
"
xoffset
"
,
"
chardx
"
,
"
granularity
"
,
"
smoothing
"
,
"
turningcheck
"
,
"
yoffset
"
,
48
"
chardy
"
,
"
hppp
"
,
"
tracingedges
"
,
"
vppp
"
,
49
"
extra_beginfig
"
,
"
extra_endfig
"
,
"
mpxbreak
"
,
50
"
endinput
"
,
51
"
message
"
,
"
delimiters
"
,
"
turningnumber
"
,
"
errmessage
"
,
52
"
scantokens
"
,
"
end
"
,
"
outer
"
,
"
inner
"
,
"
write
"
,
"
to
"
,
"
readfrom
"
,
"
closefrom
"
,
53
"
withprescript
"
,
"
withpostscript
"
,
54
"
top
"
,
"
bot
"
,
"
lft
"
,
"
rt
"
,
"
ulft
"
,
"
urt
"
,
"
llft
"
,
"
lrt
"
,
55
--
56
"
redpart
"
,
"
greenpart
"
,
"
bluepart
"
,
57
"
cyanpart
"
,
"
magentapart
"
,
"
yellowpart
"
,
58
"
blackpart
"
,
59
"
prescriptpart
"
,
"
postscriptpart
"
,
60
"
rgbcolor
"
,
"
cmykcolor
"
,
-- "greycolor", "graycolor",
61
"
colormodel
"
,
"
graypart
"
,
"
greypart
"
,
"
greycolor
"
,
"
graycolor
"
,
62
"
dashpart
"
,
"
penpart
"
,
63
-- "colorpart",
64
"
stroked
"
,
"
filled
"
,
"
textual
"
,
"
clipped
"
,
"
bounded
"
,
"
pathpart
"
,
65
"
expandafter
"
,
66
"
minute
"
,
"
hour
"
,
67
"
outputformat
"
,
"
outputtemplate
"
,
"
filenametemplate
"
,
"
fontmapfile
"
,
"
fontmapline
"
,
68
"
fontpart
"
,
"
fontsize
"
,
"
glyph
"
,
"
restoreclipcolor
"
,
"
troffmode
"
,
69
--
70
"
runscript
"
,
"
maketext
"
,
"
numbersystem
"
,
71
}
,
72
commands
=
{
73
"
upto
"
,
"
downto
"
,
74
"
beginfig
"
,
"
endfig
"
,
75
"
beginglyph
"
,
"
endglyph
"
,
-- actually a mult-fun one
76
"
rotatedaround
"
,
"
reflectedabout
"
,
77
"
arrowhead
"
,
78
"
currentpen
"
,
"
currentpicture
"
,
"
cuttings
"
,
79
"
defaultfont
"
,
"
extra_beginfig
"
,
"
extra_endfig
"
,
80
"
down
"
,
81
"
evenly
"
,
"
fullcircle
"
,
"
halfcircle
"
,
"
identity
"
,
"
in
"
,
"
left
"
,
82
"
pensquare
"
,
"
penrazor
"
,
"
penspec
"
,
83
"
origin
"
,
"
quartercircle
"
,
"
right
"
,
84
"
unitsquare
"
,
"
up
"
,
"
withdots
"
,
85
"
abs
"
,
"
bbox
"
,
"
ceiling
"
,
"
center
"
,
"
cutafter
"
,
"
cutbefore
"
,
"
dir
"
,
86
"
directionpoint
"
,
"
div
"
,
"
dotprod
"
,
"
intersectionpoint
"
,
"
inverse
"
,
"
mod
"
,
87
"
round
"
,
"
unitvector
"
,
"
whatever
"
,
88
"
cutdraw
"
,
"
draw
"
,
"
drawarrow
"
,
"
drawdblarrow
"
,
"
fill
"
,
"
filldraw
"
,
"
drawdot
"
,
89
"
loggingall
"
,
"
interact
"
,
"
tracingall
"
,
"
tracingnone
"
,
90
"
pickup
"
,
91
"
undraw
"
,
"
unfill
"
,
"
unfilldraw
"
,
92
"
buildcycle
"
,
"
dashpattern
"
,
"
decr
"
,
"
dotlabel
"
,
"
dotlabels
"
,
"
drawoptions
"
,
93
"
incr
"
,
"
label
"
,
"
labels
"
,
"
max
"
,
"
min
"
,
"
thelabel
"
,
"
z
"
,
94
"
beginchar
"
,
"
blacker
"
,
"
capsule_end
"
,
"
change_width
"
,
95
"
define_blacker_pixels
"
,
"
define_corrected_pixels
"
,
96
"
define_good_x_pixels
"
,
"
define_good_y_pixels
"
,
97
"
define_horizontal_corrected_pixels
"
,
"
define_pixels
"
,
98
"
define_whole_blacker_pixels
"
,
"
define_whole_pixels
"
,
99
"
define_whole_vertical_blacker_pixels
"
,
100
"
define_whole_vertical_pixels
"
,
"
endchar
"
,
"
extra_beginchar
"
,
101
"
extra_endchar
"
,
"
extra_setup
"
,
"
font_coding_scheme
"
,
102
"
clearxy
"
,
"
clearit
"
,
"
clearpen
"
,
"
shipit
"
,
103
"
font_extra_space
"
,
104
"
exitunless
"
,
105
"
relax
"
,
"
hide
"
,
"
gobble
"
,
"
gobbled
"
,
"
stop
"
,
106
"
blankpicture
"
,
107
"
counterclockwise
"
,
"
tensepath
"
,
"
takepower
"
,
"
direction
"
,
108
"
softjoin
"
,
-- "magstep",
109
"
makelabel
"
,
-- "laboff",
110
"
rotatedabout
"
,
"
flex
"
,
"
superellipse
"
,
"
image
"
,
111
"
nullpen
"
,
"
savepen
"
,
"
clearpen
"
,
"
penpos
"
,
"
penlabels
"
,
-- "clear_pen_memory",
112
"
range
"
,
"
thru
"
,
113
"
z
"
,
"
laboff
"
,
114
"
bye
"
,
115
--
116
"
red
"
,
"
green
"
,
"
blue
"
,
"
cyan
"
,
"
magenta
"
,
"
yellow
"
,
"
black
"
,
"
white
"
,
"
background
"
,
117
--
118
"
mm
"
,
"
pt
"
,
"
dd
"
,
"
bp
"
,
"
cm
"
,
"
pc
"
,
"
cc
"
,
"
in
"
,
119
--
120
"
triplet
"
,
"
quadruplet
"
,
"
totransform
"
,
"
bymatrix
"
,
121
--
122
}
,
123
internals
=
{
-- we need to remove duplicates above
124
--
125
"
mitered
"
,
"
rounded
"
,
"
beveled
"
,
"
butt
"
,
"
squared
"
,
126
"
eps
"
,
"
epsilon
"
,
"
infinity
"
,
127
"
bboxmargin
"
,
128
"
ahlength
"
,
"
ahangle
"
,
129
"
labeloffset
"
,
"
dotlabeldiam
"
,
130
"
defaultpen
"
,
"
defaultscale
"
,
131
"
join_radius
"
,
132
"
charscale
"
,
-- actually a mult-fun one
133
--
134
"
inicatcoderegime
"
,
"
texcatcoderegime
"
,
"
luacatcoderegime
"
,
"
notcatcoderegime
"
,
135
"
vrbcatcoderegime
"
,
"
prtcatcoderegime
"
,
"
ctxcatcoderegime
"
,
"
txtcatcoderegime
"
,
136
"
catcoderegime
"
,
137
--
138
"
ditto
"
,
"
EOF
"
,
-- maybe also down etc
139
--
140
"
pen_lft
"
,
"
pen_rt
"
,
"
pen_top
"
,
"
pen_bot
"
,
-- "pen_count_",
141
}
,
142
metafont
=
{
143
-- :: =: =:| =:|> |=: |=:> |=:| |=:|> |=:|>> ||:
144
"
autorounding
"
,
"
beginchar
"
,
"
blacker
"
,
"
boundarychar
"
,
"
capsule_def
"
,
145
"
capsule_end
"
,
"
change_width
"
,
"
chardp
"
,
"
chardx
"
,
"
chardy
"
,
"
charexists
"
,
146
"
charext
"
,
"
charht
"
,
"
charic
"
,
"
charlist
"
,
"
charwd
"
,
"
cull
"
,
"
cullit
"
,
147
"
currenttransform
"
,
"
currentwindow
"
,
"
define_blacker_pixels
"
,
148
"
define_corrected_pixels
"
,
"
define_good_x_pixels
"
,
"
define_good_y_pixels
"
,
149
"
define_horizontal_corrected_pixels
"
,
"
define_pixels
"
,
150
"
define_whole_blacker_pixels
"
,
"
define_whole_pixels
"
,
151
"
define_whole_vertical_blacker_pixels
"
,
"
define_whole_vertical_pixels
"
,
152
"
designsize
"
,
"
display
"
,
"
displaying
"
,
"
endchar
"
,
"
extensible
"
,
"
extra_beginchar
"
,
153
"
extra_endchar
"
,
"
extra_setup
"
,
"
fillin
"
,
"
font_coding_scheme
"
,
154
"
font_extra_space
"
,
"
font_identifier
"
,
"
font_normal_shrink
"
,
155
"
font_normal_space
"
,
"
font_normal_stretch
"
,
"
font_quad
"
,
"
font_size
"
,
156
"
font_slant
"
,
"
font_x_height
"
,
"
fontdimen
"
,
"
fontmaking
"
,
"
gfcorners
"
,
157
"
granularity
"
,
"
grayfont
"
,
"
headerbyte
"
,
"
hppp
"
,
"
hround
"
,
"
imagerules
"
,
158
"
italcorr
"
,
"
kern
"
,
"
labelfont
"
,
"
ligtable
"
,
"
lowres_fix
"
,
"
makebox
"
,
159
"
makegrid
"
,
"
maketicks
"
,
"
mode_def
"
,
"
mode_setup
"
,
"
nodisplays
"
,
160
"
notransforms
"
,
"
numspecial
"
,
"
o_correction
"
,
"
openit
"
,
"
openwindow
"
,
161
"
pixels_per_inch
"
,
"
proofing
"
,
"
proofoffset
"
,
"
proofrule
"
,
"
proofrulethickness
"
,
162
"
rulepen
"
,
"
screenchars
"
,
"
screenrule
"
,
"
screenstrokes
"
,
"
screen_cols
"
,
"
screen_rows
"
,
163
"
showit
"
,
"
slantfont
"
,
"
smode
"
,
"
smoothing
"
,
"
titlefont
"
,
"
totalweight
"
,
164
"
tracingedges
"
,
"
tracingpens
"
,
"
turningcheck
"
,
"
unitpixel
"
,
"
vppp
"
,
"
vround
"
,
165
"
xoffset
"
,
"
yoffset
"
,
166
}
,
167
disabled
=
{
168
"
verbatimtex
"
,
"
troffmode
"
169
}
170
}
171