summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/fonts/source/lh
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-07-01 22:18:57 +0000
committerKarl Berry <karl@freefriends.org>2006-07-01 22:18:57 +0000
commit12e838406005e7d86054c1b4a605be7eb2f49080 (patch)
tree5f2ca548c1fb8a1e28eb34b3ad57396471ff7902 /Master/texmf-dist/fonts/source/lh
parenta8fc2d59858b6da806b0b23d7b41e2c8ea801c2a (diff)
lh fonts 3.5d update
git-svn-id: svn://tug.org/texlive/trunk@1738 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/fonts/source/lh')
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/fikparm.mf107
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lcyrbeg.mf21
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lcyrdefs.mf140
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/ldbroman.mf184
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/ldcsc.mf10
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/ldroman.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/ldtexset.mf152
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/ldtextit.mf18
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/ldtitle.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lebroman.mf82
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lecsc.mf16
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/leroman.mf18
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/letextit.mf16
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgcspl.mf183
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgcsplff.mf192
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgcyracc.mf18
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgcyri.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgcyrl.mf9
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgcyrsp.mf11
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgcyrsym.mf71
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgcyru.mf9
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgengsym.mf9
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgidigit.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgilig.mf233
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgiligff.mf242
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgitalp.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgocyrac.mf140
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgpunct.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgrdigit.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgrlig.mf175
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgrligff.mf184
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgromp.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgrusi.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgrusl.mf12
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgrusu.mf12
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2comi.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2coml.mf11
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2comu.mf13
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf22
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2lol.mf136
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2lou.mf84
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2slvi.mf388
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2slvl.mf37
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2slvu.mf38
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2upi.mf10
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2upl.mf124
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lgt2upu.mf83
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lkligtbl.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/llbligtb.mf231
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/llcligtb.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lliligtb.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/llmligtb.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/llrligtb.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/llvligtb.mf20
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lwnligs.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lxpseudo.mf27
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lycyracc.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/lypseudo.mf20
-rw-r--r--Master/texmf-dist/fonts/source/lh/base/nodraw.mf12
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/ccb10.mf1
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/ccbx10.mf1
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/ccbx5.mf1
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/ccbx6.mf1
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/ccbx7.mf1
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/ccbx8.mf1
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/ccbx9.mf1
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/ccbxsl10.mf1
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/ccbxti10.mf1
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/concb10pt.mf80
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/concbx10pt.mf80
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/concbx12pt.mf80
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/concbx5pt.mf80
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/concbx6pt.mf80
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/concbx7pt.mf80
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/concbx8pt.mf80
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/concbx9pt.mf80
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/concbxti10.mf78
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/concc9pt.mf75
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/eob10.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/eobx10.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/eobx5.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/eobx6.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/eobx7.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/eobx8.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/eobx9.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/eobxsl10.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/eobxti10.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/eoslc9.mf14
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-conc/readme.txt9
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/ilhcsc10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/ilhtt8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/illhss8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/illhssb8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/illhssi8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr17.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr9.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrbx10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl17.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl9.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhccsc10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcodes.mf87
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcsl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcsl9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcslc9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhcti10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhliker.mf1197
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhsltl10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/lhtl10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/llhss8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/llhssb8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-lcy/llhssi8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnss8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnssb8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnssi8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/iwncsc10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/iwntt8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/lwnss8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/lwnssb8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/lwnssi8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr17.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr9.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrbx10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl17.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl9.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnccsc10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncodes.mf103
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncr5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncr6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncr7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncsl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncsl9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncslc9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wncti10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnliker.mf1543
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wnsltl10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-ot2/wntl10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/ilalb8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/ilali8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/ilalo8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/ilalq8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/ilaltt8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labbx10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labmo10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labmo17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labmo8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labmo9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labmr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labmr17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labmr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labmr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labso10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labso17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labso8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labso9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labsr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labsr17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labsr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labsr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labtl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/labto10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/lacodes.mf158
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/lalb8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/lali8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laliker.mf1616
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/lalo8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/lalq8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laltt8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laocc10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laorm10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laorm5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laorm6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laorm7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laorm8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laorm9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laosl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laosl5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laosl6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laosl7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laosl8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laosl9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laoti10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/laqi8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/lasq8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2a/lassdc10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/ilblb8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/ilbli8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/ilblo8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/ilblq8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/ilbltt8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbbx10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbtl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbbto10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbcodes.mf158
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lblb8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbli8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbliker.mf1359
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lblo8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lblq8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbltt8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbocc10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lborm10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lborm5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lborm6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lborm7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lborm8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lborm9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lboti10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbqi8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbsq8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2b/lbssdc10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/ilclb8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/ilcli8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/ilclo8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/ilclq8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/ilcltt8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbbx10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbtl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcbto10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lccodes.mf158
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lclb8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcli8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcliker.mf1243
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lclo8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lclq8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcltt8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcocc10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcoti10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcqi8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcsq8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2c/lcssdc10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ildlb8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ildli8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ildlo8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ildlq8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ildltt8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbbx10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbtl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldbto10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldcodes.mf163
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldlb8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldli8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldliker.mf1572
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldlo8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldlq8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldltt8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldocc10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldoti10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldqi8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldsq8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-t2d/ldssdc10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/irxlb8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/irxli8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/irxlo8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/irxlq8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/irxltt8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbbx10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbso10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbso17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbso8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbso9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr17.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbtl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxbto10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxcodes.mf215
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxlb8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxli8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxliker.mf2304
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxlo8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxlq8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxltt8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxocc10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxorm10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxorm5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxorm6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxorm7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxorm8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxorm9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxosl10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxosl5.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxosl6.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxosl7.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxosl8.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxosl9.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxoti10.mf7
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxqi8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxsq8.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/lh-x2/rxssdc10.mf6
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgbersta.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgberstb.mf10
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgberstc.mf10
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgcacci.mf54
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgcaccl.mf83
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgcaccu.mf99
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgcmodi.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.mf16
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgcmodu.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgcvaci.mf51
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgcvacl.mf33
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgcvacu.mf9
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgt2slxi.mf (renamed from Master/texmf-dist/fonts/source/lh/base/lgt2slxi.mf)8
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgt2slxl.mf (renamed from Master/texmf-dist/fonts/source/lh/base/lgt2slxl.mf)24
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgt2slxu.mf (renamed from Master/texmf-dist/fonts/source/lh/base/lgt2slxu.mf)26
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgunici.mf100
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgunicl.mf221
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lgunicu.mf232
-rw-r--r--Master/texmf-dist/fonts/source/lh/nont2/lhberest.mf10
-rw-r--r--Master/texmf-dist/fonts/source/lh/specific/lgcrusl.mf8
-rw-r--r--Master/texmf-dist/fonts/source/lh/specific/lgcyrcl.mf763
-rw-r--r--Master/texmf-dist/fonts/source/lh/specific/lgcyrcu.mf723
-rw-r--r--Master/texmf-dist/fonts/source/lh/specific/lgnoncl.mf465
-rw-r--r--Master/texmf-dist/fonts/source/lh/specific/lgnoncu.mf437
-rw-r--r--Master/texmf-dist/fonts/source/lh/specific/lgrucl.mf16
-rw-r--r--Master/texmf-dist/fonts/source/lh/specific/lgrucu.mf16
419 files changed, 6478 insertions, 15417 deletions
diff --git a/Master/texmf-dist/fonts/source/lh/base/fikparm.mf b/Master/texmf-dist/fonts/source/lh/base/fikparm.mf
index dcd04088cd1..7ce793a6b50 100644
--- a/Master/texmf-dist/fonts/source/lh/base/fikparm.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/fikparm.mf
@@ -4,13 +4,14 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
+%
%
% Content:
%
@@ -45,9 +46,9 @@
%
-% defining LHver_check 3.4
+% defining LHver_check 3.5
%
-lh_maj_ver:=3; lh_min_ver:=4; % version identification
+lh_maj_ver:=3; lh_min_ver:=5; % version identification
def LHver_check(expr e,f)=
if e>lh_maj_ver: message "LH font warning: Obsolete base";
elseif e<lh_maj_ver: message "LH font warning: File from old release found";
@@ -66,9 +67,12 @@ if unknown fonteq:
def fonteq=2 enddef;
fi
-if unknown cmbright:
- if unknown ebbase: def cmbright=false enddef;
- else: def cmbright=true enddef;
+% -- set boolean for cmbright fonts (vvv)
+if unknown cmbright: boolean cmbright;
+ if unknown ebbase:
+ cmbright:=false;
+ ebbase:=0;
+ else: cmbright:=true;
fi;
fi
@@ -121,11 +125,14 @@ unic:=false;
boolean is_ogonek; is_ogonek=false;
% -- `true' not supported in current version
-boolean specific,kapitel;
-specific=false;
-kapitel:=false;
if unknown concrete:
- boolean concrete; concrete=false;
+ boolean concrete; concrete:=false;
+fi
+if unknown specific:
+ boolean specific; specific:=false;
+fi
+if unknown kapitel:
+ boolean kapitel; kapitel:=false;
fi
% -- set flags for ligature and kerning stuff
@@ -171,16 +178,9 @@ fi
boolean altcoding;
altcoding:= if wncoding or vfcoding: false else: true fi;
-% -- start base file
-if not cmbright:
-if (genmode="ex") or (genmode="ec"):
- if unknown exbase: input exbase; fi
-else:
- if unknown cmbase: input cmbase; fi
-fi
-fi
-
-if unknown ligs: newinternal ligs; fi % exbase, ebbase
+% -- start base file:
+% exbase won't loaded for run in small memory systems
+if unknown cmbase: input cmbase; fi
% -- additional macros for ec compatible mode
input lcyrbeg;
@@ -221,35 +221,39 @@ vardef use_driver @# (expr fonteq) =
ii:=ii-1;
ss:=substring(length(param_base)-ii,length(param_base)) of param_base;
if (genmode="ex") or (genmode="ec"):
-if concrete:
- gensize:=scantokens(ss);
- ss:="input eo"& (substring(fonteq+1,length(param_base)) of param_base);
-elseif cmbright:
- %gensize:=scantokens(ss);
- ss:="input eb"& (substring(fonteq+1,length(param_base)) of param_base);
-else:
+ exbase:=1; %!!! THAT'S TRICK: we don't need exbase at all
+% added flag for concrete
+ if concrete:
+ gensize:=scantokens(ss);
+ ss:="input eo"& (substring(fonteq+1,length(param_base)) of param_base);
+ elseif cmbright:
+ exbase:=1; %!!! THAT'S TRICK: we don't need exbase at all
+ gensize:=scantokens(ss);
+ ss:="input eb"& (substring(fonteq+1,length(param_base)) of param_base);
+ else:
% - set gensize for ec parameter files
- if (ss="8") or (ss="10"): % for EC slitex fonts
- gensize:=scantokens(ss);
- ss:="input "& (substring(0,fonteq-2) of param_base) & "ec"
- & (substring(fonteq,length(param_base)) of param_base);
- else:
- gensize:=scantokens(ss)/100;
- ss:="input ec" & (substring(fonteq,length(param_base)-ii) of param_base);
- fi
-fi
+ if (ss="8") or (ss="10"): % for EC slitex fonts
+ gensize:=scantokens(ss);
+ ss:="input "& (substring(0,fonteq-2) of param_base) & "ec"
+ & (substring(fonteq,length(param_base)) of param_base);
+ else:
+ gensize:=scantokens(ss)/100;
+ ss:="input ec" & (substring(fonteq,length(param_base)-ii) of param_base);
+ fi
+ fi
else:
% - set gensize for cm parameter files
- gensize:=scantokens(ss);
-if concrete:
- ss:="input "& "cc" & (substring(fonteq+1,length(param_base)) of param_base);
-else:
-% HERE could be cm or cc genmode: vvvvvvv
- ss:="input "& (substring(0,fonteq-2) of param_base) & genmode
- & (substring(fonteq,length(param_base)) of param_base);
-fi
+ gensize:=scantokens(ss);
+% added flag for concrete
+ if concrete:
+ ss:="input cc"& (substring(fonteq+1,length(param_base)) of param_base);
+ else:
+% HERE could be cm genmode: vvvvvvv
+ ss:="input "& (substring(0,fonteq-2) of param_base) & genmode
+ & (substring(fonteq,length(param_base)) of param_base);
+ fi
fi
-%show gensize,ss;
+ show gensize,ss;
%
% - set font_identifier
numeric true_pt#; true_pt#=pt#;
@@ -264,10 +268,10 @@ fi
% - input driver file
scantokens("input "&
if genmode="ex":
- if driver_name= "exroman" : "leroman"
+ if driver_name= "exroman" : "leroman" % also cmbright&ec (vvv)
+ elseif driver_name= "ebroman" : "lebroman" % cmbright&ec (vvv)
elseif driver_name= "extextit": "letextit"
elseif driver_name= "excsc" : "lecsc"
- elseif driver_name= "ebroman" : "leroman"
else: driver_name fi
elseif genmode="ec":
if driver_name= "exroman" : "ldroman"
@@ -276,11 +280,12 @@ fi
else: driver_name fi
else:
if driver_name= "roman" : "ldroman"
- elseif driver_name= "sroman" : "ldroman" % slitex must be true
- elseif driver_name= "broman" : "ldroman"
+ elseif driver_name= "sroman" : "ldroman" % slitex must be true
+ elseif driver_name= "broman" : "ldbroman" % cmbright (vvv)
elseif driver_name= "textit" : "ldtextit"
elseif driver_name= "title" : "ldtitle"
elseif driver_name= "csc" : "ldcsc"
+ elseif driver_name= "texset" : "ldtexset"
else: driver_name fi fi);
enddef;
diff --git a/Master/texmf-dist/fonts/source/lh/base/lcyrbeg.mf b/Master/texmf-dist/fonts/source/lh/base/lcyrbeg.mf
index b959d126440..2274cf207fc 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lcyrbeg.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lcyrbeg.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -26,7 +26,7 @@
% ** macros for accenting moved in file lcyrdefs.mf
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
if unknown slitex:
boolean slitex; slitex := false; fi % |true| simulates behaviour of |sroman|
@@ -38,8 +38,16 @@ if unknown suppress_i_dot:
boolean suppress_i_dot; suppress_i_dot :=false; fi
if unknown hach_sharp:
boolean hach_sharp; hach_sharp:=false; fi
-if unknown classic_sharp_s:
- boolean classic_sharp_s; classic_sharp_s:=false; fi % Chooses shape of sharp s
+if unknown classic_sharp_s: boolean classic_sharp_s;
+ if ebbase=1:
+ classic_sharp_s:=true; % Chooses shape of sharp s (CMBRIGHT)
+ else:
+ classic_sharp_s:=false; % Chooses shape of sharp s
+ fi
+fi % Chooses shape of sharp s
+if unknown true_mono:
+ boolean true_mono; true_mono:=false; % |true| forces ligatures to monowidth
+fi
if unknown knuthian_ae:
boolean knuthian_ae; knuthian_ae:=false; fi % |true| reproduces cm italic \ae
if unknown fancy_thorn:
@@ -48,6 +56,7 @@ if unknown is_small_cap:
boolean is_small_cap; is_small_cap:=false; fi
tracingstats:=1; % Print statistics at the end of run
+
%
%
%
diff --git a/Master/texmf-dist/fonts/source/lh/base/lcyrdefs.mf b/Master/texmf-dist/fonts/source/lh/base/lcyrdefs.mf
index 8f7796d668f..bf1f279ed0e 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lcyrdefs.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lcyrdefs.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=2
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -36,14 +36,14 @@
% (borrowed from exaccess)
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
let lhchar=\; % `|lhchar|' should precede each character
-%if roman_ec: % for inputed exrullett.mf and exrllett.mf
-% def version_check(expr e,f) = enddef;
-% let ecchar=\;
-%fi;
+if roman_ec: % for inputed exrullett.mf and exrllett.mf
+ def version_check(expr e,f) = enddef;
+ let ecchar=\;
+fi;
%
% defining cyrchar stuff - chars with floating codes
@@ -86,7 +86,7 @@ if unknown acc_height#: % emulation ecfonts parameter file
fi
-sbeak# := (if serifs: max(beak#,3/4desc_depth#) else: desc_depth# fi) /1.2;
+sbeak# := (if serifs: max(beak#,3/4desc_depth#) else: desc_depth# fi) /1.2;
cap_sbeak# := if serifs: max(beak#,3/4desc_depth#) else: desc_depth# fi;
%
@@ -95,20 +95,12 @@ cap_sbeak# := if serifs: max(beak#,3/4desc_depth#) else: desc_depth# fi;
%
let font_setup_ = font_setup;
-if unknown true_mono:
- boolean true_mono;
- if monospace: true_mono:=true; % |true| forces ligatures to monowidth
- else: true_mono:=false; %
- fi
-fi
-
def font_setup =
font_setup_;
define_whole_blacker_pixels(acc_height);
define_pixels(cap_sbeak,sbeak);
pickup pencircle scaled min(hair,vair);
extra_rule.nib:=savepen;
- if true_mono: let normal_adjust_fit=mono_adjust_fit; fi
enddef;
%
@@ -120,10 +112,10 @@ cyrcaph.cyrcaph = true;
%
% advanced cmbase's definitions: macros for cyr letter's drawing
-% set_bar_axis, bar_stroke
-% cyr_serif, l_serif, r_serif
-% cyrbulb
-% cbreve
+% set_bar_axis, bar_stroke
+% cyr_serif, l_serif, r_serif
+% cyrbulb
+% cbreve
% sets for bar axis in lowercase letters
%
@@ -198,14 +190,66 @@ vardef cyr_serif(suffix $,$$,@) % serif at |z$| for stroke from |z$$|
...{-jut,0}z@4--(x@4,y@1)--z@5--z@6--cycle; % descender
else:
filldraw z@6--z@5--(x@4,y@1)--z@4{jut,0}
- ...(beak_darkness+eps)[beak_corner,.5[z@3,z@4]]
- ...{z@2-z@1}z@3--z@2--z@1{-jut,0}
- ...(darkness+eps)[corner,.5[z@1,z@0]]{z@0-z@1}
- ...{z$$-z$}z@0--cycle; % descender
+ ...(beak_darkness+eps)[beak_corner,.5[z@3,z@4]]
+ ...{z@2-z@1}z@3--z@2--z@1{-jut,0}
+ ...(darkness+eps)[corner,.5[z@1,z@0]]{z@0-z@1}
+ ...{z$$-z$}z@0--cycle; % descender
fi
labels (@0,@1,@2,@3,@4,@5,@6);
enddef;
+vardef siam_serif(suffix $,$$,@) % serif at |z$| for stroke from |z$$|
+ (expr darkness,jut) =
+ if serifs:
+ pickup crisp.nib;
+ else:
+ pickup pencircle scaled (3/5[fine,crisp]+eps);
+ fi
+ numeric bracket_height,light_stem; pair downward;
+ bracket_height=bracket;
+ light_stem=hround (max(tiny.breadth,3/5[fudged.hair,fudged.stem]));
+ % for cyr_serif always |y$|<|y$$|
+ if (y$>y$$): errmessage ("`cyr_serif' placed only on the bottom"); fi
+ downward=z$-z$$;
+ y@0=min(y$+bracket_height,y$$)+eps;
+ top y@1-slab-eps=bot y@4+eps=tiny.bot y$;
+ if y@1>y@0: y@0:=y@1+eps; fi
+ bot y@2=bot y@3=vround(-d);
+ y@5=y@1; y@6=y@0;
+ z@5=whatever[z$,z$$]; z@6=whatever[z$,z$$];
+ if jut<0:
+ z@0+penoffset downward of currentpen =
+ z$l+penoffset downward of pen_[tiny.nib]+whatever*downward;
+ lft x@1=hround (tiny.lft x$l+jut)-eps;
+ if x@6<x@0+eps: x@6:=x@0+eps; fi
+ lft x@2=rt x@3-light_stem-eps=hround (lft x@1+beak_jut)-eps;
+ x@4=x$+.5(fudged.stem-3stem_corr-tiny)+eps;
+ else:
+ z@0-penoffset downward of currentpen =
+ z$r-penoffset downward of pen_[tiny.nib]-whatever*downward;
+ rt x@1=hround (tiny.rt x$r+jut)+eps;
+ if x@6>x@0-eps: x@6:=x@0-eps; fi
+ rt x@2=lft x@3+light_stem+eps=x@0+eps;
+ x@4=x$-.5(fudged.stem-3stem_corr-tiny)-eps;
+ fi
+ pair corner,beak_corner;
+ ypart corner=y@1; corner=z@0+whatever*downward;
+ ypart beak_corner=y@4; beak_corner=z@3+whatever*(z@1-z@2);
+ if jut<0:
+ filldraw z@0{z$-z$$}
+ ...(darkness+eps)[corner,.5[z@1,z@0]]{z@1-z@0}
+ ...{jut,0}z@1--z@2--z@3
+ --beak_corner
+ --z@4--(x@4,y@1)--z@5--z@6--cycle; % descender
+ else:
+ filldraw z@6--z@5--(x@4,y@1)--z@4
+ --beak_corner
+ --z@3--z@2--z@1{-jut,0}
+ ...(darkness+eps)[corner,.5[z@1,z@0]]{z@0-z@1}
+ ...{z$$-z$}z@0--cycle; % descender
+ fi
+ labels (@0,@1,@2,@3,@4,@5,@6,beak_corner);
+enddef;
%
% roman descenders
%
@@ -345,10 +389,13 @@ def hi = if is_small_cap: higher fi\\ enddef;
%!!!lhfonts: first goes umlaut for yo
vardef lowercase_umlaut(expr x_move,y_move,umlaut_one,umlaut_two,
umlaut_three,umlaut_four) =
+numeric dot_dist; dot_dist:=round(3.5u); % (CMBRIGHT)
pickup tiny.nib;
pos[umlaut_one](udot_diam,0);
pos[umlaut_two](udot_diam,90);
-x[umlaut_one]=x[umlaut_two]=x_move+.5w-1.75u if monospace:/expansion_factor fi ;
+%x[umlaut_one]=x[umlaut_two]=x_move+.5w-1.75u if monospace:/expansion_factor fi ;
+x[umlaut_one]=x[umlaut_two]=x_move+.5w-0.5dot_dist %(CMBRIGHT)
+ if monospace:/expansion_factor fi ; %(CMBRIGHT)
top y[umlaut_two]r=lc_trema_height;
y[umlaut_one]=y_move+.5[y[umlaut_two]l,y[umlaut_two]r];
dot([umlaut_one],[umlaut_two]); % left dot
@@ -356,16 +403,20 @@ pos[umlaut_three](udot_diam,0);
penpos[umlaut_four](y[umlaut_two]r-y[umlaut_two]l,90);
y[umlaut_three]=y[umlaut_four]=y[umlaut_one];
x[umlaut_three]=x[umlaut_four]=x[umlaut_one]
- +3.5u if monospace: /expansion_factor fi ;
+% +3.5u if monospace: /expansion_factor fi ;
+ +dot_dist if monospace: /expansion_factor fi ; % (CMBRIGHT)
dot([umlaut_three],[umlaut_four]); % right dot
enddef;
%
vardef uppercase_umlaut(expr x_move,y_move,umlaut_one,umlaut_two,
umlaut_three,umlaut_four) =
+numeric dot_dist; dot_dist:=round(3.5u); % (CMBRIGHT)
pickup tiny.nib;
pos[umlaut_one](udot_diam,0);
pos[umlaut_two](udot_diam,90);
-x[umlaut_one]=x[umlaut_two]=x_move+.5w-1.75u if monospace:/expansion_factor fi ;
+%x[umlaut_one]=x[umlaut_two]=x_move+.5w-1.75u if monospace:/expansion_factor fi ;
+x[umlaut_one]=x[umlaut_two]=x_move+.5w-0.5dot_dist %(CMBRIGHT)
+ if monospace:/expansion_factor fi ; %(CMBRIGHT)
top y[umlaut_two]r=vround(cap_height+dot_height#*hppp);
y[umlaut_one]=y_move+.5[y[umlaut_two]l,y[umlaut_two]r];
dot([umlaut_one],[umlaut_two]); % left dot
@@ -373,7 +424,8 @@ pos[umlaut_three](udot_diam,0);
penpos[umlaut_four](y[umlaut_two]r-y[umlaut_two]l,90);
y[umlaut_three]=y[umlaut_four]=y[umlaut_one];
x[umlaut_three]=x[umlaut_four]=x[umlaut_one]
- +3.5u if monospace: /expansion_factor fi ;
+% +3.5u if monospace: /expansion_factor fi ;
+ +dot_dist if monospace: /expansion_factor fi ; % (CMBRIGHT)
dot([umlaut_three],[umlaut_four]); % right dot
enddef;
%
@@ -1251,7 +1303,7 @@ vardef easy_ogonek (suffix penkind)(expr _one,_two,_three)=
bot y[_one]l=0 if known ogonek_move:+ogonek_move fi+eps;
numeric ogonek_move; % it's local
else:
- bot z[_one]l=(.5w,0+eps);
+ bot z[_one]l=(.5w,eps);
fi
pos[_one](max(ogonek_breadth,penkind+eps),0);
bot z[_three]'=(xpart z[_one]l-.5penkind,y_right-eps)+the_tip_pos;
@@ -1276,23 +1328,25 @@ vardef easy_ogonek (suffix penkind)(expr _one,_two,_three)=
angle(z[_one]-z[_three]) - if serifs: 90 else: 80 fi);
if known ogonek_pos:
if y[_one]'<y[_one]: path p; numeric t;
- if known join_angle:
+ if known join_angle:
prim_angle:=join_angle;
- else:
+ else:
p=z[_one]{dir the_pre_angle}...{(z[_three]-z[_one])}z[_two]
...{dir (the_post_angle)}z[_three];
t=ypart (((0,y[_one]')--(w,y[_one]')) intersectiontimes p);
- prim_angle:=angle(direction t of p);
- fi
+ prim_angle:=angle(direction t of p);
+ fi
filldraw stroke
- z[_one]'e{dir prim_angle}...{(z[_three]-z[_one])}z[_two]e
- ...{dir (the_post_angle)}z[_three]e; % ogonek stroke
+ z[_one]'e{dir prim_angle}...
+ {(z[_three]-z[_one])}z[_two]e...
+ {dir (the_post_angle)}z[_three]e; % ogonek stroke
else:
- prim_angle:=if known join_angle: join_angle else: the_pre_angle fi;
+ prim_angle:=if known join_angle: join_angle else: the_pre_angle fi;
filldraw stroke
- z[_one]'e{dir prim_angle}...z[_one]e{dir the_pre_angle}
- ...{(z[_three]-z[_one])}z[_two]e
- ...{dir (the_post_angle)}z[_three]e; % ogonek stroke
+ z[_one]'e{dir prim_angle}...
+ z[_one]e{dir the_pre_angle}...
+ {(z[_three]-z[_one])}z[_two]e...
+ {dir (the_post_angle)}z[_three]e; % ogonek stroke
fi
else:
filldraw stroke
@@ -1335,7 +1389,11 @@ def lc_hachek_accent(expr ref) =
x52=good.x ref;
x52-lft x51=rt x53-x52= hround(1.25accent_u + vair);
pos52(stem,0);
- bot y52=vround(max(2/3[h,hi.x_height],hi.x_height+o+hair));
+ if ebbase=1:%!!!
+ bot y52=vround(0.33[x_height,lc_hachek_height]);% (CMBRIGHT)
+ else:
+ bot y52=vround(max(2/3[h,hi.x_height],hi.x_height+o+hair));
+ fi
top y51 = top y53 = max(lc_hachek_height,top y52+eps); %!!!
z50 = whatever[z51r,z52r] = whatever[z52l,z53l];
y54l=y54r=y52;
diff --git a/Master/texmf-dist/fonts/source/lh/base/ldbroman.mf b/Master/texmf-dist/fonts/source/lh/base/ldbroman.mf
new file mode 100644
index 00000000000..f2637829f95
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/base/ldbroman.mf
@@ -0,0 +1,184 @@
+%
+% ldbroman.mf
+%
+%% Cyrillic font container with T2 encoding beta-support
+%
+% This file is future part of lxfonts package
+% Version 3.5 // Patchlevel=0
+% (c) O.Lapko
+%
+% This package is freeware product under conditions similar to
+% those of D. E. Knuth specified for the Computer Modern family of fonts.
+% In particular, only the authors are entitled to modify this file
+% (and all this package as well) and to save it under the same name.
+%
+% Content:
+%
+% The Computer Modern Roman family of fonts (by D. E. Knuth, 1979--1985)
+% Modified for the CM Bright fonts [1995/10/04 v0.997 WaS]
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+LHver_check(3,5); % like |version_check| in ec
+
+if ligs>1: font_coding_scheme:="TeX text/Cyr - "&enc_name;
+ if altcoding:
+ spanish_shriek=oct"074"; spanish_query=oct"076";
+ fi
+else: font_coding_scheme:=if ligs=0: "TeX typewriter text/Cyr - "&enc_name
+ else: "TeX text without f-ligs/Cyr - "&enc_name fi;
+ if altcoding:
+ spanish_shriek=oct"016"; spanish_query=oct"017";
+ fi
+fi
+
+input lxpseudo;
+
+
+mode_setup; font_setup;
+pseudo_setup; % |pseudo_setup| from ec
+define_pixels(sym_u);define_whole_vertical_pixels(sym_height);
+% lowres_fix(stem,cap_stem)1.12;
+
+if altcoding:
+ input romanu; % upper case (majuscules)
+ input bromanl; % lower case (minuscules)
+ input bgreeku; % upper case Greek letters
+ input romand; % numerals
+ input romanp; % ampersand, question marks, currency sign
+ input romspl; % lowercase specials (dotless \i, ligature \ae, etc.)
+ input romspu; % uppercase specials (\AE, \OE, \O)
+ input bpunct; % punctuation symbols common to roman and italic text
+ input baccent; % accents common to roman and italic text
+ if ligs>1: input bromlig; fi % letter ligatures
+ if ligs<=1: input romsub; fi % substitutes for ligatures
+fi
+
+if not vfcoding: % ligs for both altcoding and wncoding (dashes & quotes)
+ if ligs>0: input comlig; fi % ligatures common with italic text
+fi
+
+input lgcyru; % Cyrillic upper case (majuscules)
+input lgcyrl; % Cyrillic lower case (minuscules)
+input lgcyrsym; % << >> ,, No
+input lgcyracc; % Cyrillic accents
+if old_cyr:
+ input lgocyrac; % Cyrillic Old Slav accents & signs
+fi
+
+if wncoding: %Part used in WNCYR
+ input romand; % numerals
+ input lgpunct; % excerpts from punct.mf
+ input lgromp; % roman question mark
+ input lgrlig; % roman dotless i,j
+fi
+
+font_slant slant; font_x_height x_height#;
+if monospace: font_normal_space 9u#; % no stretching or shrinking
+ font_quad 18u#;
+ font_extra_space 9u#;
+ if altcoding: input llmligtb; fi % input ligs for quotes
+ if wncoding : input lwnligs; fi % input ligs for Cyrillic letters in WNCYR
+else: font_normal_space 5.7u#+2letter_fit#;
+ font_normal_stretch 2.85u#; font_normal_shrink 1.9u#;
+ font_quad 18u#+4letter_fit#;
+ font_extra_space 1.9u#;
+ k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#; % three degrees of kerning
+ %
+ % Latin ligs & kerns:
+ % There are just the same ligs and kerns as in CMBRIGHT
+ % but they are built in more visible form
+ TITLEfont:=false; SmallCapsfont:=false; ROMANfont:=true;
+ if altcoding:
+ ligtable "k":
+ if serifs: "v":
+ "a" kern -u#, fi\\
+ "w": "e" kern k#,
+ "a" kern k#,
+ "o" kern k#,
+ "c" kern k#;
+ ligtable "P": "A" kern kk#,
+ "y": "o" kern k#,
+ "e" kern k#,
+ "a" kern k#,
+ "." kern kk#,
+ "," kern kk#;
+ ligtable "F": "V": "W":
+ if serifs: "o" kern kk#,
+ "e" kern kk#,
+ "u" kern kk#,
+ "r" kern kk#,
+ "a" kern kk#,
+ "A" kern kkk#,
+ else: "o" kern k#,
+ "e" kern k#,
+ "u" kern k#,
+ "r" kern k#,
+ "a" kern k#,
+ "A" kern kk#, fi
+ "K": "X": "O" kern k#,
+ "C" kern k#,
+ "G" kern k#,
+ "Q" kern k#;
+ ligtable "T": "y" kern if serifs: k# else: kk# fi,
+ "Y": "e" kern kk#,
+ "o" kern kk#,
+ "r" kern kk#,
+ "a" kern kk#,
+ "A" kern kk#,
+ "u" kern kk#;
+ ligtable "O": "D":
+ "X" kern k#,
+ "W" kern k#,
+ "A" kern k#,
+ "V" kern k#,
+ "Y" kern k#;
+ if serifs:
+ ligtable "h": "m": "n":
+ "t" kern k#,
+ "u" kern k#,
+ "b" kern k#,
+ "y" kern k#,
+ "v" kern k#,
+ "w" kern k#;
+ ligtable "c":
+ "h" kern k#,
+ "k" kern k#;
+ fi
+ ligtable "o": "b": "p":
+ if known bx_kerning:
+ "e" kern -k#,
+ "o" kern -k#,
+ "d" kern -k#,
+ "c" kern -k#,
+ "q" kern -k#,
+ fi
+ "x" kern k#,
+ "a": if serifs:
+ "v" kern k#,
+ "j" kern u#,
+ else: "r" kern k#, fi
+ "t": "y" kern k#,
+ "u": "w" kern k#;
+ ligtable "A": if serifs: "R": fi\\
+ "t" kern k#,
+ "C" kern k#,
+ "O" kern k#,
+ "G" kern k#,
+ "U" kern k#,
+ "Q" kern k#,
+ "L": "T" kern kk#,
+ "Y" kern kk#,
+ "V" kern kkk#,
+ "W" kern kkk#;
+ ligtable "g": "j" kern -k#; % logjam
+ ligtable "I": "I" kern -k#; % Richard III
+ % there are ligature/kern programs for |"f"| in the {\tt romlig} file
+ % and for |"-"|, |"`"|, and |"'"| in the {\tt comlig} file
+ input llvligtb; % input ligs & kerns for quotes
+ fi
+ scantokens("input "&(substring(fonteq-2,fonteq) of param_base)&"liker"); % Cyrillic ligs & kerns
+fi
+
+bye.
+%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/base/ldcsc.mf b/Master/texmf-dist/fonts/source/lh/base/ldcsc.mf
index b454ff0cfab..cdb899bcb61 100644
--- a/Master/texmf-dist/fonts/source/lh/base/ldcsc.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/ldcsc.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -19,7 +19,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
font_coding_scheme:=if ligs=0: "TeX typewriter text/Cyr - "&enc_name
else: "TeX text without f-ligs/Cyr - "&enc_name fi;
@@ -166,7 +166,7 @@ is_small_cap:=true;
input lgcyru; % Cyrillic majuscules (in lowercase positions)
if wncoding: %Part used in WNCYR
- input lgcspl; % numerals
+ input lgcspl; % FF ligs
fi
if not monospace:
diff --git a/Master/texmf-dist/fonts/source/lh/base/ldroman.mf b/Master/texmf-dist/fonts/source/lh/base/ldroman.mf
index 32fbe85173a..d405be1a95f 100644
--- a/Master/texmf-dist/fonts/source/lh/base/ldroman.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/ldroman.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -28,7 +28,7 @@
% There also used special letters UKR_I LAT_I etc in Cyrillic glyphs
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
if ligs>1: font_coding_scheme:="TeX text/Cyr - "&enc_name;
if altcoding:
diff --git a/Master/texmf-dist/fonts/source/lh/base/ldtexset.mf b/Master/texmf-dist/fonts/source/lh/base/ldtexset.mf
new file mode 100644
index 00000000000..3377120e69f
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/base/ldtexset.mf
@@ -0,0 +1,152 @@
+%
+% ldtexset.mf
+%
+%% Cyrillic font container with T2 encoding beta-support
+%
+% This file is future part of lxfonts package
+% Version 3.5 // Patchlevel=0
+% (c) O.Lapko
+%
+% This package is freeware product under conditions similar to
+% those of D. E. Knuth specified for the Computer Modern family of fonts.
+% In particular, only the authors are entitled to modify this file
+% (and all this package as well) and to save it under the same name.
+%
+% Content:
+%
+% Special version of Computer Modern for \TeX's extended ASCII character set
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+LHver_check(3,5); % like |version_check| in ec
+
+font_coding_scheme:="TeX extended ASCII/Cyr - "&enc_name;
+
+input lxpseudo;
+
+mode_setup; font_setup; mono_charic#:=0;
+pseudo_setup; % |pseudo_setup| from ec
+
+if altcoding:
+ input tsetsl; % special symbols to be slanted
+fi
+slant:=0; % the remaining characters will not be slanted
+currenttransform:=identity yscaled aspect_ratio scaled granularity;
+
+if altcoding:
+ input romanu; % upper case (majuscules)
+ input romanl; % lower case (minuscules)
+ input romand; % numerals
+ input romanp; % ampersand, question marks, currency sign
+ input punct; % punctuation symbols common to roman and italic text
+ input tset; % remaining special symbols of extended ASCII
+fi
+
+input lgcyru; % Cyrillic upper case (majuscules)
+input lgcyrl; % Cyrillic lower case (minuscules)
+input lgcyrsym; % << >> ,, No
+input lgcyracc; % Cyrillic accents
+if old_cyr:
+ input lgocyrac; % Cyrillic Old Slav accents & signs
+fi
+
+font_x_height x_height#;
+if monospace: font_normal_space 9u#; % no stretching or shrinking
+ font_quad 18u#;
+ font_extra_space 9u#;
+else: font_normal_space 6u#+2letter_fit#;
+ font_normal_stretch 3u#; font_normal_shrink 2u#;
+ font_quad 18u#+4letter_fit#;
+ font_extra_space 2u#;
+ k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#; % three degrees of kerning
+ %
+ % Latin ligs & kerns:
+ % There are just the same ligs and kerns as in CM
+ % but they are built in more visible form
+ TITLEfont:=false; SmallCapsfont:=false; ROMANfont:=true;
+ if altcoding:
+ ligtable "k":
+ if serifs: "v":
+ "a" kern -u#, fi\\
+ "w": "e" kern k#,
+ "a" kern k#,
+ "o" kern k#,
+ "c" kern k#;
+ ligtable "P": "A" kern kk#,
+ "y": "o" kern k#,
+ "e" kern k#,
+ "a" kern k#,
+ "." kern kk#,
+ "," kern kk#;
+ ligtable "F": "V": "W":
+ if serifs: "o" kern kk#,
+ "e" kern kk#,
+ "u" kern kk#,
+ "r" kern kk#,
+ "a" kern kk#,
+ "A" kern kkk#,
+ else: "o" kern k#,
+ "e" kern k#,
+ "u" kern k#,
+ "r" kern k#,
+ "a" kern k#,
+ "A" kern kk#, fi
+ "K": "X": "O" kern k#,
+ "C" kern k#,
+ "G" kern k#,
+ "Q" kern k#;
+ ligtable "T": "y" kern if serifs: k# else: kk# fi,
+ "Y": "e" kern kk#,
+ "o" kern kk#,
+ "r" kern kk#,
+ "a" kern kk#,
+ "A" kern kk#,
+ "u" kern kk#;
+ ligtable "O": "D":
+ "X" kern k#,
+ "W" kern k#,
+ "A" kern k#,
+ "V" kern k#,
+ "Y" kern k#;
+ if serifs:
+ ligtable "h": "m": "n":
+ "t" kern k#,
+ "u" kern k#,
+ "b" kern k#,
+ "y" kern k#,
+ "v" kern k#,
+ "w" kern k#;
+ ligtable "c":
+ "h" kern k#,
+ "k" kern k#;
+ fi
+ ligtable "o": "b": "p":
+ "e" kern -k#,
+ "o" kern -k#,
+ "x" kern k#,
+ "d" kern -k#,
+ "c" kern -k#,
+ "q" kern -k#,
+ "a": if serifs:
+ "v" kern k#,
+ "j" kern u#,
+ else: "r" kern k#, fi
+ "t": "y" kern k#,
+ "u": "w" kern k#;
+ ligtable "A": if serifs: "R": fi\\
+ "t" kern k#,
+ "C" kern k#,
+ "O" kern k#,
+ "G" kern k#,
+ "U" kern k#,
+ "Q" kern k#,
+ "L": "T" kern kk#,
+ "Y" kern kk#,
+ "V" kern kkk#,
+ "W" kern kkk#;
+ ligtable "g": "j" kern -k#; % logjam
+ ligtable "I": "I" kern -k#; % Richard III
+ fi
+ scantokens("input "&(substring(fonteq-2,fonteq) of param_base)&"liker"); % Cyrillic ligs & kerns
+fi;
+bye.
diff --git a/Master/texmf-dist/fonts/source/lh/base/ldtextit.mf b/Master/texmf-dist/fonts/source/lh/base/ldtextit.mf
index 3d6be4d1494..dbbd90dfdef 100644
--- a/Master/texmf-dist/fonts/source/lh/base/ldtextit.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/ldtextit.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -19,7 +19,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
input lxpseudo;
@@ -29,15 +29,15 @@ pseudo_setup; % |pseudo_setup| from ec
if ligs>1: font_coding_scheme:="TeX text/Cyr - "&enc_name;
- spanish_shriek=oct"074"; spanish_query=oct"076";
- if altcoding:
+ if altcoding:
+ spanish_shriek=oct"074"; spanish_query=oct"076";
input italig; % letter ligatures
- fi
+ fi
else: font_coding_scheme:=if ligs=0: "TeX typewriter text/Cyr - "&enc_name
else: "TeX text without f-ligs/Cyr - "&enc_name fi;
- if altcoding:
+ if altcoding:
spanish_shriek=oct"016"; spanish_query=oct"017";
- fi
+ fi
fi
if altcoding:
diff --git a/Master/texmf-dist/fonts/source/lh/base/ldtitle.mf b/Master/texmf-dist/fonts/source/lh/base/ldtitle.mf
index 9da66a33785..1bdedd0b9e0 100644
--- a/Master/texmf-dist/fonts/source/lh/base/ldtitle.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/ldtitle.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -22,7 +22,7 @@
% This makes a short font (caps and digits only)
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
font_coding_scheme:="Caps and digits/Cyr - "&enc_name;
diff --git a/Master/texmf-dist/fonts/source/lh/base/lebroman.mf b/Master/texmf-dist/fonts/source/lh/base/lebroman.mf
new file mode 100644
index 00000000000..6b2074145d8
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/base/lebroman.mf
@@ -0,0 +1,82 @@
+%
+% lebroman.mf
+%
+%% Cyrillic font container with T2 encoding beta-support
+%
+% This file is future part of lxfonts package
+% Version 3.5 // Patchlevel=0
+% (c) O.Lapko
+%
+% This package is freeware product under conditions similar to
+% those of D. E. Knuth specified for the Computer Modern family of fonts.
+% In particular, only the authors are entitled to modify this file
+% (and all this package as well) and to save it under the same name.
+%
+% Content:
+%
+% Driver file, called by parameter files with roman style fonts
+% - modified EXROMAN.MF in European Computer Modern fonts (ec fonts)
+% CMBRIGHT modification
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+LHver_check(3,5); % like |version_check| in ec
+
+
+input lxpseudo;
+
+mode_setup; font_setup;
+pseudo_setup; % |pseudo_setup| from ec
+
+% upper part exr(u/l)(lett/west/east) changed to cyrillic glyphs
+%vvv
+if roman_ec:
+ input exrulett;
+ input ebrllett; % lower case (minuscules) % (CMBR)
+fi
+%<<<
+input lgcyru; % input Cyrillic Uppercase shapes
+input lgcyrl; % input Cyrillic Lowercase shapes
+
+input lgcyrsym; % floating symbols in Cyrillic
+input lgengsym; % latin symbols
+input lgromp; % roman & ?
+input lgrdigit; % roman digits
+input lgrlig; % roman dotless i j (and ff-ligatures)
+
+input lgcyracc; % accents
+if old_cyr:
+ input lgocyrac; % Cyrillic Old Slav accents & signs
+fi
+
+%
+% Fontparameter
+%
+font_coding_scheme:="TeX Cyrillic Font Encoding - "&enc_name;
+boundarychar:=oct"027";
+font_slant slant;
+font_x_height x_height#;
+font_cap_height cap_height#;
+font_asc_height asc_height#;
+font_acc_cap_height (cap_height#+acc_height#);
+font_desc_depth desc_depth#;
+font_max_height (max(asc_height#,body_height#,
+ cap_height#+acc_height#));
+font_max_depth (max(desc_depth#,paren_depth#,the_ogonek_depth#));
+% font_digit_width % set inside the digits file
+% font_cap_stem % set after the programme of the capital I
+font_baselineskip max(1.25*designsize,body_height#+paren_depth#);% (CMBR)
+ font_normal_space 5.7u#+2letter_fit#; % (CMBR)
+ font_normal_stretch 2.85u#; font_normal_shrink 1.9u#; %(CMBR)
+ font_quad 18u#+4letter_fit#;
+ font_extra_space 1.9u#; % (CMBR)
+% input ebrligtb; % do the ligature programs %(CMBR)
+ TITLEfont:=false; SmallCapsfont:=false; ROMANfont:=true;
+ input llvligtb; % do the ligature programs, not for monospaced fonts
+ if roman_ec: input llbligtb; fi
+ k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#; % three degrees of kerning
+ scantokens("input "&(substring(fonteq-2,fonteq) of param_base)&"liker"); % Cyrillic ligs & kerns
+bye.
+
+bye.
+%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/base/lecsc.mf b/Master/texmf-dist/fonts/source/lh/base/lecsc.mf
index 12cb88e33d1..38128171e67 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lecsc.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lecsc.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -19,7 +19,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
input lxpseudo;
@@ -97,18 +97,18 @@ endgroup;
%
font_coding_scheme:="TeX Cyrillic Font Encoding - "&enc_name;
boundarychar:=oct"027";
-font_slant slant;
+font_slant slant;
font_x_height x_height#;
font_cap_height cap_height#;
font_asc_height asc_height#;
-font_acc_cap_height (max(cap_height#+acc_height#,uc_acc_height#));
+font_acc_cap_height (cap_height#+acc_height#);
font_desc_depth desc_depth#;
font_max_height (max(asc_height#,body_height#,
- cap_height#+acc_height#,uc_acc_height#));
+ cap_height#+acc_height#));
font_max_depth (max(desc_depth#,paren_depth#,the_ogonek_depth#));
% font_digit_width % set inside the digits file
% font_cap_stem % set after the programme of the capital I
-font_baselineskip (1.2*designsize);
+font_baselineskip max(1.2*designsize,body_height#+paren_depth#);
if monospace: font_normal_space 9u#; % no stretching or shrinking
font_quad 18u#;
diff --git a/Master/texmf-dist/fonts/source/lh/base/leroman.mf b/Master/texmf-dist/fonts/source/lh/base/leroman.mf
index 03b582c717d..269663711a5 100644
--- a/Master/texmf-dist/fonts/source/lh/base/leroman.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/leroman.mf
@@ -1,16 +1,16 @@
%
-% lecsc.mf
+% leroman.mf
%
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -19,7 +19,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
input lxpseudo;
@@ -53,18 +53,18 @@ fi
%
font_coding_scheme:="TeX Cyrillic Font Encoding - "&enc_name;
boundarychar:=oct"027";
-font_slant slant;
+font_slant slant;
font_x_height x_height#;
font_cap_height cap_height#;
font_asc_height asc_height#;
-font_acc_cap_height (max(cap_height#+acc_height#,uc_acc_height#));
+font_acc_cap_height (cap_height#+acc_height#);
font_desc_depth desc_depth#;
font_max_height (max(asc_height#,body_height#,
- cap_height#+acc_height#,uc_acc_height#));
+ cap_height#+acc_height#));
font_max_depth (max(desc_depth#,paren_depth#,the_ogonek_depth#));
% font_digit_width % set inside the digits file
% font_cap_stem % set after the programme of the capital I
-font_baselineskip (1.2*designsize);
+font_baselineskip max(1.2*designsize,body_height#+paren_depth#);
if monospace: font_normal_space 9u#; % no stretching or shrinking
font_quad 18u#;
diff --git a/Master/texmf-dist/fonts/source/lh/base/letextit.mf b/Master/texmf-dist/fonts/source/lh/base/letextit.mf
index 19778443a90..7706524e18d 100644
--- a/Master/texmf-dist/fonts/source/lh/base/letextit.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/letextit.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -19,7 +19,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
input lxpseudo;
@@ -61,18 +61,18 @@ fi
%
font_coding_scheme:="TeX Cyrillic Font Encoding - "&enc_name;
boundarychar:=oct"027";
-font_slant slant;
+font_slant slant;
font_x_height x_height#;
font_cap_height cap_height#;
font_asc_height asc_height#;
-font_acc_cap_height (max(cap_height#+acc_height#,uc_acc_height#));
+font_acc_cap_height (cap_height#+acc_height#);
font_desc_depth desc_depth#;
font_max_height (max(asc_height#,body_height#,
- cap_height#+acc_height#,uc_acc_height#));
+ cap_height#+acc_height#));
font_max_depth (max(desc_depth#,paren_depth#,the_ogonek_depth#));
% font_digit_width % set inside the digits file
% font_cap_stem % set after the programme of the capital I
-font_baselineskip (1.2*designsize);
+font_baselineskip max(1.2*designsize,body_height#+paren_depth#);
if monospace: font_normal_space 9u#; % no stretching or shrinking
font_quad 18u#;
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgcspl.mf b/Master/texmf-dist/fonts/source/lh/base/lgcspl.mf
index 10d16248635..71a402c5fe4 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgcspl.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgcspl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -20,16 +20,10 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% I,J
-% if roman_ec: FI,FL,FFI,FFL fi -- for T2* stuff only (lgcsplff.mf)
+% if roman_ec: FI,FL,FFI,FFL fi -- for T2* stuff only
%
-LHver_check(3,4); % like |version_check| in ec
-
-if roman_ec:
-
-input lgcsplff.mf
-
-fi % roman_ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Small Caps letter I";
cyrchar(i_dotl,max(6u#,4u#+cap_stem#),cap_height#,0);
@@ -63,5 +57,172 @@ else: filldraw stroke z1e--z2e; % stem
filldraw stroke z3e{down}....term.e(4,5,left,1,4); fi % arc and terminal
math_fit(0,.5ic#-.5u#); penlabels(1,2,3,4,5); endchar;
+if not roman_ec: endinput \\; fi
+
+lhchar "Small Caps letter FF";
+beginchar(oct"033",2(11.5u#-width_adj#),cap_height#,0);
+italcorr cap_height#*slant-.25u#;
+normal_adjust_fit(cap_serif_fit#,0);
+h:=vround(h-stem_corr);
+w':=11.5u-width_adj;
+pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+pickup crisp.nib; pos3(slab,90); pos4(hair,0);
+top y3r=h; x3=x1; rt x4r=hround(w'-.75u); y4=good.y(y3l-beak)-eps;
+arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
+pos5(cap_bar,-90); pos6(hair,0);
+top y5l=vround(.5[y2,y1]+.5cap_bar); x5=x1;
+pos0(cap_bar,90); pos7(hair,0);
+z0=z5; x6=x7; y6-y5l=y0l-y7;
+if serifs: rt x6r=hround(w'-4u+.5hair); y6=good.y(y5l+.6beak)+eps;
+ rt x9r=hround(w'-.5u);
+else: rt x6r=hround(w'-1.5u); y6=y5l+eps; rt x9r=hround(w'-.75u); fi
+arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
+if serifs: nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,1.25cap_jut); fi % lower serif
+% the second F
+currentpicture:=currentpicture + currentpicture shifted (w',0);
+math_fit(0,ic#-2.5u#); penlabels(0,1,2,3,4,5,6,7,8,9,11,12); endchar;
+
+lhchar "Small Caps letter FI";
+beginchar(oct"034",11.5u#-width_adj#+max(6u#,4u#+cap_stem#),cap_height#,0);
+italcorr cap_height#*slant-.25u#;
+normal_adjust_fit(cap_serif_fit#,0);
+h:=vround(h-stem_corr);
+w':=11.5u-width_adj;
+pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+pickup crisp.nib; pos3(slab,90); pos4(hair,0);
+top y3r=h; x3=x1; rt x4r=hround(w'-.75u); y4=good.y(y3l-beak)-eps;
+arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
+pos5(cap_bar,-90); pos6(hair,0);
+top y5l=vround(.5[y2,y1]+.5cap_bar); x5=x1;
+pos0(cap_bar,90); pos7(hair,0);
+z0=z5; x6=x7; y6-y5l=y0l-y7;
+if serifs: rt x6r=hround(w'-4u+.5hair); y6=good.y(y5l+.6beak)+eps;
+ rt x9r=hround(w'-.5u);
+else: rt x6r=hround(w'-1.5u); y6=y5l+eps; rt x9r=hround(w'-.75u); fi
+arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
+if serifs:
+ nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,1.25cap_jut); fi % lower serif
+% the I
+xshift:=w';
+w':=w-xshift;
+pickup tiny.nib; pos11(cap_stem,0); pos12(cap_stem,0);
+lft x11l=lft x12l=hround(xshift+.5w'-.5cap_stem); top y11=h; bot y12=0;
+filldraw stroke z11e--z12e; % stem
+if serifs or slitex or monospace:
+ dish_serif(11,12,aa,1/3,1.05cap_jut,bb,1/3,1.05cap_jut); % upper serif
+ dish_serif(12,11,gg,1/3,1.05cap_jut,dd,1/3,1.05cap_jut); fi % lower serif
+math_fit(0,ic#-2.5u#); penlabels(0,1,2,3,4,5,6,7,8,9,11,12); endchar;
+
+lhchar "Small Caps letter FL";
+beginchar(oct"035",(11.5u#-width_adj#)+11u#-width_adj#,cap_height#,0);
+italcorr cap_height#*slant-.25u#;
+normal_adjust_fit(cap_serif_fit#,0);
+h:=vround(h-stem_corr);
+w':=11.5u-width_adj;
+pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+pickup crisp.nib; pos3(slab,90); pos4(hair,0);
+top y3r=h; x3=x1; rt x4r=hround(w'-.75u); y4=good.y(y3l-beak)-eps;
+arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
+pos5(cap_bar,-90); pos6(hair,0);
+top y5l=vround(.5[y2,y1]+.5cap_bar); x5=x1;
+pos0(cap_bar,90); pos7(hair,0);
+z0=z5; x6=x7; y6-y5l=y0l-y7;
+if serifs: rt x6r=hround(w'-4u+.5hair); y6=good.y(y5l+.6beak)+eps;
+ rt x9r=hround(w'-.5u);
+else: rt x6r=hround(w'-1.5u); y6=y5l+eps; rt x9r=hround(w'-.75u); fi
+arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
+if serifs: nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,1.25cap_jut); fi % lower serif
+% the L
+xshift:=w';
+pickup tiny.nib; pos11(cap_stem,0); pos12(cap_stem,0);
+lft x11l=lft x12l=hround xshift+max(2u,3u-.5cap_stem); top y11=h; bot y12=0;
+filldraw stroke z11e--z12e; % stem
+pickup crisp.nib; pos13(slab,-90); pos14(hair,0);
+bot y13r=0; x13=x12; y14=y13l+7/6beak+eps; rt x14r=hround(w-.75u);
+arm(13,14,eee,1.2beak_darkness,beak_jut); % lower arm and beak
+if serifs: dish_serif(11,12,aaa,1/3,cap_jut,bbb,1/3,1.25cap_jut); % upper serif
+ nodish_serif(12,11,ccc,1/3,cap_jut,ddd,1/3,.5cap_jut); fi % lower serif
+math_fit(0,ic#-2.5u#); penlabels(0,1,2,3,4,5,6,7,8,9,11,12); endchar;
+
+lhchar "Small Caps letter FFI";
+beginchar(oct"036",2(11.5u#-width_adj#)+max(6u#,4u#+cap_stem#),cap_height#,0);
+italcorr cap_height#*slant-.25u#;
+normal_adjust_fit(cap_serif_fit#,0);
+h:=vround(h-stem_corr);
+w':=11.5u-width_adj;
+pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+pickup crisp.nib; pos3(slab,90); pos4(hair,0);
+top y3r=h; x3=x1; rt x4r=hround(w'-.75u); y4=good.y(y3l-beak)-eps;
+arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
+pos5(cap_bar,-90); pos6(hair,0);
+top y5l=vround(.5[y2,y1]+.5cap_bar); x5=x1;
+pos0(cap_bar,90); pos7(hair,0);
+z0=z5; x6=x7; y6-y5l=y0l-y7;
+if serifs: rt x6r=hround(w'-4u+.5hair); y6=good.y(y5l+.6beak)+eps;
+ rt x9r=hround(w'-.5u);
+else: rt x6r=hround(w'-1.5u); y6=y5l+eps; rt x9r=hround(w'-.75u); fi
+arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
+if serifs: nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,1.25cap_jut); fi % lower serif
+% the second F
+currentpicture:=currentpicture + currentpicture shifted (w',0);
+% the I
+xshift:=2w';
+w':=w-xshift;
+pickup tiny.nib; pos11(cap_stem,0); pos12(cap_stem,0);
+lft x11l=lft x12l=hround(xshift+.5w'-.5cap_stem); top y11=h; bot y12=0;
+filldraw stroke z11e--z12e; % stem
+if serifs or slitex or monospace:
+ dish_serif(11,12,aa,1/3,1.05cap_jut,bb,1/3,1.05cap_jut); % upper serif
+ dish_serif(12,11,gg,1/3,1.05cap_jut,dd,1/3,1.05cap_jut); fi % lower serif
+math_fit(0,ic#-2.5u#); penlabels(0,1,2,3,4,5,6,7,8,9,11,12); endchar;
+
+lhchar "Small Caps letter FFL";
+beginchar(oct"037",2(11.5u#-width_adj#)+11u#-width_adj#,cap_height#,0);
+italcorr cap_height#*slant-.25u#;
+normal_adjust_fit(cap_serif_fit#,0);
+h:=vround(h-stem_corr);
+w':=11.5u-width_adj;
+pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+pickup crisp.nib; pos3(slab,90); pos4(hair,0);
+top y3r=h; x3=x1; rt x4r=hround(w'-.75u); y4=good.y(y3l-beak)-eps;
+arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
+pos5(cap_bar,-90); pos6(hair,0);
+top y5l=vround(.5[y2,y1]+.5cap_bar); x5=x1;
+pos0(cap_bar,90); pos7(hair,0);
+z0=z5; x6=x7; y6-y5l=y0l-y7;
+if serifs: rt x6r=hround(w'-4u+.5hair); y6=good.y(y5l+.6beak)+eps;
+ rt x9r=hround(w'-.5u);
+else: rt x6r=hround(w'-1.5u); y6=y5l+eps; rt x9r=hround(w'-.75u); fi
+arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
+if serifs: nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,1.25cap_jut); fi % lower serif
+% the I
+currentpicture:=currentpicture + currentpicture shifted (w',0);
+% the L
+xshift:=2w';
+pickup tiny.nib; pos11(cap_stem,0); pos12(cap_stem,0);
+lft x11l=lft x12l=hround xshift+max(2u,3u-.5cap_stem); top y11=h; bot y12=0;
+filldraw stroke z11e--z12e; % stem
+pickup crisp.nib; pos13(slab,-90); pos14(hair,0);
+bot y13r=0; x13=x12; y14=y13l+7/6beak+eps; rt x14r=hround(w-.75u);
+arm(13,14,eee,1.2beak_darkness,beak_jut); % lower arm and beak
+if serifs: dish_serif(11,12,aaa,1/3,cap_jut,bbb,1/3,1.25cap_jut); % upper serif
+ nodish_serif(12,11,ccc,1/3,cap_jut,ddd,1/3,.5cap_jut); fi % lower serif
+math_fit(0,ic#-2.5u#); penlabels(0,1,2,3,4,5,6,7,8,9,11,12); endchar;
+
endinput;
%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgcsplff.mf b/Master/texmf-dist/fonts/source/lh/base/lgcsplff.mf
deleted file mode 100644
index 53147ac77de..00000000000
--- a/Master/texmf-dist/fonts/source/lh/base/lgcsplff.mf
+++ /dev/null
@@ -1,192 +0,0 @@
-%
-% lgcsplff.mf
-%
-%% Cyrillic font container with T2 encoding beta-support
-%
-% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
-% (c) O.Lapko
-%
-% This package belongs to the public domain under conditions similar to
-% those of D. E. Knuth specified for the Computer Modern family of fonts.
-% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
-%
-% Content:
-%
-% Metafont program for the characters in positions of ligatures
-% for the "caps and small caps" fonts
-%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-% if roman_ec: FI,FL,FFI,FFL fi -- for T2* stuff only
-%
-
-LHver_check(3,4); % like |version_check| in ec
-
-lhchar "Small Caps letter FF";
-beginchar(oct"033",2(11.5u#-width_adj#),cap_height#,0);
-italcorr cap_height#*slant-.25u#;
-normal_adjust_fit(cap_serif_fit#,0);
-h:=vround(h-stem_corr);
-w':=11.5u-width_adj;
-pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
-lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
-filldraw stroke z1e--z2e; % stem
-pickup crisp.nib; pos3(slab,90); pos4(hair,0);
-top y3r=h; x3=x1; rt x4r=hround(w'-.75u); y4=good.y(y3l-beak)-eps;
-arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
-pos5(cap_bar,-90); pos6(hair,0);
-top y5l=vround(.5[y2,y1]+.5cap_bar); x5=x1;
-pos0(cap_bar,90); pos7(hair,0);
-z0=z5; x6=x7; y6-y5l=y0l-y7;
-if serifs: rt x6r=hround(w'-4u+.5hair); y6=good.y(y5l+.6beak)+eps;
- rt x9r=hround(w'-.5u);
-else: rt x6r=hround(w'-1.5u); y6=y5l+eps; rt x9r=hround(w'-.75u); fi
-arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
-if serifs: nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
- dish_serif(2,1,c,1/3,cap_jut,d,1/3,1.25cap_jut); fi % lower serif
-% the second F
-currentpicture:=currentpicture + currentpicture shifted (w',0);
-math_fit(0,ic#-2.5u#); penlabels(0,1,2,3,4,5,6,7,8,9,11,12); endchar;
-
-lhchar "Small Caps letter FI";
-beginchar(oct"034",11.5u#-width_adj#+max(6u#,4u#+cap_stem#),cap_height#,0);
-italcorr cap_height#*slant-.25u#;
-normal_adjust_fit(cap_serif_fit#,0);
-h:=vround(h-stem_corr);
-w':=11.5u-width_adj;
-pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
-lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
-filldraw stroke z1e--z2e; % stem
-pickup crisp.nib; pos3(slab,90); pos4(hair,0);
-top y3r=h; x3=x1; rt x4r=hround(w'-.75u); y4=good.y(y3l-beak)-eps;
-arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
-pos5(cap_bar,-90); pos6(hair,0);
-top y5l=vround(.5[y2,y1]+.5cap_bar); x5=x1;
-pos0(cap_bar,90); pos7(hair,0);
-z0=z5; x6=x7; y6-y5l=y0l-y7;
-if serifs: rt x6r=hround(w'-4u+.5hair); y6=good.y(y5l+.6beak)+eps;
- rt x9r=hround(w'-.5u);
-else: rt x6r=hround(w'-1.5u); y6=y5l+eps; rt x9r=hround(w'-.75u); fi
-arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
-if serifs:
- nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
- dish_serif(2,1,c,1/3,cap_jut,d,1/3,1.25cap_jut); fi % lower serif
-% the I
-xshift:=w';
-w':=w-xshift;
-pickup tiny.nib; pos11(cap_stem,0); pos12(cap_stem,0);
-lft x11l=lft x12l=hround(xshift+.5w'-.5cap_stem); top y11=h; bot y12=0;
-filldraw stroke z11e--z12e; % stem
-if serifs or slitex or monospace:
- dish_serif(11,12,aa,1/3,1.05cap_jut,bb,1/3,1.05cap_jut); % upper serif
- dish_serif(12,11,gg,1/3,1.05cap_jut,dd,1/3,1.05cap_jut); fi % lower serif
-math_fit(0,ic#-2.5u#); penlabels(0,1,2,3,4,5,6,7,8,9,11,12); endchar;
-
-lhchar "Small Caps letter FL";
-beginchar(oct"035",(11.5u#-width_adj#)+11u#-width_adj#,cap_height#,0);
-italcorr cap_height#*slant-.25u#;
-normal_adjust_fit(cap_serif_fit#,0);
-h:=vround(h-stem_corr);
-w':=11.5u-width_adj;
-pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
-lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
-filldraw stroke z1e--z2e; % stem
-pickup crisp.nib; pos3(slab,90); pos4(hair,0);
-top y3r=h; x3=x1; rt x4r=hround(w'-.75u); y4=good.y(y3l-beak)-eps;
-arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
-pos5(cap_bar,-90); pos6(hair,0);
-top y5l=vround(.5[y2,y1]+.5cap_bar); x5=x1;
-pos0(cap_bar,90); pos7(hair,0);
-z0=z5; x6=x7; y6-y5l=y0l-y7;
-if serifs: rt x6r=hround(w'-4u+.5hair); y6=good.y(y5l+.6beak)+eps;
- rt x9r=hround(w'-.5u);
-else: rt x6r=hround(w'-1.5u); y6=y5l+eps; rt x9r=hround(w'-.75u); fi
-arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
-if serifs: nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
- dish_serif(2,1,c,1/3,cap_jut,d,1/3,1.25cap_jut); fi % lower serif
-% the L
-xshift:=w';
-pickup tiny.nib; pos11(cap_stem,0); pos12(cap_stem,0);
-lft x11l=lft x12l=hround xshift+max(2u,3u-.5cap_stem); top y11=h; bot y12=0;
-filldraw stroke z11e--z12e; % stem
-pickup crisp.nib; pos13(slab,-90); pos14(hair,0);
-bot y13r=0; x13=x12; y14=y13l+7/6beak+eps; rt x14r=hround(w-.75u);
-arm(13,14,eee,1.2beak_darkness,beak_jut); % lower arm and beak
-if serifs: dish_serif(11,12,aaa,1/3,cap_jut,bbb,1/3,1.25cap_jut); % upper serif
- nodish_serif(12,11,ccc,1/3,cap_jut,ddd,1/3,.5cap_jut); fi % lower serif
-math_fit(0,ic#-2.5u#); penlabels(0,1,2,3,4,5,6,7,8,9,11,12); endchar;
-
-lhchar "Small Caps letter FFI";
-beginchar(oct"036",2(11.5u#-width_adj#)+max(6u#,4u#+cap_stem#),cap_height#,0);
-italcorr cap_height#*slant-.25u#;
-normal_adjust_fit(cap_serif_fit#,0);
-h:=vround(h-stem_corr);
-w':=11.5u-width_adj;
-pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
-lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
-filldraw stroke z1e--z2e; % stem
-pickup crisp.nib; pos3(slab,90); pos4(hair,0);
-top y3r=h; x3=x1; rt x4r=hround(w'-.75u); y4=good.y(y3l-beak)-eps;
-arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
-pos5(cap_bar,-90); pos6(hair,0);
-top y5l=vround(.5[y2,y1]+.5cap_bar); x5=x1;
-pos0(cap_bar,90); pos7(hair,0);
-z0=z5; x6=x7; y6-y5l=y0l-y7;
-if serifs: rt x6r=hround(w'-4u+.5hair); y6=good.y(y5l+.6beak)+eps;
- rt x9r=hround(w'-.5u);
-else: rt x6r=hround(w'-1.5u); y6=y5l+eps; rt x9r=hround(w'-.75u); fi
-arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
-if serifs: nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
- dish_serif(2,1,c,1/3,cap_jut,d,1/3,1.25cap_jut); fi % lower serif
-% the second F
-currentpicture:=currentpicture + currentpicture shifted (w',0);
-% the I
-xshift:=2w';
-w':=w-xshift;
-pickup tiny.nib; pos11(cap_stem,0); pos12(cap_stem,0);
-lft x11l=lft x12l=hround(xshift+.5w'-.5cap_stem); top y11=h; bot y12=0;
-filldraw stroke z11e--z12e; % stem
-if serifs or slitex or monospace:
- dish_serif(11,12,aa,1/3,1.05cap_jut,bb,1/3,1.05cap_jut); % upper serif
- dish_serif(12,11,gg,1/3,1.05cap_jut,dd,1/3,1.05cap_jut); fi % lower serif
-math_fit(0,ic#-2.5u#); penlabels(0,1,2,3,4,5,6,7,8,9,11,12); endchar;
-
-lhchar "Small Caps letter FFL";
-beginchar(oct"037",2(11.5u#-width_adj#)+11u#-width_adj#,cap_height#,0);
-italcorr cap_height#*slant-.25u#;
-normal_adjust_fit(cap_serif_fit#,0);
-h:=vround(h-stem_corr);
-w':=11.5u-width_adj;
-pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
-lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
-filldraw stroke z1e--z2e; % stem
-pickup crisp.nib; pos3(slab,90); pos4(hair,0);
-top y3r=h; x3=x1; rt x4r=hround(w'-.75u); y4=good.y(y3l-beak)-eps;
-arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
-pos5(cap_bar,-90); pos6(hair,0);
-top y5l=vround(.5[y2,y1]+.5cap_bar); x5=x1;
-pos0(cap_bar,90); pos7(hair,0);
-z0=z5; x6=x7; y6-y5l=y0l-y7;
-if serifs: rt x6r=hround(w'-4u+.5hair); y6=good.y(y5l+.6beak)+eps;
- rt x9r=hround(w'-.5u);
-else: rt x6r=hround(w'-1.5u); y6=y5l+eps; rt x9r=hround(w'-.75u); fi
-arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
-if serifs: nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
- dish_serif(2,1,c,1/3,cap_jut,d,1/3,1.25cap_jut); fi % lower serif
-% the I
-currentpicture:=currentpicture + currentpicture shifted (w',0);
-% the L
-xshift:=2w';
-pickup tiny.nib; pos11(cap_stem,0); pos12(cap_stem,0);
-lft x11l=lft x12l=hround xshift+max(2u,3u-.5cap_stem); top y11=h; bot y12=0;
-filldraw stroke z11e--z12e; % stem
-pickup crisp.nib; pos13(slab,-90); pos14(hair,0);
-bot y13r=0; x13=x12; y14=y13l+7/6beak+eps; rt x14r=hround(w-.75u);
-arm(13,14,eee,1.2beak_darkness,beak_jut); % lower arm and beak
-if serifs: dish_serif(11,12,aaa,1/3,cap_jut,bbb,1/3,1.25cap_jut); % upper serif
- nodish_serif(12,11,ccc,1/3,cap_jut,ddd,1/3,.5cap_jut); fi % lower serif
-math_fit(0,ic#-2.5u#); penlabels(0,1,2,3,4,5,6,7,8,9,11,12); endchar;
-
-endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgcyracc.mf b/Master/texmf-dist/fonts/source/lh/base/lgcyracc.mf
index 637f7883d79..fae5347a9cf 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgcyracc.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgcyracc.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -56,7 +56,7 @@
% Acomma - comma above letter
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
%accents
%
@@ -253,6 +253,7 @@ filldraw stroke z[_one]e{up}...
%
penlabels(1,2,3); endchar;
+if not more_letters: endinput \\; fi
%
% T2-outsiders
%
@@ -462,11 +463,12 @@ adjust_fit(0,0);
y[_four]+.5bulb_diam=-d+y_move+height;
pos[_four](bulb_diam,90);
pos[_one](vair,90); pos[_two](vair,0); pos[_three](vair,-45);
- z[_one]r=z[_four]r; rt x[_two]r=hround(x[_four]+.5bulb_diam
+ z[_one]r=z[_four]r;
+ rt x[_two]r=hround max(rt x[_one]+eps,x[_four]+.5bulb_diam
+if monospace:.28u / expansion_factor else:.25u fi)+2eps;
x[_three]=x[_four]-.5u if monospace: /expansion_factor fi;
- y[_two]=1/3[y[_one],y[_three]];
- bot y[_three]r=vround(y[_four]-(height-.5bulb_diam));
+ y[_two]=1/3[y[_one],y[_three]]+eps;
+ bot y[_three]r=vround min(bot y[_four]-.5,y[_four]-(height-.5bulb_diam))-eps;
y_:=ypart((z[_one]{right}...z[_two]{down}...z[_three])
intersectiontimes (z[_four]l{right}..{left}z[_four]r));
if y_<0: y_:=1; fi
@@ -477,4 +479,4 @@ adjust_fit(0,0);
endchar;
endinput;
-%end of file
+%end of file \ No newline at end of file
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgcyri.mf b/Master/texmf-dist/fonts/source/lh/base/lgcyri.mf
index a1cdaf67b19..3952056a53f 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgcyri.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgcyri.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
altaccent:=true; % for cyrillic breve
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgcyrl.mf b/Master/texmf-dist/fonts/source/lh/base/lgcyrl.mf
index fd9e69538cd..1110715840e 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgcyrl.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgcyrl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
input lgrusl; % Russian letters
input lgt2coml; % Letters common for couple of encodings
@@ -38,6 +38,7 @@ if not old_cyr or unic:
fi
if other_cyr:
+ if concrete: input lgnoncl; fi % Cyrillic concrete letters
input lgunicl; % Unicode letters not included in T2
input lgcmodl; % modified letters
input lgcaccl; % accended letters
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgcyrsp.mf b/Master/texmf-dist/fonts/source/lh/base/lgcyrsp.mf
index 734cf04319a..aed89604c1f 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgcyrsp.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgcyrsp.mf
@@ -1,16 +1,16 @@
%
-% lgt2lou.mf
+% lgcyrsp.mf
%
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -24,8 +24,9 @@
% SP_NJE - Specisl title Nje
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
+iff not concrete:%
lhchar "Title Cyrillic letter LJE (Soft L)";
cyrchar(LJE_title,13.5u#,cap_height#,0); % DL_width:N_width
if is_small_cap: getcharcode(lje); fi;
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgcyrsym.mf b/Master/texmf-dist/fonts/source/lh/base/lgcyrsym.mf
index c832b975264..3f3e37f8fb9 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgcyrsym.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgcyrsym.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -40,13 +40,14 @@
% baseqq "bd "bd German Opening quotes (looks like ,,) (ec: "12)
% flqq "be "be Cyrillic Opening Quotes (looks like <<) (ec: "13)
% frqq "bf "bf Cyrillic Closing Quotes (looks like >>) (ec: "14)
+% grqq - - German Closing quotes (looks like ``)
%
% T1/T2-outsiders:
%
% pound ("bf) Sterling sign
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Cyrillic sign palochka (as latin I)";
cyrchar(palochka,max(6u#,4u#+cap_stem#),cap_height#,0);
@@ -225,7 +226,7 @@ cyrchar(No,14.5u#+width_adj#,cap_height#,0);
italcorr cap_height#*slant-cap_serif_fit#+cap_jut#-2.5u#+min(.5cap_stem#,u#);
adjust_fit(if monospace: 0,0 else: cap_serif_fit#
if serifs: +.5(flare#+(cap_stem#-stem#))-.25u#,cap_serif_fit# else:,0 fi fi);
-full_w:=w; w:=if serifs: 10u else: 11.5u fi;
+full_w:=w; w:=if serifs: 9.5u+.5flare-.5fudged.hair else: 11.5u fi;
numeric thin_stem; thin_stem=hround(fudged.hair+stem_corr);
pickup tiny.nib; pos1(thin_stem,0); pos2(thin_stem,0);
pos3(thin_stem,0); pos4(thin_stem,0);
@@ -233,19 +234,21 @@ pickup tiny.nib; top y1=h;
if serifs: top y3=.79h; bot y2=.21h; else: top y3=h; bot y2=0; fi
bot y4=0;
x1=x2; x3=x4; x1l=w-x3r;
-rt x3r=hround min(w-2u,w-3u+.5fudged.cap_stem);
if serifs: numeric bulb_diam; bulb_diam=flare+(cap_stem-stem);
+ rt x3r=hround min(w-max(2u,bulb_diam-2thin_stem-letter_fit),w-3u+.5fudged.cap_stem)+eps;
pos21(thin_stem,-90); pos22(cap_hair,-180); pos23(bulb_diam,-180);
pos31(thin_stem,-90); z31'=z31;
pos31'(thin_stem,90); pos32(cap_hair,0); pos33(bulb_diam,0);
- y23=vround max(.05fig_height+.5bulb_diam,.1fig_height-.5flare)-o;%
- lft x23r=l+letter_fit+.15u; x33=w-x23; y33=h-y22;
+ y23=vround max(.05fig_height+.5bulb_diam,.1fig_height-.5bulb_diam)-o;%
+ lft x23r=min(l+letter_fit+.15u,rt x2r-bulb_diam-1)-eps; x33=w-x23; y33=h-y22;
x21=max(lft x23r+.5bulb_diam,.45[lft x23r,rt x2r]);
x31=w-x21; bot y21r=-oo; top y31l=h+oo;
bulb(21,22,23); bulb(31',32,33);
- filldraw stroke z1e--z2e & pulled_arc.e(2,21); % left stem
- filldraw stroke z4e--z3e & pulled_arc.e(3,31); % right stem
-else: filldraw stroke z1e--z2e; filldraw stroke z4e--z3e; fi
+ filldraw stroke z1e--z2e &{{interim superness:=more_super; super_arc.e(2,21)}}; % left stem
+ filldraw stroke z4e--z3e &{{interim superness:=more_super; super_arc.e(3,31)}}; % right stem
+else:
+ rt x3r=hround min(w-2u,w-3u+.5fudged.cap_stem);
+ filldraw stroke z1e--z2e; filldraw stroke z4e--z3e; fi
if hefty: penpos5(fudged.cap_stem,0); penpos6(fudged.cap_stem,0);
x5l=x1; x6r=x4; y5=h; y6=0;
numeric upper_notch,lower_notch;
@@ -266,18 +269,19 @@ if serifs: if hefty: serif(1,2,a,1/3,-cap_jut); % upper left serif
fi
w:=full_w;
penpos71(vair,90); penpos73(vair',-90);
-if serifs: x72r=x33+hround max(.25u,u-.4curve); x74r=hround(w-.5u);
+if serifs: x72r=x33+hround max(.1u,u-.75flare); x74r=hround(w-.5u);
else: x72r=x3+1.25u+hround max(0,.75u-.4curve); x74r=hround(w-u); fi
penpos72(min(1/3(x74r-x72r),.8curve),180);
penpos74(min(1/3(x74r-x72r),.8curve),0);
-x71=x73=.5[x72r,x74r]; y71r=h-3u+vround 1.5oo; y73r=x_height-3u-oo;
-y72=y74=.5[h,x_height]-3u-vair_corr; y72l:=y74l:=.52[h,x_height]-3u;
+x71=x73=.5[x72r,x74r]; y71r=h-max(3u,flare+(cap_stem-stem)+1.5oo)+vround 1.5oo;
+y73r=x_height-3u-oo;
+y72=y74=.5[y71r,y73r]-vair_corr; y72l:=y74l:=.52[h,x_height]-3u;
penstroke pulled_arc.e(71,72) & pulled_arc.e(72,73)
& pulled_arc.e(73,74) & pulled_arc.e(74,71) & cycle; % bowl
pickup fine.nib; pos81(bar,90); pos82(bar,90);
lft x81=x72r-.25fine; rt x82=x74r+.25fine; y81=y82=.8x_height-3u;
filldraw stroke z81e--z82e;
-penlabels(1,1',2,3,4,4',5,6,7); endchar;
+penlabels(1,1',2,3,4,4',5,6,7, 21,22,23, 31',32,33); endchar;
lhchar "Cyrillic Currency sign"; % from ec ... from rsym (wasy)
cyrchar(currency,1.13 min(asc_height#,9/7x_height#)+2u#,
@@ -356,8 +360,8 @@ numeric the_shift,shift_corr;
the_shift=hround(max(3u,1.7stem)); shift_corr=the_shift-3u;
pos1(max(fine.breadth,
if serifs: qvair else: 7/8[vair,fudged.hair]-3stem_corr fi),0);
-pos2(max(fine.breadth,if serifs:
- if monospace: qvair else: stem fi else:7/8[vair,fudged.hair] fi),0);
+pos2(max(fine.breadth,if serifs:
+ if hefty: qvair else: stem fi else:7/8[vair,fudged.hair] fi),0);
pos3(max(fine.breadth,
if serifs: qvair else: 7/8[vair,fudged.hair]-3stem_corr fi),0);
rt x1r=rt x3r=
@@ -372,9 +376,12 @@ if hefty:
filldraw stroke z1e--z2e--z3e; % outer <
filldraw stroke z1'e--z2'e--z3'e; % inner <
else:
- pos1'(qvair,0);
- pos2'(7/8 [hair,stem],0);
- pos3'(qvair,0);
+ pos1'(max(fine.breadth,
+ if serifs: qvair else: 7/8[vair,fudged.hair]-3stem_corr fi),0);
+ pos2'(max(fine.breadth,if serifs:
+ 2/3[vair,fudged.stem] else: 7/8[vair,fudged.hair] fi),0);
+ pos3'(max(fine.breadth,
+ if serifs: qvair else: 7/8[vair,fudged.hair]-3stem_corr fi),0);
z2'=z2+the_shift*right;
y1'-y2'=y2'-y3'=.8(y1-y2);
z1'=z2'+whatever*(z1r-z2r); z3'=z2'+whatever*(z2r-z3r);
@@ -401,8 +408,8 @@ numeric the_shift,shift_corr;
the_shift=hround(max(3u,1.7stem)); shift_corr=the_shift-3u;
pos1(max(fine.breadth,
if serifs: qvair else: 7/8[vair,fudged.hair]-3stem_corr fi),0);
-pos2(max(fine.breadth,if serifs:
- if monospace: qvair else: stem fi else:7/8[vair,fudged.hair] fi),0);
+pos2(max(fine.breadth,if serifs:
+ if hefty: qvair else: stem fi else:7/8[vair,fudged.hair] fi),0);
pos3(max(fine.breadth,
if serifs: qvair else: 7/8[vair,fudged.hair]-3stem_corr fi),0);
lft x1l=lft x3l=w-
@@ -417,9 +424,12 @@ if hefty:
filldraw stroke z1e--z2e--z3e; % outer <
filldraw stroke z1'e--z2'e--z3'e; % inner <
else:
- pos1'(qvair,0);
- pos2'(7/8 [hair,stem],0);
- pos3'(qvair,0);
+ pos1'(max(fine.breadth,
+ if serifs: qvair else: 7/8[vair,fudged.hair]-3stem_corr fi),0);
+ pos2'(max(fine.breadth,if serifs:
+ 2/3[vair,fudged.stem] else: 7/8[vair,fudged.hair] fi),0);
+ pos3'(max(fine.breadth,
+ if serifs: qvair else: 7/8[vair,fudged.hair]-3stem_corr fi),0);
z2'=z2+the_shift*left;
y1'-y2'=y2'-y3'=.8(y1-y2);
z1'=z2'+whatever*(z1l-z2l); z3'=z2'+whatever*(z2l-z3l);
@@ -455,5 +465,16 @@ pos10(bar,90); pos11(bar,90); x10=3u; x11=w-4.5u;
top y10r=top y11r=vround(.5h+.5bar); filldraw stroke z10e--z11e; % bar
penlabels(1,2,3,4,5,6,7,8,9,10,11); endchar;
+iff (altcoding and (ligs <> 0)): % for CM
+lhchar "Cyrillic `German close quotes' (like English opening quotes)";
+cyrchar(grqq,7u#+max(2u#,dot_size#),asc_height#,0);
+italcorr asc_height#*slant+dot_size#-4.1u#;
+adjust_fit(0,0);
+x1-.5dot_size=hround .6u; y2+.5dot_size=h;
+x2-x1=hround(1.5u+max(2u,dot_size)); y2=y1;
+ammoc(1,a,dot_size,.25u,comma_depth); % left dot and tail
+ammoc(2,b,dot_size,.25u,comma_depth); % right dot and tail
+penlabels(1,2); endchar;
+
endinput;
%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgcyru.mf b/Master/texmf-dist/fonts/source/lh/base/lgcyru.mf
index 0437b340dd0..db98f47c14b 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgcyru.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgcyru.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
if is_small_cap: % for accents
%%% fine higher
@@ -52,6 +52,7 @@ if not old_cyr or unic:
fi
if other_cyr:
+ if concrete: input lgnoncu; fi % Cyrillic concrete letters
input lgunicu; % Unicode letters not included in T2
input lgcmodu; % modified letters
input lgcaccu; % accended letters
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgengsym.mf b/Master/texmf-dist/fonts/source/lh/base/lgengsym.mf
index 01397b58735..6f225541cef 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgengsym.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgengsym.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -67,7 +67,7 @@
% "7f oct"177" - Hyphenchar
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Opening quotes";
beginchar(oct"020",3u#+max(2u#,pdot_diam#),asc_height#,0);
@@ -99,6 +99,7 @@ top y1r=top y2r=vround(.61803h+.5vair); lft x1=-eps; rt x2=w+eps;
filldraw stroke z1e--z2e; % bar
penlabels(1,2); endchar;
+
iff monospace:
lhchar "Hyphen";
beginchar(oct"025",6u#,x_height#,0);
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgidigit.mf b/Master/texmf-dist/fonts/source/lh/base/lgidigit.mf
index deb2b5d3efa..aecddeea507 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgidigit.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgidigit.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -21,7 +21,7 @@
% italic numerals
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
% All digits have the same width
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgilig.mf b/Master/texmf-dist/fonts/source/lh/base/lgilig.mf
index 98bbe913b79..3b0072af4ba 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgilig.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgilig.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -22,16 +22,10 @@
%
% i_dotl "19 i dotless
% j_dotl "1a j dotless
-% ff-ligs (lgiligff.mf)
+% ff-ligs
%
-LHver_check(3,4); % like |version_check| in ec
-
-if (roman_ec=true) and (old_cyr=false):
-
-input lgiligff.mf
-
-fi %roman_ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Italic Cyrillic letter dotless i";
cyrchar(i_dotl,5u#,x_height#,0);
@@ -55,5 +49,222 @@ filldraw stroke z2e---z3e...{left}z4e; % stem and arc
bulb(4,5,6); % bulb
penlabels(0,1,2,3,4,5,6); endchar;
+if (roman_ec=true) and (old_cyr=false): %relax
+else: endinput \\; fi
+
+numeric itc; % modified italic correction on `f' and `ff'
+itc=(asc_height#-x_height#)*slant+.75u#;
+
+lhchar "Italic ligature ff";
+beginchar(oct"033",
+%if monospace: 12u# else:
+(5u#+max(1.5u#,stem#)+max(3.5u#,2flare#))+2letter_fit#, % fi,
+ asc_height#,desc_depth#);
+italcorr asc_height#*slant+.75u#;
+normal_adjust_fit(0,0); pickup fine.nib;
+z98-z88=z99-z89=z14-z4=z15-z5=(if monospace: 4.3u else: 4.8u fi +2letter_fit,0);
+.5[x88,x99]=.5w-.1u; x89-x88=u; y98=h; y99=-d;
+numeric theta; theta=angle(z88-z89);
+pos0(flare,0); pos1(hair,0); pos2(vair,90);
+pos3(.5[hair,stem],180); pos4(stem,theta+90);
+pos5(stem,theta-90); pos6(.5[hair,stem],0);
+pos7(vair,-90); pos8(hair,-180); pos9(flare,-180);
+if monospace: rt x1r=hround(.5w+.75u);
+else:
+ rt x1r=hround(.5w+1.25u);
+fi
+%if monospace: lft x8r=hround-.35u;
+%else:
+lft x8r=hround-.35u;
+%fi
+x2=.5[x1,x4]; x7=.6[x8,x5];
+y9-.5flare=vround -.85d; y2-y0=y9-y7; top y2r=h+oo; bot y7r=-d-oo;
+y4=.25[x_height,h]; y5=.5[-d,y4];
+z4=whatever[z88,z89]; z5=whatever[z88,z89];
+x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7];
+bulb(2,1,0); bulb(7,8,9); % left bulbs
+filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper middle arc
+filldraw z4r--z5l--z5r--z4l--cycle; % left stem
+filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower left arc
+pos10(flare,0); pos11(hair,0); pos12(vair,90);
+pos13(.5[hair,stem],180); pos14(stem,theta+90);
+pos15(stem,theta-90); pos16(.5[hair,stem],0);
+pos17(vair,-90); pos18(hair,-180); pos19(flare,-180);
+rt x11r=hround(w+.25u);
+if monospace: lft x18r=hround(.5w-.75u);
+else: lft x18r=hround(.5w-1.25u); fi
+x12=.6[x11,x14]; x17=.5[x18,x15];
+x13=.8[x12+x14-x98,x98]; x16=.8[x17+x15-x99,x99];
+y0=y10; y2=y12; y3=y13; y6=y16; y7=y17; y9=y19;
+bulb(12,11,10); bulb(17,18,19); % right bulbs
+filldraw stroke z12e{left}...z13e...{z99-z98}z14e; % upper right arc
+filldraw z14r--z15l--z15r--z14l--cycle; % right stem
+filldraw stroke z15e{z99-z98}...z16e...{left}z17e; % lower middle arc
+pickup crisp.nib; pos20(bar,90); pos21(bar,90);
+top y20r=top y21r=x_height;
+lft x20=lft x4r-.5stem-u; rt x21=rt x14l+.5stem+1.5u;
+filldraw stroke z20e--z21e; % crossbar
+penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,
+ 20,21,88,89,98,99); endchar;
+
+lhchar "Italic ligature fi";
+beginchar(oct"034",if monospace: 4.5u# else: 6.5u# fi +.5max(1.5u#,stem#)+.5max(3.5u#,2flare#)
+ +2letter_fit#,asc_height#,desc_depth#);
+italcorr max(asc_height#*slant+.5stem#-2u#,1/3x_height#*slant+.5hair#+.5u#);
+normal_adjust_fit(0,0); pickup fine.nib;
+.5[x88,x89]=.5(w-if monospace: 2u else: 4u fi -2letter_fit); x89-x88=u; y88=h; y89=-d;
+numeric theta; theta=angle(z88-z89);
+pos0(flare,0); pos1(hair,0); pos2(vair,90);
+pos3(.5[hair,stem],180); pos4(stem,theta+90);
+pos5(stem,theta-90); pos6(.5[hair,stem],0);
+pos7(vair,-90); pos8(hair,-180); pos9(flare,-180);
+pos11(stem,0); rt x11r=hround(w-2.5u+.5stem);
+x12=x11; x14=w; hook_out(12,13,14); % closing hook
+x1r=x11r; lft x8r=hround-.35u; x2=.5[x1,x4]; x7=.6[x8,x5];
+y9-.5flare=vround-.85d; bot y7r=-d-oo;
+y0+.5flare=vround(.85[x_height,h]); top y2r=h+oo;
+y4=.25[x_height,h]; y5=.5[-d,y4];
+z4=whatever[z88,z89]; z5=whatever[z88,z89];
+x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7];
+bulb(2,1,0); bulb(7,8,9); % bulbs
+filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper arc
+filldraw z4r--z5l--z5r--z4l--cycle; % left stem
+filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower arc
+top y11=x_height; filldraw stroke z11e--z12e; % right stem
+pickup crisp.nib; pos20(bar,90); pos21(bar,90);
+top y20r=top y21r=x_height;
+lft x20=lft x4r-.5stem-u; x21=x11;
+filldraw stroke z20e--z21e; % crossbar
+penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,20,21,88,89); endchar;
+
+lhchar "Italic ligature fl";
+beginchar(oct"035",if monospace: 5u# else: 7u# fi +.5max(1.5u#,stem#)+.5max(3.5u#,2flare#)
+ +2letter_fit#,asc_height#,desc_depth#);
+italcorr max(asc_height#*slant+.5stem#-2u#,1/3x_height#*slant+.5hair#+.5u#);
+normal_adjust_fit(0,0); pickup fine.nib;
+.5[x88,x89]=.5(w-if monospace: 3.5u else: 4.5u fi -2letter_fit);
+x89-x88=u; y88=h; y89=-d;
+numeric theta; theta=angle(z88-z89);
+pos0(flare,0); pos1(hair,0); pos2(vair,90);
+pos3(.5[hair,stem],180); pos4(stem,theta+90);
+pos5(stem,theta-90); pos6(.5[hair,stem],0);
+pos7(vair,-90); pos8(hair,-180); pos9(flare,-180);
+pos11(stem,0); rt x11r=hround(w-2.5u+.5stem); rt x1r=lft x11l;
+x12=x11; x14=w; hook_out(12,13,14); % closing hook
+if monospace: lft x8r=hround-.55u;
+else: lft x8r=hround-.35u; fi
+x2=.5[x1,x4]; x7=.6[x8,x5];
+y9-.5flare=vround -.85d; y2-y0=y9-y7; top y2r=h+oo; bot y7r=-d-oo;
+y4=.25[x_height,h]; y5=.5[-d,y4];
+z4=whatever[z88,z89]; z5=whatever[z88,z89];
+x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7];
+bulb(2,1,0); bulb(7,8,9); % bulbs
+filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper arc
+filldraw z4r--z5l--z5r--z4l--cycle; % left stem
+filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower arc
+top y11=h; filldraw stroke z11e--z12e; % right stem
+pickup crisp.nib; pos20(bar,90); pos21(bar,90);
+top y20r=top y21r=x_height;
+lft x20=lft x4r-.5stem-u; x21=x11;
+filldraw stroke z20e--z21e; % crossbar
+penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,20,21,88,89); endchar;
+
+lhchar "Italic ligature ffi";
+beginchar(oct"036",
+if monospace: 7.75u# else: 11.75u# fi +.5max(1.5u#,stem#)+.5max(3.5u#,2flare#)
+ +4letter_fit#,asc_height#,desc_depth#);
+italcorr max(asc_height#*slant+.5stem#-2u#,1/3x_height#*slant+.5hair#+.5u#);
+normal_adjust_fit(0,0); pickup fine.nib;
+z98-z88=z99-z89=z14-z4=z15-z5=(if monospace: 3u else: 5u fi +2letter_fit,0);
+numeric theta,mid_f;
+mid_f=.5[x88,x99]=.5(w-if monospace: 2.25u else: 4.25u fi -2letter_fit);
+x89-x88=u;
+y98=h; y99=-d; theta=angle(z88-z89);
+pos21(stem,0); rt x21r=hround(w-2.5u+.5stem);
+x22=x21; x24=w; hook_out(22,23,24); % closing hook
+pos0(flare,0); pos1(hair,0); pos2(vair,90);
+pos3(.5[hair,stem],180); pos4(stem,theta+90);
+pos5(stem,theta-90); pos6(.5[hair,stem],0);
+pos7(vair,-90); pos8(hair,-180); pos9(flare,-180);
+if monospace: rt x1r=hround(mid_f+u);
+else: rt x1r=hround(mid_f+1.75u); fi
+if monospace: lft x8r=hround -.65u;
+else: lft x8r=hround-.35u; fi
+x2=.5[x1,x4]; x7=.6[x8,x5];
+y9-.5flare=vround -.85d; y2-y0=y9-y7; top y2r=h+oo; bot y7r=-d-oo;
+y4=.25[x_height,h]; y5=.5[-d,y4];
+z4=whatever[z88,z89]; z5=whatever[z88,z89];
+x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7];
+bulb(2,1,0); bulb(7,8,9); % left bulbs
+filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper middle arc
+filldraw z4r--z5l--z5r--z4l--cycle; % left stem
+filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower left arc
+pos10(flare,0); pos11(hair,0); pos12(vair,90);
+pos13(.5[hair,stem],180); pos14(stem,theta+90);
+pos15(stem,theta-90); pos16(.5[hair,stem],0);
+pos17(vair,-90); pos18(hair,-180); pos19(flare,-180);
+x11r=x21r; lft x18r=hround(mid_f-1.25u); x12=.5[x11,x14]; x17=.5[x18,x15];
+x13=.8[x12+x14-x98,x98]; x16=.8[x17+x15-x99,x99];
+y10+.5flare=vround .85[x_height,h];
+y2=y12; y3=y13; y6=y16; y7=y17; y9=y19;
+bulb(12,11,10); bulb(17,18,19); % right bulbs
+filldraw stroke z12e{left}...z13e...{z99-z98}z14e; % upper right arc
+filldraw z14r--z15l--z15r--z14l--cycle; % middle stem
+filldraw stroke z15e{z99-z98}...z16e...{left}z17e; % lower middle arc
+top y21=x_height; filldraw stroke z21e--z22e; % right stem
+pickup crisp.nib; pos30(bar,90); pos31(bar,90);
+top y30r=top y31r=x_height;
+lft x30=lft x4r-.5stem-u; x31=x21;
+filldraw stroke z30e--z31e; % crossbar
+penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,
+ 20,21,22,23,24,30,31,88,89,98,99); endchar;
+
+lhchar "Italic ligature ffl";
+beginchar(oct"037",
+ if monospace: 8u# else: 12u# fi +.5max(1.5u#,stem#)+.5max(3.5u#,2flare#)
+ +4letter_fit#,asc_height#,desc_depth#);
+italcorr max(asc_height#*slant+.5stem#-2u#,1/3x_height#*slant+.5hair#+.5u#);
+normal_adjust_fit(0,0); pickup fine.nib;
+z98-z88=z99-z89=z14-z4=z15-z5=(if monospace: 3u else: 5u fi+2letter_fit,0);
+numeric theta,mid_f;
+mid_f=.5[x88,x99]=.5(w-if monospace: 2u else: 4.5u fi-2letter_fit); x89-x88=u;
+y98=h; y99=-d; theta=angle(z88-z89);
+pos21(stem,0); rt x21r=hround(w-2.5u+.5stem);
+x22=x21; x24=w; hook_out(22,23,24); % closing hook
+pos0(flare,0); pos1(hair,0); pos2(vair,90);
+pos3(.5[hair,stem],180); pos4(stem,theta+90);
+pos5(stem,theta-90); pos6(.5[hair,stem],0);
+pos7(vair,-90); pos8(hair,-180); pos9(flare,-180);
+if monospace: rt x1r=hround(mid_f+u);
+else: rt x1r=hround(mid_f+1.25u); fi
+lft x8r=hround-.35u;
+x2=.5[x1,x4]; x7=.6[x8,x5];
+y9-.5flare=vround -.85d; y2-y0=y9-y7; top y2r=h+oo; bot y7r=-d-oo;
+y4=.25[x_height,h]; y5=.5[-d,y4];
+z4=whatever[z88,z89]; z5=whatever[z88,z89];
+x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7];
+bulb(2,1,0); bulb(7,8,9); % left bulbs
+filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper middle arc
+filldraw z4r--z5l--z5r--z4l--cycle; % left stem
+filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower left arc
+pos10(flare,0); pos11(hair,0); pos12(vair,90);
+pos13(.5[hair,stem],180); pos14(stem,theta+90);
+pos15(stem,theta-90); pos16(.5[hair,stem],0);
+pos17(vair,-90); pos18(hair,-180); pos19(flare,-180); rt x11r=lft x21l;
+lft x18r=hround(mid_f-1.25u); x12=.5[x11,x14]; x17=.5[x18,x15];
+x13=.8[x12+x14-x98,x98]; x16=.8[x17+x15-x99,x99];
+y0=y10; y2=y12; y3=y13; y6=y16; y7=y17; y9=y19;
+bulb(12,11,10); bulb(17,18,19); % right bulbs
+filldraw stroke z12e{left}...z13e...{z99-z98}z14e; % upper right arc
+filldraw z14r--z15l--z15r--z14l--cycle; % middle stem
+filldraw stroke z15e{z99-z98}...z16e...{left}z17e; % lower middle arc
+top y21=h; filldraw stroke z21e--z22e; % right stem
+pickup crisp.nib; pos30(bar,90); pos31(bar,90);
+top y30r=top y31r=x_height;
+lft x30=lft x4r-.5stem-u; x31=x21;
+filldraw stroke z30e--z31e; % crossbar
+penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,
+ 20,21,22,23,24,30,31,88,89,98,99); endchar;
+
endinput;
%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgiligff.mf b/Master/texmf-dist/fonts/source/lh/base/lgiligff.mf
deleted file mode 100644
index 648b9fbb69f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/base/lgiligff.mf
+++ /dev/null
@@ -1,242 +0,0 @@
-%
-% lgilig.mf
-%
-%% Cyrillic font container with T2 encoding beta-support
-%
-% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
-% (c) O.Lapko
-%
-% This package belongs to the public domain under conditions similar to
-% those of D. E. Knuth specified for the Computer Modern family of fonts.
-% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
-%
-% Content:
-%
-% roman dotless i,j
-%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-% Special letters
-%
-% ff-ligs
-%
-
-LHver_check(3,4); % like |version_check| in ec
-
-numeric itc; % modified italic correction on `f' and `ff'
-itc=(asc_height#-x_height#)*slant+.75u#;
-
-lhchar "Italic ligature ff";
-beginchar(oct"033",
-%if monospace: 12u# else:
-(5u#+max(1.5u#,stem#)+max(3.5u#,2flare#))+2letter_fit#, % fi,
- asc_height#,desc_depth#);
-italcorr asc_height#*slant+.75u#;
-normal_adjust_fit(0,0); pickup fine.nib;
-z98-z88=z99-z89=z14-z4=z15-z5=(if monospace: 4.3u else: 4.8u fi +2letter_fit,0);
-.5[x88,x99]=.5w-.1u; x89-x88=u; y98=h; y99=-d;
-numeric theta; theta=angle(z88-z89);
-pos0(flare,0); pos1(hair,0); pos2(vair,90);
-pos3(.5[hair,stem],180); pos4(stem,theta+90);
-pos5(stem,theta-90); pos6(.5[hair,stem],0);
-pos7(vair,-90); pos8(hair,-180); pos9(flare,-180);
-if monospace: rt x1r=hround(.5w+.75u);
-else:
- rt x1r=hround(.5w+1.25u);
-fi
-%if monospace: lft x8r=hround-.35u;
-%else:
-lft x8r=hround-.35u;
-%fi
-x2=.5[x1,x4]; x7=.6[x8,x5];
-y9-.5flare=vround -.85d; y2-y0=y9-y7; top y2r=h+oo; bot y7r=-d-oo;
-y4=.25[x_height,h]; y5=.5[-d,y4];
-z4=whatever[z88,z89]; z5=whatever[z88,z89];
-x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7];
-bulb(2,1,0); bulb(7,8,9); % left bulbs
-filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper middle arc
-filldraw z4r--z5l--z5r--z4l--cycle; % left stem
-filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower left arc
-pos10(flare,0); pos11(hair,0); pos12(vair,90);
-pos13(.5[hair,stem],180); pos14(stem,theta+90);
-pos15(stem,theta-90); pos16(.5[hair,stem],0);
-pos17(vair,-90); pos18(hair,-180); pos19(flare,-180);
-rt x11r=hround(w+.25u);
-if monospace: lft x18r=hround(.5w-.75u);
-else: lft x18r=hround(.5w-1.25u); fi
-x12=.6[x11,x14]; x17=.5[x18,x15];
-x13=.8[x12+x14-x98,x98]; x16=.8[x17+x15-x99,x99];
-y0=y10; y2=y12; y3=y13; y6=y16; y7=y17; y9=y19;
-bulb(12,11,10); bulb(17,18,19); % right bulbs
-filldraw stroke z12e{left}...z13e...{z99-z98}z14e; % upper right arc
-filldraw z14r--z15l--z15r--z14l--cycle; % right stem
-filldraw stroke z15e{z99-z98}...z16e...{left}z17e; % lower middle arc
-pickup crisp.nib; pos20(bar,90); pos21(bar,90);
-top y20r=top y21r=x_height;
-lft x20=lft x4r-.5stem-u; rt x21=rt x14l+.5stem+1.5u;
-filldraw stroke z20e--z21e; % crossbar
-penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,
- 20,21,88,89,98,99); endchar;
-
-lhchar "Italic ligature fi";
-beginchar(oct"034",if monospace: 4.5u# else: 6.5u# fi +.5max(1.5u#,stem#)+.5max(3.5u#,2flare#)
- +2letter_fit#,asc_height#,desc_depth#);
-italcorr max(asc_height#*slant+.5stem#-2u#,1/3x_height#*slant+.5hair#+.5u#);
-normal_adjust_fit(0,0); pickup fine.nib;
-.5[x88,x89]=.5(w-if monospace: 2u else: 4u fi -2letter_fit); x89-x88=u; y88=h; y89=-d;
-numeric theta; theta=angle(z88-z89);
-pos0(flare,0); pos1(hair,0); pos2(vair,90);
-pos3(.5[hair,stem],180); pos4(stem,theta+90);
-pos5(stem,theta-90); pos6(.5[hair,stem],0);
-pos7(vair,-90); pos8(hair,-180); pos9(flare,-180);
-pos11(stem,0); rt x11r=hround(w-2.5u+.5stem);
-x12=x11; x14=w; hook_out(12,13,14); % closing hook
-x1r=x11r; lft x8r=hround-.35u; x2=.5[x1,x4]; x7=.6[x8,x5];
-y9-.5flare=vround-.85d; bot y7r=-d-oo;
-y0+.5flare=vround(.85[x_height,h]); top y2r=h+oo;
-y4=.25[x_height,h]; y5=.5[-d,y4];
-z4=whatever[z88,z89]; z5=whatever[z88,z89];
-x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7];
-bulb(2,1,0); bulb(7,8,9); % bulbs
-filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper arc
-filldraw z4r--z5l--z5r--z4l--cycle; % left stem
-filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower arc
-top y11=x_height; filldraw stroke z11e--z12e; % right stem
-pickup crisp.nib; pos20(bar,90); pos21(bar,90);
-top y20r=top y21r=x_height;
-lft x20=lft x4r-.5stem-u; x21=x11;
-filldraw stroke z20e--z21e; % crossbar
-penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,20,21,88,89); endchar;
-
-lhchar "Italic ligature fl";
-beginchar(oct"035",if monospace: 5u# else: 7u# fi +.5max(1.5u#,stem#)+.5max(3.5u#,2flare#)
- +2letter_fit#,asc_height#,desc_depth#);
-italcorr max(asc_height#*slant+.5stem#-2u#,1/3x_height#*slant+.5hair#+.5u#);
-normal_adjust_fit(0,0); pickup fine.nib;
-.5[x88,x89]=.5(w-if monospace: 3.5u else: 4.5u fi -2letter_fit);
-x89-x88=u; y88=h; y89=-d;
-numeric theta; theta=angle(z88-z89);
-pos0(flare,0); pos1(hair,0); pos2(vair,90);
-pos3(.5[hair,stem],180); pos4(stem,theta+90);
-pos5(stem,theta-90); pos6(.5[hair,stem],0);
-pos7(vair,-90); pos8(hair,-180); pos9(flare,-180);
-pos11(stem,0); rt x11r=hround(w-2.5u+.5stem); rt x1r=lft x11l;
-x12=x11; x14=w; hook_out(12,13,14); % closing hook
-if monospace: lft x8r=hround-.55u;
-else: lft x8r=hround-.35u; fi
-x2=.5[x1,x4]; x7=.6[x8,x5];
-y9-.5flare=vround -.85d; y2-y0=y9-y7; top y2r=h+oo; bot y7r=-d-oo;
-y4=.25[x_height,h]; y5=.5[-d,y4];
-z4=whatever[z88,z89]; z5=whatever[z88,z89];
-x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7];
-bulb(2,1,0); bulb(7,8,9); % bulbs
-filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper arc
-filldraw z4r--z5l--z5r--z4l--cycle; % left stem
-filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower arc
-top y11=h; filldraw stroke z11e--z12e; % right stem
-pickup crisp.nib; pos20(bar,90); pos21(bar,90);
-top y20r=top y21r=x_height;
-lft x20=lft x4r-.5stem-u; x21=x11;
-filldraw stroke z20e--z21e; % crossbar
-penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,20,21,88,89); endchar;
-
-lhchar "Italic ligature ffi";
-beginchar(oct"036",
-if monospace: 7.75u# else: 11.75u# fi +.5max(1.5u#,stem#)+.5max(3.5u#,2flare#)
- +4letter_fit#,asc_height#,desc_depth#);
-italcorr max(asc_height#*slant+.5stem#-2u#,1/3x_height#*slant+.5hair#+.5u#);
-normal_adjust_fit(0,0); pickup fine.nib;
-z98-z88=z99-z89=z14-z4=z15-z5=(if monospace: 3u else: 5u fi +2letter_fit,0);
-numeric theta,mid_f;
-mid_f=.5[x88,x99]=.5(w-if monospace: 2.25u else: 4.25u fi -2letter_fit);
-x89-x88=u;
-y98=h; y99=-d; theta=angle(z88-z89);
-pos21(stem,0); rt x21r=hround(w-2.5u+.5stem);
-x22=x21; x24=w; hook_out(22,23,24); % closing hook
-pos0(flare,0); pos1(hair,0); pos2(vair,90);
-pos3(.5[hair,stem],180); pos4(stem,theta+90);
-pos5(stem,theta-90); pos6(.5[hair,stem],0);
-pos7(vair,-90); pos8(hair,-180); pos9(flare,-180);
-if monospace: rt x1r=hround(mid_f+u);
-else: rt x1r=hround(mid_f+1.75u); fi
-if monospace: lft x8r=hround -.65u;
-else: lft x8r=hround-.35u; fi
-x2=.5[x1,x4]; x7=.6[x8,x5];
-y9-.5flare=vround -.85d; y2-y0=y9-y7; top y2r=h+oo; bot y7r=-d-oo;
-y4=.25[x_height,h]; y5=.5[-d,y4];
-z4=whatever[z88,z89]; z5=whatever[z88,z89];
-x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7];
-bulb(2,1,0); bulb(7,8,9); % left bulbs
-filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper middle arc
-filldraw z4r--z5l--z5r--z4l--cycle; % left stem
-filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower left arc
-pos10(flare,0); pos11(hair,0); pos12(vair,90);
-pos13(.5[hair,stem],180); pos14(stem,theta+90);
-pos15(stem,theta-90); pos16(.5[hair,stem],0);
-pos17(vair,-90); pos18(hair,-180); pos19(flare,-180);
-x11r=x21r; lft x18r=hround(mid_f-1.25u); x12=.5[x11,x14]; x17=.5[x18,x15];
-x13=.8[x12+x14-x98,x98]; x16=.8[x17+x15-x99,x99];
-y10+.5flare=vround .85[x_height,h];
-y2=y12; y3=y13; y6=y16; y7=y17; y9=y19;
-bulb(12,11,10); bulb(17,18,19); % right bulbs
-filldraw stroke z12e{left}...z13e...{z99-z98}z14e; % upper right arc
-filldraw z14r--z15l--z15r--z14l--cycle; % middle stem
-filldraw stroke z15e{z99-z98}...z16e...{left}z17e; % lower middle arc
-top y21=x_height; filldraw stroke z21e--z22e; % right stem
-pickup crisp.nib; pos30(bar,90); pos31(bar,90);
-top y30r=top y31r=x_height;
-lft x30=lft x4r-.5stem-u; x31=x21;
-filldraw stroke z30e--z31e; % crossbar
-penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,
- 20,21,22,23,24,30,31,88,89,98,99); endchar;
-
-lhchar "Italic ligature ffl";
-beginchar(oct"037",
- if monospace: 8u# else: 12u# fi +.5max(1.5u#,stem#)+.5max(3.5u#,2flare#)
- +4letter_fit#,asc_height#,desc_depth#);
-italcorr max(asc_height#*slant+.5stem#-2u#,1/3x_height#*slant+.5hair#+.5u#);
-normal_adjust_fit(0,0); pickup fine.nib;
-z98-z88=z99-z89=z14-z4=z15-z5=(if monospace: 3u else: 5u fi+2letter_fit,0);
-numeric theta,mid_f;
-mid_f=.5[x88,x99]=.5(w-if monospace: 2u else: 4.5u fi-2letter_fit); x89-x88=u;
-y98=h; y99=-d; theta=angle(z88-z89);
-pos21(stem,0); rt x21r=hround(w-2.5u+.5stem);
-x22=x21; x24=w; hook_out(22,23,24); % closing hook
-pos0(flare,0); pos1(hair,0); pos2(vair,90);
-pos3(.5[hair,stem],180); pos4(stem,theta+90);
-pos5(stem,theta-90); pos6(.5[hair,stem],0);
-pos7(vair,-90); pos8(hair,-180); pos9(flare,-180);
-if monospace: rt x1r=hround(mid_f+u);
-else: rt x1r=hround(mid_f+1.25u); fi
-lft x8r=hround-.35u;
-x2=.5[x1,x4]; x7=.6[x8,x5];
-y9-.5flare=vround -.85d; y2-y0=y9-y7; top y2r=h+oo; bot y7r=-d-oo;
-y4=.25[x_height,h]; y5=.5[-d,y4];
-z4=whatever[z88,z89]; z5=whatever[z88,z89];
-x3=.8[x2+x4-x88,x88]; x6=.8[x7+x5-x89,x89]; y3=.8[y4,y2]; y6=.8[y5,y7];
-bulb(2,1,0); bulb(7,8,9); % left bulbs
-filldraw stroke z2e{left}...z3e...{z89-z88}z4e; % upper middle arc
-filldraw z4r--z5l--z5r--z4l--cycle; % left stem
-filldraw stroke z5e{z89-z88}...z6e...{left}z7e; % lower left arc
-pos10(flare,0); pos11(hair,0); pos12(vair,90);
-pos13(.5[hair,stem],180); pos14(stem,theta+90);
-pos15(stem,theta-90); pos16(.5[hair,stem],0);
-pos17(vair,-90); pos18(hair,-180); pos19(flare,-180); rt x11r=lft x21l;
-lft x18r=hround(mid_f-1.25u); x12=.5[x11,x14]; x17=.5[x18,x15];
-x13=.8[x12+x14-x98,x98]; x16=.8[x17+x15-x99,x99];
-y0=y10; y2=y12; y3=y13; y6=y16; y7=y17; y9=y19;
-bulb(12,11,10); bulb(17,18,19); % right bulbs
-filldraw stroke z12e{left}...z13e...{z99-z98}z14e; % upper right arc
-filldraw z14r--z15l--z15r--z14l--cycle; % middle stem
-filldraw stroke z15e{z99-z98}...z16e...{left}z17e; % lower middle arc
-top y21=h; filldraw stroke z21e--z22e; % right stem
-pickup crisp.nib; pos30(bar,90); pos31(bar,90);
-top y30r=top y31r=x_height;
-lft x30=lft x4r-.5stem-u; x31=x21;
-filldraw stroke z30e--z31e; % crossbar
-penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,
- 20,21,22,23,24,30,31,88,89,98,99); endchar;
-
-endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgitalp.mf b/Master/texmf-dist/fonts/source/lh/base/lgitalp.mf
index 4300d00c534..66f9b9289c2 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgitalp.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgitalp.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -25,7 +25,7 @@
% * Spanish open question mark moved out
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
iff not wncoding:%
lhchar "Italic ampersand";
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgocyrac.mf b/Master/texmf-dist/fonts/source/lh/base/lgocyrac.mf
index 9965a9cf47c..63613d40b59 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgocyrac.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgocyrac.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -45,7 +45,7 @@
% tmatem
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Cyrillic sign thousands"; % ss uses SlavTeX form
cyrchar(thousands,if serifs:8u# else:7u# fi,x_height#,desc_depth#);
@@ -91,7 +91,7 @@ _zero:=1;
_one:=2; _two:=3; _three:=4; _four:=5; _five:=6; _six:=7;
%
pickup fine.nib; numeric stem[];
-stem0=if serifs: .8[hair,stem] else: fudged.hair-4stem_corr fi;
+stem0=max(currentbreadth+eps,if serifs: .8[hair,stem] else: fudged.hair-4stem_corr fi);
pos[_one](stem0,0); pos[_two](stem0,0);
pos[_three](stem0,0); pos[_four](stem0,0);
numeric middle_weight;
@@ -260,6 +260,7 @@ cyrchar(pneuac,9u#,min(asc_height#,2x_height#),0);
italcorr asc_height#*slant+.5dot_size#-2u#;
adjust_fit(0,0);
old_u:=u; u:=.75u;
+x_move:=0;
% classic acute
if serifs: pickup crisp.nib; x1+.5fudged.stem=hround(w-2u)+x_move;
x2=2/3[x1,w+x_move-x1+(w+x_move-9u)];
@@ -438,32 +439,41 @@ y_move:=x_height+oo; old_u:=u; u:=u*(acc_height/x_height);
ll=hround(.5w-5.25u); rr=hround(.5w+3.25u);
clearxy;
%
-if serifs:
+if hefty or (1/3hh<=1):
+ pickup pencircle scaled .5 fine;
+ pos1(max(currentbreadth+eps,if hefty: min(1/3 hh,2/3vair) else: flare fi),80);
+ pos2(max(currentbreadth+eps,if hefty: min(1/3 hh,2/3vair) else: vair fi),90);
+ pos3(max(currentbreadth+eps,if is_egyptian: 2/3 fi curve),180);
+ pos4(max(currentbreadth+eps,if hefty: min(1/3 hh,2/3vair) else: vair fi),270);
+ pos5(max(currentbreadth+.5+eps,if hefty: min(1/3 hh,2/3vair)+eps else: flare fi),275);
+ rt x1r=hround(rr-1.1u); x2=x4=.55[x3,x1];
+ lft x3r=ll+hround max(u,2u-.5curve); rt x5r=hround(rr-.9u);
+ top y1r=vround max(2/3hh+.25flare-eps,.9hh+oo)+y_move;
+ top y2r=hh+oo+y_move; y3=.52hh+y_move;
+ bot y4r=o+y_move+eps;
+ bot y5r=bot y4r+vround min(1/3hh-.25flare+eps,.15[oo,hh]);
+ y5l:=good.y y5l; x5l:=good.x x5l;
+ filldraw stroke rterm.e(2,1,right,.9,4) & super_arc.e(2,3)
+ & super_arc.e(3,4) & term.e(4,5,right,.8,4); % arc and terminals
+else:
pickup fine.nib; pos1(hair,0); pos2(vair,90);
pos3(curve,180); pos4(vair',270); pos5(hair,360);
- rt x1r=rt x5r=hround(rr-u); lft x3r=hround(ll+u); x2=x4=.55[x3,x1];
+ rt x1r=rt x5r=hround(rr-u); lft x3r=hround(ll+u);
+ x2=x4=min(x1l-eps,.55[x3,x1]);
top y2r=hh+oo+y_move; bot y4r=o+y_move; y3=.5[y2,y4];
- bot y1=min(vround max(.65hh,.75hh-.5vair),bot y2l-eps)+y_move;
+ bot y1=vround min(max(.65hh,.75hh-.5vair),bot y2l-eps)+y_move;
y5=max(good.y (.95(hh-y1)+y_move),y4l+eps-y_move)+y_move;
(x2l',y2l)=whatever[z2r,z1l]; x2l:=min(x2l',x2l+.5u);
(x4l',y4l)=whatever[z4r,z5l]; x4l:=min(x4l',x4l+.5u);
- filldraw stroke z1e{x2-x1,10(y2-y1)}
+ filldraw stroke z1e{x2-x1,5(y2-y1)}
...pulled_arc.e(2,3) & pulled_arc.e(3,4)...{up}z5e; % arc
pos6(.3[fine.breadth,cap_hair],0); x6r=x1r; top y6=hh+oo+y_move;
x1r-x1'=2cap_curve-fine; y1'=y1;
path upper_arc; upper_arc=z1{x2-x1,10(y2-y1)}..z2{left};
numeric t; t=xpart(upper_arc intersectiontimes (z6l--z1'));
filldraw z1r--z6r--z6l--subpath(t,0) of upper_arc--cycle; % barb
-else:
- pickup fine.nib; pos1(flare,80); pos2(vair,90);
- pos3(curve,180); pos4(vair,270); pos5(flare,275);
- rt x1r=hround(rr-1.1u); x2=x4=.55[x3,x1];
- lft x3r=ll+hround max(u,2u-.5cap_curve); rt x5r=hround(rr-.9u);
- top y1r=vround .9hh+oo+y_move; top y2r=hh+oo+y_move; y3=.5hh+y_move;
- bot y4r=o+y_move+eps; bot y5r=vround .15[oo,hh]+y_move; y5l:=good.y y5l; x5l:=good.x x5l;
- filldraw stroke rterm.e(2,1,right,.9,4) & super_arc.e(2,3)
- & super_arc.e(3,4) & term.e(4,5,right,.8,4); fi % arc and terminals
-endgroup;
+fi
+penlabels(1,2,3,4,5); endgroup;
penlabels(1,2,3,4); endchar;
@@ -490,22 +500,27 @@ bot y[_one]=bot y[_three]=
bot y[_four]l=min(bot y[_one]-.5y_move,x_height+o+.5y_move)-eps; x[_four]=w+eps;
forsuffixes e=l,r:
path p; p=z[_two]e{right}...{(x[_three]-x[_one]),-7acc_height}z[_three]e;
- z[_three]'e=point .8 of p; endfor
+ z[_three]'e=point 2/3 of p; endfor
filldraw stroke z[_one]e{(x[_three]-x[_one]),7acc_height}...
z[_two]e{right}...
{direction .8 of p}z[_three]'e...{right}z[_four]e; % stroke
%%%
%tlo_d
-stem2:=1/3[hair,fudged.stem];
-if not serifs: stem2:=max(fine.breadth,1/2[thin_join,vair]);
-stem1:=max(fine.breadth,thin_join); fi
-pos5(stem2,90); pos6(stem2,90); pos5'(stem1,90); pos7(stem1,-15); pos8(stem1,0);
+stem2:=1/3[hair,fudged.stem]; pickup pencircle scaled if hefty: .5 fi fine;
+if not serifs: stem2:=max(currentbreadth+eps,1/2[thin_join,vair]);
+stem1:=max(currentbreadth+eps,thin_join); fi
+pos5(max(currentbreadth+eps,if is_egyptian: 2/3 fi stem2),90);
+pos6(max(currentbreadth+eps,if is_egyptian: 2/3 fi stem2),90);
+pos5'(max(currentbreadth+eps,if hefty:1/2 fi stem1),90);
+pos7(max(currentbreadth+eps,if hefty: 1/2 fi stem1),-15);
+pos8(max(currentbreadth+eps,if hefty: 1/2 fi stem1),0);
bot y5'l=bot y[_four]l; top y5r=top y6r=top y5'r;
-z8l=z[_three]'l; x8-x[_four]=x7-x8; bot y7=bot y[_four]l;
+z8l=z[_three]'l;
+x8-x[_four]-eps=x7l-x8l; top y7l=min(top y5'r,y8)-eps;
rt x6=rt x[_four]+eps; lft x5=lft x7l-eps; x5'=.5[x5,x6];
-filldraw stroke z7e..{dir75}z8e;
-filldraw z6r--z5r--z5l{up}...z5'l...{down}z6l--cycle;
-penlabels(1,2,3,4); endchar;
+filldraw stroke z7e{right}..{dir60}z8e; %left "stem"
+filldraw z6r--z5r--z5l{up}...z5'l...{down}z6l--cycle; % "floor"
+penlabels(1,2,3,4,5,6,7,8); endchar;
lhchar "Cyrillic accent titlo with letter o";
cyrchar(tlo_o,10u#,min(asc_height#,2x_height#),0); %
@@ -547,7 +562,10 @@ y_move:=x_height+oo; old_u:=u; u:=u*(acc_height/x_height);
ll=hround(.5w-4.5u); rr=hround(.5w+3u);
clearxy;
%
-penpos1(vair,90); penpos3(vair,-90); penpos2(curve,180); penpos4(curve,0);
+penpos1(if hefty: min(1/4 hh,1/3vair) else: vair fi,90);
+penpos3(if hefty: min(1/4 hh,1/3vair) else: vair fi,-90);
+penpos2(if is_egyptian: 2/3 fi curve,180);
+penpos4(if is_egyptian: 2/3 fi curve,0);
x2r=hround max(ll+.5u,ll+1.25u-.5curve);
x4r=rr-(ll-x2r); x1=x3=.5[x2r,x4r]; y1r=hh+oo+y_move; y3r=o+y_move+eps;
y2=y4=.5[o,hh]-.5vair_corr+y_move; y2l:=y4l:=.52[o,hh]+y_move;
@@ -595,19 +613,25 @@ y_move:=x_height+oo; old_u:=u; u:=u*(acc_height/x_height);
ll=hround(.5w-4u); rr=hround(.5w+3u);
clearxy;
%
-pickup if serifs: tiny else: fine fi nib;
-pos1(stem2,0); pos2(stem2,0);
+pickup pencircle scaled if hefty: .5 fi fine;
+pos1(max(currentbreadth+eps, if is_egyptian: 2/3 fi stem2),0);
+pos2(max(currentbreadth+eps, if is_egyptian: 2/3 fi stem2),0);
lft x1l=lft x2l=hround (ll+2.5u-.5stem2); top y1=hh+y_move; bot y2=o+y_move+eps;
filldraw stroke z1e--z2e; % stem
-pickup if serifs: crisp else: fine fi nib;
-pos3(vair,90); pos4(vair,0);
-top y3r=hh+y_move; x3=x1; rt x4r=hround(rr-.45u);
-y4=good.y(y3l-if serifs: .15 fi beak)-eps;
-arm(3,4,e,beak_darkness,.2beak_jut); % upper arm and beak
-if serifs: save slab; slab:=max(crisp.breadth,Vround(vair-2vair_corr)); % lower.slab
+if not hefty: pickup if serifs: crisp else: fine fi nib; fi
+pos3(max(currentbreadth+eps, if hefty: min(1/3 hh,1/2stem2) else: vair fi),90);
+pos4(max(currentbreadth+eps, if hefty: min(1/3 hh,1/2stem2) else: vair fi),0);
+top y3r=hh+y_move; x3=x1; rt x4r=hround max(x3+vair+eps,rr-.45u)+eps;
+y4=good.y(y3l-if serifs: 1/6 fi beak)-eps;
+if hefty or (1/6beak<=1): filldraw stroke z3e--(x4r,y3e);
+else:
+arm(3,4,e,beak_darkness,.2beak_jut-eps); fi % upper arm and beak
+if serifs and (not hefty):
+ save slab; slab:=vair; old_crisp:=crisp; crisp:=.5crisp; % lower.slab
nodish_serif(1,2,a,1/3,.2jut,b,1/3,.1jut); % upper serif
- slab:=vair; % lower.slab
- dish_serif(2,1,c,1/3,.2jut,d,1/3,.2jut); fi % lower serif
+ dish_serif(2,1,c,1/3,.2jut,d,1/3,.2jut); % lower serif
+ crisp:=old_crisp; numeric old_crisp;
+fi
endgroup;
penlabels(1,2,3,4); endchar;
@@ -641,7 +665,7 @@ filldraw stroke z[_one]e{(x[_three]-x[_one]),7acc_height}...
%%%
%tlo_r
begingroup
-stem2:=1/3[hair,fudged.stem];
+stem2:=max(fine.breadth,1/3[hair,fudged.stem]-2stem_corr);
if not serifs: stem2:=max(fine.breadth,1/2[thin_join,vair]);
stem1:=max(fine.breadth,thin_join); fi
save curve; curve:=stem2;
@@ -652,31 +676,33 @@ y_move:=x_height+oo; old_u:=u; u:=u*(acc_height/x_height);
ll=hround(.5w-4.75u); rr=hround(.5w+3.25u);
clearxy;
%
-pickup if serifs: tiny else: fine fi nib;
-pos2(stem2,0); pos3'(stem2,0);
+pickup pencircle scaled if hefty: .5 fi fine;
+pos2(max(currentbreadth+eps,if is_egyptian: 2/3 fi stem2),0);
+pos3'(max(currentbreadth+eps,if is_egyptian: 2/3 fi stem2),0);
lft x2l=hround(ll+2.5u-.5stem2); bot y2=o+y_move+eps;
y3'=min(hh+1.5oo+y_move-vair-eps,1/3[.55hh,hh]+y_move); rt x3'r=rt x2r; z3'=z3;
filldraw stroke z2e--z3'e; %stem
-pickup fine.nib;
-pos3(stem2,180); pos4(vair,90);
-pos5(curve,0); pos6(vair,-90); pos7(if hefty: thin_join else: hair fi,-180);
-numeric edge; edge=rt x2r;
+pos3(max(currentbreadth+eps,if is_egyptian: 2/3 fi stem2),180);
+pos4(max(currentbreadth+eps,if is_egyptian: .5 fi vair),90);
+pos5(max(currentbreadth+eps,if is_egyptian: 2/3 fi stem2),0);
+pos6(max(currentbreadth+eps,if is_egyptian: .5 fi vair),-90);
+pos7(max(currentbreadth+eps,if is_egyptian: 1/3stem2 else: hair fi),-180);
x4l=rr-(.5(rr-ll)-.25serif_fit)+.5u; top y4r=hh+1.5oo+y_move;
rt x5r=hround min(rr-1.35u+.5curve,rr-.6u); y5=.25[hh,oo]+y_move;
-x6l=x4l-.2u; bot y6r=max(.4[oo,hh],.45[oo,hh]-oo)+y_move;
-rt x7l=tiny.rt x2r; y7=min(y3,y6+y4-y3);
+x6l=x4l-.2u; bot y6r=max(1/4[oo,hh],1/3[oo,hh]-oo)+y_move-eps;
+rt x7l=rt x2r; y7=min(y3,y6+y4-y3);
(x,y4r)=whatever[z3l,z4l]; x4r:=min(x,.5[x5r,x4]);
(x',y6r)=whatever[z7l,z6l]; x6r:=min(x',.5[x5r,x6]);
filldraw stroke z3e{up}...{right}z4e&super_arc.e(4,5)
&super_arc.e(5,6)&z6e{left}...{up}z7e; % bowl
-if serifs: save slab; slab:=max(crisp.breadth,Vround(vair-2vair_corr)); % lower.slab
+if serifs and (not hefty): save slab; slab:=tiny+eps; % lower.slab
dish_serif(2,3',b,1/3,.2jut,c,1/3,.2jut); fi % lower serif
-endgroup;
-penlabels(1,2,3,4); endchar;
+penlabels(1,2,3,4,5,6,7); endgroup;
+penlabels(1,2,3,4,5,6,7); endchar;
%
% Number symbols
%
-lhchar"Cyrillic Tma number symbol";
+lhchar"Cyrillic Tma number symbol (ten thousands)";
cyrchar(tma,20u#,body_height#,max(paren_depth#,desc_depth#));
autorounded;
adjust_fit(if monospace:-3u#,-3u# else: 0,0 fi); pickup rule.nib;
@@ -685,7 +711,7 @@ lft x6=hround u; x2=w-x6; top y8=h+o; bot y4=-d-o;
circle_points; draw_circle; % circle
penlabels(1,2,3,4,5,6,7,8); endchar;
-lhchar"Cyrillic Legion number symbol";
+lhchar"Cyrillic Legion number symbol (hundred thousands)";
cyrchar(legion,20u#,body_height#,max(paren_depth#,desc_depth#));
autorounded;
adjust_fit(if monospace:-3u#,-3u# else: 0,0 fi); pickup rule.nib;
@@ -699,7 +725,7 @@ enddef;
temp(1); temp(2); temp(3); temp(4); temp(5); temp(6); temp(7); temp(8);
penlabels(1,2,3,4,5,6,7,8); endchar;
-lhchar"Cyrillic Leodr number symbol";
+lhchar"Cyrillic Leodr number symbol (million)";
cyrchar(leodr,20u#,body_height#,max(paren_depth#,desc_depth#));
autorounded;
adjust_fit(if monospace:-3u#,-3u# else: 0,0 fi); pickup rule.nib;
@@ -718,7 +744,7 @@ temp(1,6); temp(2,7); temp(3,8); temp(4,1);
temp(5,2); temp(6,3); temp(7,4); temp(8,5);
penlabels(1,2,3,4,5,6,7,8); endchar;
-lhchar"Cyrillic Vran number symbol";
+lhchar"Cyrillic Vran number symbol (ten millions)";
cyrchar(vran,20u#,body_height#,max(paren_depth#,desc_depth#));
autorounded;
adjust_fit(if monospace:-3u#,-3u# else: 0,0 fi); pickup rule.nib;
@@ -732,7 +758,7 @@ enddef;
temp(1); temp(2); temp(3); temp(4); temp(5); temp(6); temp(7); temp(8);
penlabels(1,2,3,4,5,6,7,8); endchar;
-lhchar "Cyrillic koloda number symbol";
+lhchar "Cyrillic koloda number symbol (hundred millions)";
cyrchar(koloda,18u#,body_height#,max(paren_depth#,desc_depth#));%
italcorr h#*slant+.5vair#-1.5u#;
adjust_fit(if monospace:-3u#,-3u# else: 0,0 fi);
@@ -760,7 +786,7 @@ filldraw stroke (z[_three]e+(-u,0))--z[_three]e{down}...z[_two]e{left}
...{up}z[_one]e--(z[_one]e+(u,0)); % stroke
penlabels(1,2,3); endchar;
-lhchar"Cyrillic Tma Tem number symbol";
+lhchar"Cyrillic Tma Tem number symbol (billion/milliard)";
cyrchar(tmatem,20u#,body_height#,max(paren_depth#,desc_depth#));
autorounded;
adjust_fit(if monospace:-3u#,-3u# else: 0,0 fi); pickup rule.nib;
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgpunct.mf b/Master/texmf-dist/fonts/source/lh/base/lgpunct.mf
index c87fde4ebde..eafc803ca90 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgpunct.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgpunct.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -36,7 +36,7 @@
% "60 `
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Exclamation point";
beginchar("!",5u#+width_adj#,asc_height#,0);
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgrdigit.mf b/Master/texmf-dist/fonts/source/lh/base/lgrdigit.mf
index 23b5a724aa5..405477e49da 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgrdigit.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgrdigit.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -21,7 +21,7 @@
% numerals 0 .. 9
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
% All digits have the same height, width, depth, and italic correction.
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgrlig.mf b/Master/texmf-dist/fonts/source/lh/base/lgrlig.mf
index b1b5b50f363..e4f8889db40 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgrlig.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgrlig.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -22,16 +22,10 @@
%
% i_dotl "19 i dotless
% j_dotl "1a j dotless
-% ff-ligs (lgrligff.mf)
+% ff-ligs
%
-LHver_check(3,4); % like |version_check| in ec
-
-if (roman_ec=true) and (old_cyr=false):
-
-input lgrligff;
-
-fi % roman_ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Cyrillic letter dotless i";
cyrchar(i_dotl,5u#,x_height#,0);
@@ -73,5 +67,164 @@ else: pickup fine.nib; pos2'(stem',0); z2'=z2;
& term.e(6,7,left,1,4); fi % arc and terminal
penlabels(1,2,5,6,7); endchar;
+if (roman_ec=true) and (old_cyr=false): %relax
+else: endinput \\; fi
+
+numeric itc#; % modified italic correction on `f' and `ff'
+itc#=if serifs: max(0,flare#-.25u#) else: 1.25u# fi;
+
+lhchar "The ligature fi";
+beginchar(oct"034",10u#+2letter_fit#,asc_height#,0);
+italcorr asc_height#*slant-serif_fit#+.5if serifs:stem# else:dot_size# fi-2u#;
+normal_adjust_fit(0,serif_fit#);
+pickup tiny.nib; pos1(stem',0); lft x1l=hround(2.5u-.5stem');
+pos11(stem',0); rt x11r=hround(w-2.5u+.5stem');
+pos12(stem',0); x11=x12; bot y12=0;
+pickup fine.nib; numeric bulb_diam, inner_jut;
+if serifs: bulb_diam=hround 1/4[.8[stem,flare],dot_size];
+ pos2(bulb_diam,0); x2r=x12r;
+ y2+.5bulb_diam=.8[x_height,h+oo]; top y11=x_height+min(oo,serif_drop);
+ if rt x1r+jut+.5u+2<=lft x11l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+2=lft x11l-inner_jut; fi
+else: bulb_diam=max(stem,dot_size);
+ pos2(6/7[vair,flare],90); top y2r=h; rt x2=hround 5.3u;
+ pickup tiny.nib; pos13(bulb_diam,0); pos14(bulb_diam,90);
+ x13=x11-.5; top y14r=min(2x_height,h+1); top y11=x_height;
+ if bot y14l-x_height<tiny: y14l:=min(y14r-eps,y11+2tiny); fi
+ x13=x14; y13=.5[y14l,y14r]; dot(13,14); % dot
+fi; % this is the ligature we're drawing
+f_stroke(1,2,a,b,c,jut,inner_jut); % left stem, arc, terminal, serif
+pickup tiny.nib; filldraw stroke z11e--z12e; % right stem
+pickup crisp.nib; top y3r=top y4r=x_height; lft x3=hround .5u-1;
+pos3(bar,90); pos4(bar,90);
+if serifs: x4=x11; % bar will overlap upper right serif
+ sloped_serif.l(11,12,d,1/3,jut,min(oo,serif_drop)); % upper right serif
+ dish_serif(12,11,e,1/3,inner_jut,f,1/3,jut); % lower right serif
+else: rt x4= hround 5.3u; fi
+pickup crisp.nib; filldraw stroke z3e--z4e; % bar
+penlabels(1,2,3,4,11,12,13,14); endchar;
+
+lhchar "The ligature ff";
+beginchar(oct"033",10.5u#+2letter_fit#,asc_height#,0);
+italcorr asc_height#*slant+if serifs:flare#-.25u# else: 1.25u# fi;
+normal_adjust_fit(0,0);
+pickup tiny.nib; pos1(stem',0); lft x1l=hround(2.5u-.5stem');
+pos11(stem',0); rt x11r=hround(w-3u+.5stem');
+pickup fine.nib; numeric bulb_diam, inner_jut;
+if serifs: bulb_diam=hround .8[stem,flare];
+ pos2(bulb_diam,0); pos12(bulb_diam,0);
+ rt x2r=hround(rt x11r-stem_corr); lft x12l=hround(w-.75u+.5);
+ y2+.5bulb_diam=.85[x_height,h+oo]; y12+.5bulb_diam=.9[x_height,h+oo];
+ if rt x1r+jut+.5u+2<=lft x11l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+2=lft x11l-inner_jut; fi
+else: pos2(5/7[vair,flare],90); top y2r=h; rt x2=hround 6.25u;
+ pos12(5/7[vair,flare],90); y12=y2; rt x12=hround(w+.75u); fi
+f_stroke(1,2,a,b,c,jut,inner_jut); % left stem, arc, terminal, serif
+f_stroke(11,12,d,e,f,inner_jut,1.25jut); % right stem, arc, terminal, serif
+pickup crisp.nib; top y3r=top y4r=x_height; lft x3=hround .5u-1;
+pos3(bar,90); pos4(bar,90);
+rt x4=hround(w-1/3u);
+if hefty: pos3'(bar,90); x3'-x1=x4-x11; y3'=y3;
+ pos4'(bar,90); x4'=x11; y4'=y4;
+ filldraw stroke z3e--z3'e; filldraw stroke z4'e--z4e; % bars
+else: filldraw stroke z3e--z4e; fi % bar
+penlabels(1,2,3,4,11,12); endchar;
+
+lhchar "The ligature fl";
+beginchar(oct"035",10u#+2letter_fit#,asc_height#,0);
+italcorr asc_height#*slant-serif_fit#+.5stem#-2u#;
+normal_adjust_fit(0,serif_fit#);
+pickup tiny.nib; pos1(stem',0); lft x1l=hround(2.5u-.5stem');
+pos11(stem',0); rt x11r=hround(w-2.5u+.5stem');
+pos12(stem',0); x11=x12; bot y12=0; top y11=h;
+filldraw stroke z11e--z12e; % right stem
+pickup fine.nib; numeric bulb_diam, inner_jut;
+if serifs: bulb_diam=hround .8[stem,flare];
+ pos2(bulb_diam,0); x2r=x11r-stem_corr;
+ y2+.5bulb_diam=.9[x_height,h+oo];
+ sloped_serif.l(11,12,d,1/3,eps,max(serif_drop,oo)); % erase excess at top
+ if rt x1r+jut+.5u+2<=lft x11l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+2=lft x11l-inner_jut; fi
+else: pos2(5/7[vair,flare],90); top y2r=h; rt x2=hround 5.3u; fi
+f_stroke(1,2,a,b,c,jut,inner_jut); % left stem, arc, terminal, serif
+pickup crisp.nib; top y3r=top y4r=x_height; lft x3=hround .5u-1;
+pos3(bar,90); pos4(bar,90);
+if serifs: x4=x11;
+ dish_serif(12,11,e,1/3,inner_jut,f,1/3,jut); % lower right serif
+else: rt x4= hround 5.3u; fi
+pickup crisp.nib; filldraw stroke z3e--z4e; % bar
+penlabels(1,2,3,4,11,12); endchar;
+
+lhchar "The ligature ffi";
+beginchar(oct"036",15u#+4letter_fit#,asc_height#,0);
+italcorr asc_height#*slant-serif_fit#+.5if serifs:stem# else:dot_size# fi-2u#;
+normal_adjust_fit(0,serif_fit#);
+pickup tiny.nib; pos1(stem',0); lft x1l=hround(2.5u-.5stem');
+pos11(stem',0); lft x11l=hround(.5w-.5stem');
+pos21(stem',0); rt x21r=hround(w-2.5u+.5stem');
+pos22(stem',0); x21=x22; bot y22=0;
+pickup fine.nib; numeric bulb_diam, inner_jut;
+if serifs: bulb_diam=hround 1/4[.8[stem,flare],dot_size];
+ pos2(bulb_diam,0); x2r=x11r-stem_corr;
+ pos12(bulb_diam,0); x12r=x21r;
+ top y21=x_height+min(oo,serif_drop);
+ y2+.5bulb_diam=.8[x_height,h+oo]; y12=y2;
+ if rt x1r+jut+.5u+2<=lft x11l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+2=lft x11l-inner_jut; fi
+else: bulb_diam=max(stem,dot_size);
+ pos2(5/7[vair,flare],90); top y2r=h; rt x2=hround 5.75u;
+ pos12(6/7[vair,flare],90); y12=y2; rt x12=hround(.5w+2.8u);
+ pickup tiny.nib; pos23(bulb_diam,0); pos24(bulb_diam,90);
+ x23=x21-.5; top y24r=min(2x_height,h+1); top y21=x_height;
+ if bot y24l-x_height<tiny: y24l:=min(y24r-eps,y21+2tiny); fi
+ x23=x24; y23=.5[y24l,y24r]; dot(23,24); fi % dot
+f_stroke(1,2,a,b,c,jut,inner_jut); % left stem, arc, terminal, serif
+f_stroke(11,12,d,e,f,inner_jut,inner_jut); % middle ditto
+pickup tiny.nib; filldraw stroke z21e--z22e; % right stem
+pickup crisp.nib; top y3r=top y4r=x_height; lft x3=hround.5u-1;
+pos3(bar,90); pos4(bar,90);
+if serifs: x4=x21; % bar will overlap upper right serif
+ sloped_serif.l(21,22,g,1/3,jut,min(oo,serif_drop)); % upper right serif
+ dish_serif(22,21,h,1/3,inner_jut,i,1/3,jut); % lower right serif
+else: rt x4=hround(.5w+2.8u); fi
+pickup crisp.nib;
+if hefty: pos3'(bar,90); x3'-x1=x4-x11; y3'=y3;
+ pos4'(bar,90); x4'=x11; y4'=y4;
+ filldraw stroke z3e--z3'e; filldraw stroke z4'e--z4e; % bars
+else: filldraw stroke z3e--z4e; fi % bar
+penlabels(1,2,3,4,11,12,21,22,23,24); endchar;
+
+lhchar "The ligature ffl";
+beginchar(oct"037",15u#+4letter_fit#,asc_height#,0);
+italcorr asc_height#*slant-serif_fit#+.5stem#-2u#;
+normal_adjust_fit(0,serif_fit#);
+pickup tiny.nib; pos1(stem',0); lft x1l=hround(2.5u-.5stem');
+pos11(stem',0); lft x11l=hround(.5w-.5stem');
+pos21(stem',0); rt x21r=hround(w-2.5u+.5stem');
+pos22(stem',0); x21=x22; bot y22=0; top y21=h;
+filldraw stroke z21e--z22e; % right stem
+pickup fine.nib; numeric bulb_diam, inner_jut;
+if serifs: bulb_diam=hround .8[stem,flare];
+ pos2(bulb_diam,0); x2r=x11r-stem_corr;
+ pos12(bulb_diam,0); x12r=x21r-stem_corr;
+ y2+.5bulb_diam=.85[x_height,h+oo]; y12+.5bulb_diam=.9[x_height,h+oo];
+ sloped_serif.l(21,22,g,1/3,eps,max(serif_drop,oo)); % erase excess at top
+ if rt x1r+jut+.5u+2<=lft x11l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+2=lft x11l-inner_jut; fi
+else: pos2(5/7[vair,flare],90); top y2r=h; rt x2=hround 5.75u;
+ pos12(5/7[vair,flare],90); y12=y2; rt x12=hround(.5w+2.8u); fi
+f_stroke(1,2,a,b,c,jut,inner_jut); % left stem, arc, terminal, serif
+f_stroke(11,12,d,e,f,inner_jut,inner_jut); % middle ditto
+pickup crisp.nib; top y3r=top y4r=x_height; lft x3=hround.5u-1;
+pos3(bar,90); pos4(bar,90);
+if serifs: dish_serif(22,21,h,1/3,inner_jut,i,1/3,jut); % lower right serif
+ pickup crisp.nib; x4=x21;
+else: rt x4=hround(.5w+2.8u); fi
+if hefty: pos3'(bar,90); x3'-x1=x4-x11; y3'=y3;
+ pos4'(bar,90); x4'=x11; y4'=y4;
+ filldraw stroke z3e--z3'e; filldraw stroke z4'e--z4e; % bars
+else: filldraw stroke z3e--z4e; fi % bar
+penlabels(1,2,3,4,11,12,21,22); endchar;
+
endinput;
%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgrligff.mf b/Master/texmf-dist/fonts/source/lh/base/lgrligff.mf
deleted file mode 100644
index 0b3256a4054..00000000000
--- a/Master/texmf-dist/fonts/source/lh/base/lgrligff.mf
+++ /dev/null
@@ -1,184 +0,0 @@
-%
-% lgrlig.mf
-%
-%% Cyrillic font container with T2 encoding beta-support
-%
-% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
-% (c) O.Lapko
-%
-% This package belongs to the public domain under conditions similar to
-% those of D. E. Knuth specified for the Computer Modern family of fonts.
-% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
-%
-% Content:
-%
-% roman dotless i,j
-%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-% Special letters
-%
-% ff-ligs
-%
-
-LHver_check(3,4); % like |version_check| in ec
-
-numeric itc#; % modified italic correction on `f' and `ff'
-itc#=if serifs: max(0,flare#-.25u#) else: 1.25u# fi;
-
-lhchar "The ligature fi";
-beginchar(oct"034",10u#+2letter_fit#,asc_height#,0);
-italcorr asc_height#*slant-serif_fit#+.5if serifs:stem# else:dot_size# fi-2u#;
-normal_adjust_fit(0,serif_fit#);
-pickup tiny.nib; pos1(stem',0); lft x1l=hround(2.5u-.5stem');
-pos11(stem',0); rt x11r=hround(w-2.5u+.5stem');
-pos12(stem',0); x11=x12; bot y12=0;
-pickup fine.nib; numeric bulb_diam, inner_jut;
-if serifs: bulb_diam=hround 1/4[.8[stem,flare],dot_size];
- pos2(bulb_diam,0); x2r=x12r;
- y2+.5bulb_diam=.8[x_height,h+oo]; top y11=x_height+min(oo,serif_drop);
- if rt x1r+jut+.5u+2<=lft x11l-jut: inner_jut=jut;
- else: rt x1r+inner_jut+.5u+2=lft x11l-inner_jut; fi
-else: bulb_diam=max(stem,dot_size);
- pos2(6/7[vair,flare],90); top y2r=h; rt x2=hround 5.3u;
- pickup tiny.nib; pos13(bulb_diam,0); pos14(bulb_diam,90);
- x13=x11-.5; top y14r=min(2x_height,h+1); top y11=x_height;
- if bot y14l-x_height<tiny: y14l:=min(y14r-eps,y11+2tiny); fi
- x13=x14; y13=.5[y14l,y14r]; dot(13,14); % dot
-fi; % this is the ligature we're drawing
-f_stroke(1,2,a,b,c,jut,inner_jut); % left stem, arc, terminal, serif
-pickup tiny.nib; filldraw stroke z11e--z12e; % right stem
-pickup crisp.nib; top y3r=top y4r=x_height; lft x3=hround .5u-1;
-pos3(bar,90); pos4(bar,90);
-if serifs: x4=x11; % bar will overlap upper right serif
- sloped_serif.l(11,12,d,1/3,jut,min(oo,serif_drop)); % upper right serif
- dish_serif(12,11,e,1/3,inner_jut,f,1/3,jut); % lower right serif
-else: rt x4= hround 5.3u; fi
-pickup crisp.nib; filldraw stroke z3e--z4e; % bar
-penlabels(1,2,3,4,11,12,13,14); endchar;
-
-lhchar "The ligature ff";
-beginchar(oct"033",10.5u#+2letter_fit#,asc_height#,0);
-italcorr asc_height#*slant+if serifs:flare#-.25u# else: 1.25u# fi;
-normal_adjust_fit(0,0);
-pickup tiny.nib; pos1(stem',0); lft x1l=hround(2.5u-.5stem');
-pos11(stem',0); rt x11r=hround(w-3u+.5stem');
-pickup fine.nib; numeric bulb_diam, inner_jut;
-if serifs: bulb_diam=hround .8[stem,flare];
- pos2(bulb_diam,0); pos12(bulb_diam,0);
- rt x2r=hround(rt x11r-stem_corr); lft x12l=hround(w-.75u+.5);
- y2+.5bulb_diam=.85[x_height,h+oo]; y12+.5bulb_diam=.9[x_height,h+oo];
- if rt x1r+jut+.5u+2<=lft x11l-jut: inner_jut=jut;
- else: rt x1r+inner_jut+.5u+2=lft x11l-inner_jut; fi
-else: pos2(5/7[vair,flare],90); top y2r=h; rt x2=hround 6.25u;
- pos12(5/7[vair,flare],90); y12=y2; rt x12=hround(w+.75u); fi
-f_stroke(1,2,a,b,c,jut,inner_jut); % left stem, arc, terminal, serif
-f_stroke(11,12,d,e,f,inner_jut,1.25jut); % right stem, arc, terminal, serif
-pickup crisp.nib; top y3r=top y4r=x_height; lft x3=hround .5u-1;
-pos3(bar,90); pos4(bar,90);
-rt x4=hround(w-1/3u);
-if hefty: pos3'(bar,90); x3'-x1=x4-x11; y3'=y3;
- pos4'(bar,90); x4'=x11; y4'=y4;
- filldraw stroke z3e--z3'e; filldraw stroke z4'e--z4e; % bars
-else: filldraw stroke z3e--z4e; fi % bar
-penlabels(1,2,3,4,11,12); endchar;
-
-lhchar "The ligature fl";
-beginchar(oct"035",10u#+2letter_fit#,asc_height#,0);
-italcorr asc_height#*slant-serif_fit#+.5stem#-2u#;
-normal_adjust_fit(0,serif_fit#);
-pickup tiny.nib; pos1(stem',0); lft x1l=hround(2.5u-.5stem');
-pos11(stem',0); rt x11r=hround(w-2.5u+.5stem');
-pos12(stem',0); x11=x12; bot y12=0; top y11=h;
-filldraw stroke z11e--z12e; % right stem
-pickup fine.nib; numeric bulb_diam, inner_jut;
-if serifs: bulb_diam=hround .8[stem,flare];
- pos2(bulb_diam,0); x2r=x11r-stem_corr;
- y2+.5bulb_diam=.9[x_height,h+oo];
- sloped_serif.l(11,12,d,1/3,eps,max(serif_drop,oo)); % erase excess at top
- if rt x1r+jut+.5u+2<=lft x11l-jut: inner_jut=jut;
- else: rt x1r+inner_jut+.5u+2=lft x11l-inner_jut; fi
-else: pos2(5/7[vair,flare],90); top y2r=h; rt x2=hround 5.3u; fi
-f_stroke(1,2,a,b,c,jut,inner_jut); % left stem, arc, terminal, serif
-pickup crisp.nib; top y3r=top y4r=x_height; lft x3=hround .5u-1;
-pos3(bar,90); pos4(bar,90);
-if serifs: x4=x11;
- dish_serif(12,11,e,1/3,inner_jut,f,1/3,jut); % lower right serif
-else: rt x4= hround 5.3u; fi
-pickup crisp.nib; filldraw stroke z3e--z4e; % bar
-penlabels(1,2,3,4,11,12); endchar;
-
-lhchar "The ligature ffi";
-beginchar(oct"036",15u#+4letter_fit#,asc_height#,0);
-italcorr asc_height#*slant-serif_fit#+.5if serifs:stem# else:dot_size# fi-2u#;
-normal_adjust_fit(0,serif_fit#);
-pickup tiny.nib; pos1(stem',0); lft x1l=hround(2.5u-.5stem');
-pos11(stem',0); lft x11l=hround(.5w-.5stem');
-pos21(stem',0); rt x21r=hround(w-2.5u+.5stem');
-pos22(stem',0); x21=x22; bot y22=0;
-pickup fine.nib; numeric bulb_diam, inner_jut;
-if serifs: bulb_diam=hround 1/4[.8[stem,flare],dot_size];
- pos2(bulb_diam,0); x2r=x11r-stem_corr;
- pos12(bulb_diam,0); x12r=x21r;
- top y21=x_height+min(oo,serif_drop);
- y2+.5bulb_diam=.8[x_height,h+oo]; y12=y2;
- if rt x1r+jut+.5u+2<=lft x11l-jut: inner_jut=jut;
- else: rt x1r+inner_jut+.5u+2=lft x11l-inner_jut; fi
-else: bulb_diam=max(stem,dot_size);
- pos2(5/7[vair,flare],90); top y2r=h; rt x2=hround 5.75u;
- pos12(6/7[vair,flare],90); y12=y2; rt x12=hround(.5w+2.8u);
- pickup tiny.nib; pos23(bulb_diam,0); pos24(bulb_diam,90);
- x23=x21-.5; top y24r=min(2x_height,h+1); top y21=x_height;
- if bot y24l-x_height<tiny: y24l:=min(y24r-eps,y21+2tiny); fi
- x23=x24; y23=.5[y24l,y24r]; dot(23,24); fi % dot
-f_stroke(1,2,a,b,c,jut,inner_jut); % left stem, arc, terminal, serif
-f_stroke(11,12,d,e,f,inner_jut,inner_jut); % middle ditto
-pickup tiny.nib; filldraw stroke z21e--z22e; % right stem
-pickup crisp.nib; top y3r=top y4r=x_height; lft x3=hround.5u-1;
-pos3(bar,90); pos4(bar,90);
-if serifs: x4=x21; % bar will overlap upper right serif
- sloped_serif.l(21,22,g,1/3,jut,min(oo,serif_drop)); % upper right serif
- dish_serif(22,21,h,1/3,inner_jut,i,1/3,jut); % lower right serif
-else: rt x4=hround(.5w+2.8u); fi
-pickup crisp.nib;
-if hefty: pos3'(bar,90); x3'-x1=x4-x11; y3'=y3;
- pos4'(bar,90); x4'=x11; y4'=y4;
- filldraw stroke z3e--z3'e; filldraw stroke z4'e--z4e; % bars
-else: filldraw stroke z3e--z4e; fi % bar
-penlabels(1,2,3,4,11,12,21,22,23,24); endchar;
-
-lhchar "The ligature ffl";
-beginchar(oct"037",15u#+4letter_fit#,asc_height#,0);
-italcorr asc_height#*slant-serif_fit#+.5stem#-2u#;
-normal_adjust_fit(0,serif_fit#);
-pickup tiny.nib; pos1(stem',0); lft x1l=hround(2.5u-.5stem');
-pos11(stem',0); lft x11l=hround(.5w-.5stem');
-pos21(stem',0); rt x21r=hround(w-2.5u+.5stem');
-pos22(stem',0); x21=x22; bot y22=0; top y21=h;
-filldraw stroke z21e--z22e; % right stem
-pickup fine.nib; numeric bulb_diam, inner_jut;
-if serifs: bulb_diam=hround .8[stem,flare];
- pos2(bulb_diam,0); x2r=x11r-stem_corr;
- pos12(bulb_diam,0); x12r=x21r-stem_corr;
- y2+.5bulb_diam=.85[x_height,h+oo]; y12+.5bulb_diam=.9[x_height,h+oo];
- sloped_serif.l(21,22,g,1/3,eps,max(serif_drop,oo)); % erase excess at top
- if rt x1r+jut+.5u+2<=lft x11l-jut: inner_jut=jut;
- else: rt x1r+inner_jut+.5u+2=lft x11l-inner_jut; fi
-else: pos2(5/7[vair,flare],90); top y2r=h; rt x2=hround 5.75u;
- pos12(5/7[vair,flare],90); y12=y2; rt x12=hround(.5w+2.8u); fi
-f_stroke(1,2,a,b,c,jut,inner_jut); % left stem, arc, terminal, serif
-f_stroke(11,12,d,e,f,inner_jut,inner_jut); % middle ditto
-pickup crisp.nib; top y3r=top y4r=x_height; lft x3=hround.5u-1;
-pos3(bar,90); pos4(bar,90);
-if serifs: dish_serif(22,21,h,1/3,inner_jut,i,1/3,jut); % lower right serif
- pickup crisp.nib; x4=x21;
-else: rt x4=hround(.5w+2.8u); fi
-if hefty: pos3'(bar,90); x3'-x1=x4-x11; y3'=y3;
- pos4'(bar,90); x4'=x11; y4'=y4;
- filldraw stroke z3e--z3'e; filldraw stroke z4'e--z4e; % bars
-else: filldraw stroke z3e--z4e; fi % bar
-penlabels(1,2,3,4,11,12,21,22); endchar;
-
-endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgromp.mf b/Master/texmf-dist/fonts/source/lh/base/lgromp.mf
index c1475195d1f..4458ff6166f 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgromp.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgromp.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -25,7 +25,7 @@
% * Spanish open question mark moved out
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
iff not wncoding:%
lhchar "Ampersand";
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgrusi.mf b/Master/texmf-dist/fonts/source/lh/base/lgrusi.mf
index f08f332bfae..85f12850d60 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgrusi.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgrusi.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -23,7 +23,7 @@
% and n_width (russian letter n) at the end of `cyrchar...' line)
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Italic Russian letter a";
cyrchar(a,9u#,x_height#,0);
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgrusl.mf b/Master/texmf-dist/fonts/source/lh/base/lgrusl.mf
index e03c302404f..83f1a9688d3 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgrusl.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgrusl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -23,7 +23,7 @@
% and n_width (russian letter n) at the end of `cyrchar...' line)
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
if kapitel: input lgcrusl; fi
@@ -426,7 +426,7 @@ if hefty: numeric upper_notch,lower_notch;
upper_notch=y6-cap_notch_cut-eps; lower_notch=y5+cap_notch_cut+eps;
if monospace:
x5r =rt x1r; x6l =lft x3l; y5=vround(vair'+eps); y6=vround(h-vair-eps);
- alpha1=diag_ratio(1,stem1,y6-y5,x5r-x6l);
+ alpha1=diag_ratio(1,stem1,y5-y6,x5r-x6l);
penpos5(min(2fudged.stem,alpha1*stem1),0);
penpos6(min(2fudged.stem,alpha1*stem1),0);
x5'=lft x1l; z5'=whatever[z5l,z6l]; x6'=rt x4r; z6'=whatever[z5r,z6r];
@@ -479,7 +479,7 @@ if hefty: numeric upper_notch,lower_notch;
upper_notch=y6-cap_notch_cut-eps; lower_notch=y5+cap_notch_cut+eps;
if monospace:
x5r =rt x1r; x6l =lft x3l; y5=vround(vair'+eps); y6=vround(h-vair-eps);
- alpha1=diag_ratio(1,stem1,y6-y5,x5r-x6l);
+ alpha1=diag_ratio(1,stem1,y5-y6,x5r-x6l);
penpos5(min(2fudged.stem,alpha1*stem1),0);
penpos6(min(2fudged.stem,alpha1*stem1),0);
x5'=lft x1l; z5'=whatever[z5l,z6l]; x6'=rt x4r; z6'=whatever[z5r,z6r];
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgrusu.mf b/Master/texmf-dist/fonts/source/lh/base/lgrusu.mf
index 0ff385ef871..80766c6a9cf 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgrusu.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgrusu.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Uppercase Russian letter A";
cyrchar(A,13u#,cap_height#,0);
@@ -373,7 +373,7 @@ if hefty: numeric upper_notch,lower_notch;
upper_notch=y6-cap_notch_cut-eps; lower_notch=y5+cap_notch_cut+eps;
if monospace:
x5r =rt x1r; x6l =lft x3l; y5=vround(slab+eps); y6=vround(h-slab-eps);
- alpha1=diag_ratio(1,stem1,y6-y5,x5r-x6l);
+ alpha1=diag_ratio(1,stem1,y5-y6,x5r-x6l);
penpos5(min(2fudged.cap_stem,alpha1*stem1),0);
penpos6(min(2fudged.cap_stem,alpha1*stem1),0);
x5'=lft x1l; z5'=whatever[z5l,z6l]; x6'=rt x4r; z6'=whatever[z5r,z6r];
@@ -422,7 +422,7 @@ if hefty: numeric upper_notch,lower_notch;
upper_notch=y6-cap_notch_cut-eps; lower_notch=y5+cap_notch_cut+eps;
if monospace:
x5r =rt x1r; x6l =lft x3l; y5=vround(slab+eps); y6=vround(h-slab-eps);
- alpha1=diag_ratio(1,stem1,y6-y5,x5r-x6l);
+ alpha1=diag_ratio(1,stem1,y5-y6,x5r-x6l);
penpos5(min(2fudged.cap_stem,alpha1*stem1),0);
penpos6(min(2fudged.cap_stem,alpha1*stem1),0);
x5'=lft x1l; z5'=whatever[z5l,z6l]; x6'=rt x4r; z6'=whatever[z5r,z6r];
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2comi.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2comi.mf
index a0320e98e13..12fef153d3e 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2comi.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2comi.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -43,7 +43,7 @@
% fita - - - - "b0 - - "1d Old Slav Fita
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Italic Cyrillic letter tshe (soft t - looks like barred h)";
cyrchar(tshe,9u#,asc_height#,0);
@@ -374,12 +374,6 @@ filldraw stroke z2e--z3e; % stem
lowercase_umlaut(0,0, 6,7,8,9);
penlabels(0,1,2,3,4,5,8,9); endchar;
-if old_cyr:
-lhchar "Italic Cyrillic letter ng - ligature enghe";
-cyrcharmoving(ng);
-fi\\;
-
-iff not old_cyr:
lhchar "Italic Cyrillic letter ng - ligature enghe";
cyrchar(ng,10u#,x_height#,0);
italcorr x_height#*slant+.5stem#-u#; %tau
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2coml.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2coml.mf
index fd047b31d23..b2cef9e2514 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2coml.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2coml.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -43,7 +43,9 @@
% fita - - - - "b0 - - "1d Old Slav Fita
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
+
+if concrete: input lgcyrcl; fi % Cyrillic concrete letters
lhchar "Lowercase Cyrillic letter tshe (soft t - looks like barred h)";
cyrchar(tshe,10u#,asc_height#,0);
@@ -161,6 +163,7 @@ else:
& z6e{left}..z7e; fi % arc and terminal
penlabels(1,2,3,4,5,6,7); endchar;
+iff not concrete:%
lhchar "Lowercase Cyrillic letter lje (soft l)";
cyrchar(lje,10u# % if not serifs:+.5width_adj# fi % dl_width;n_width
,x_height#,0);
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2comu.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2comu.mf
index 5b03fcbce65..a0c2ea50ec0 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2comu.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2comu.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -43,7 +43,9 @@
% FITA - - - - - "90 - - "15 Old Slav Fita
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
+
+if concrete: input lgcyrcu; fi % Cyrillic concrete letters
lhchar "Uppercase Cyrillic letter TSHE (Soft T - like Th)";
cyrchar(TSHE,13u#,cap_height#,0);
@@ -147,6 +149,8 @@ if slitex:
fi
%%%%%
penlabels(1,2,3,4,5,6,7,8); endchar;
+%for recognizing fontdimen 15
+if enc_name="X2": font_cap_stem cap_stem#; fi
lhchar "Uppercase Cyrillic letter LAT_J (as Latin J)";
cyrchar(LAT_J,9u#,cap_height#,0);
@@ -199,6 +203,7 @@ fi
uppercase_umlaut(0,0, 9,10,11,12);
penlabels(1,2,3,4,5,6,7,8, 9,10,11,12); endchar;
+iff not concrete:%
lhchar "Uppercase Cyrillic letter LJE (Soft L)";
cyrchar(LJE,13.5u#,cap_height#,0); % DL_width:N_width
if is_small_cap: getcharcode(lje); fi;
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf
index 6a3c662c4ca..c13577b0877 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2loi.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -63,7 +63,7 @@
% r_tl - - - "bb Er with tail
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
iff knuthian_ae:%
lhchar "Italic Cyrillic letter ae - ligature ae";
@@ -167,7 +167,7 @@ cyrbulb(7,8,9);
enddef;
ogonek_breadth:=xvair;
numeric tt; % the time...
- tt=if hefty: 2.8 else: 2.6 fi+eps;
+ tt=if hefty: 2.8 else: 2.7 fi+eps;
join_angle=angle((direction tt of p.r) rotated 180);
ogonek_pos=point tt of p.r+.5(the_pen-fine)*
unitvector((direction tt of p.r) rotated 90)-(ogonek_breadth-the_pen,0);
@@ -598,14 +598,11 @@ filldraw circ_stroke z6e--z7'e; % right stem
filldraw stroke z10e--z11e; % bar
%%%
pos12(vair,-90); pos13(hair,-180); pos14(flare,-180); pos5(stem,0);
-x5=x3; bot y5=-1/3d; bot y12r=-d-oo; y14-.5flare=-vround.9d;
-%x6=w-11/3u; lft x7r=min(x4-4u,lft x7r+x6-x7l+5u-eps);
-%x12=(x3+2.5u-.5stem)-10/3u; lft x13r=min(x3-10/3u,lft x13r+x12-x13l+13/3u-eps);%!!!
+x5=x3; bot y5=-1/3d; bot y12r=-d-oo; y14=-vround min(.9d+.5flare,y3)-eps;
x12=(x3+2.5u-.5stem)-9/3u; lft x14r=min(x3-8/3u,lft x13r+x12-x13l+11/3u-eps);%!!!
-%filldraw circ_stroke z3e--z5e{down}...{left}z12e; % right stem and hook
forsuffixes e=l,r:
- z12'e=((0,y14)--(w,y14)) intersectionpoint
- (z5e{down}...{left}z12e); endfor
+ z12'e=((-u,y14)--(w+u,y14)) intersectionpoint
+ (z3e--z5e{down}...{left}z12e); endfor
if lft x12'l>rt x14l+max(1,hround(1/3vair+.5)):
filldraw stroke z3e--z5e{down}...{left}z12e; % right stem and hook
else:
@@ -616,8 +613,7 @@ x12=(x3+2.5u-.5stem)-9/3u; lft x14r=min(x3-8/3u,lft x13r+x12-x13l+11/3u-eps);%!!
bulb(12,13,14); % bulb
penlabels(0,1,2,3,4,5,6,7,8,9,10); endchar;
-iff serifs:
-lhchar "Lowercase Cyrillic letter delta - Lowercase Greek delta";
+lhchar "Italic Cyrillic letter delta - looks like lowercase Greek delta";
cyrchar(delta,8u#,asc_height#,0);
italcorr .9asc_height#*slant+.5hair#-1.5u#;
adjust_fit(0,0); pickup fine.nib;
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2lol.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2lol.mf
index 640e6f715f8..4365d7d50f7 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2lol.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2lol.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -52,7 +52,7 @@
% r_tl - - - "bb Er with tail
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Cyrillic letter ae - ligature ae";
cyrchar(ae,13u#,x_height#,0);
@@ -231,6 +231,7 @@ easy_ogonek(the_pen,9,10,11); % ogonek
%%%
penlabels(0,1,2,3,4,5,6,7,8, 9,10,11); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Lowercase Cyrillic letter k_vcrs - ka vcrossed (`roman')";
cyrchar(k_vcrs,11.5u# if not serifs:+.5width_adj# fi,
@@ -293,11 +294,12 @@ numeric middle_weight;
middle_weight=max(currentbreadth+eps,.6[thin_join,vair]);
pos9(middle_weight,0); pos11(middle_weight,0);
lft x9l=lft x11l=
- hround max(tiny.rt x1r+1,max(x5l-middle_weight,.5[tiny.rt x1r,x5l]));
+ hround max(tiny.rt x1r+1,max(x5l-middle_weight,.5[tiny.rt x1r,x5l]));
top y11-bot y9=.5x_height; .52[y9,y11]=.5[y7l,y7r];
filldraw stroke z9e--z11e; % cross bar
penlabels(1,2,3,4,5,6,7,8,9,10,11); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Lowercase Cyrillic letter k_hcrs - ka hcrossed (`roman')";
cyrchar(k_hcrs,10u#,asc_height#,0); % n_width
@@ -362,6 +364,7 @@ lft x7=hround 1/3u-serif_fit;
filldraw stroke z7e--z8e; % cross bar
penlabels(1,2,3,4,5,6, 7,8); endchar;
+iff not concrete:%
lhchar "Lowercase Cyrillic letter l_dsc - el descender";
cyrchar(l_dsc,10u# % if not serifs:+.5width_adj# fi % dl_width;n_width
,x_height#,if is_ogonek: desc_depth# else: sbeak# fi); %ldesc/og_depth
@@ -413,23 +416,18 @@ if serifs:
nodish_serif(3,0,e,1/3,1.05jut,f,1/3,inner_jut); % upper left serif
filldraw z.c0--z.c1--z.f1--z.f0--cycle; fi % upper inter_serif bar
%%%%%
-% lowercase descender/ogonek
-if is_ogonek:
- endgroup;
- def the_pen=
- if known ogonek_pen: ogonek_pen elseif serifs: tiny else: fine fi
- enddef;
- % |stem| was drawn by |tiny| pen, hence |tiny| in the following equation:
- ogonek_pos=(x2 if not serifs: l fi,.5the_pen)
- if serifs and not is_egyptian: +(.5xvair,0) fi;
- easy_ogonek(the_pen,7,8,9); % ogonek
+% lowercase descender/saam tail
+slab:=vair; % lower.slab
+numeric right_jut;
+right_jut=if serifs: max(limit_dist,1.1jut) else: hround (r-rt x2r-.5u) fi;
+if unic:
+ %saam tail
+ serif(2,1,v,1/3,-jut);
+ siam_serif(2,1,w,1/3,right_jut);
else:
- slab:=vair; % lower.slab
- numeric right_jut;
- right_jut=if serifs: max(limit_dist,1.1jut) else: hround (r-rt x2r-.5u) fi;
r_serif(2,1,o,1/3,jut,p,1/3,beak_darkness,right_jut,.6beak_jut); % lower right descender
- endgroup;
fi
+endgroup;
penlabels(1,2,3,4,5,6, 7,8,9);endchar;
lhchar "Lowercase Cyrillic letter m_dsc - m descender";
@@ -479,8 +477,8 @@ if serifs:
if rt x2r+jut+.5u+1+eps+.5stem3<=lft x4l-.5stem3-jut: inner_jut=jut;
else: rt x2r+inner_jut+.5u+1+eps+.5stem3=lft x4l-.5stem3-inner_jut; fi
slab:=Vround(vair-vair_corr); % lower.slab
- serif(1,2,a,1/3,-jut); % upper left serif
- serif(3,4,d,1/3,jut); % upper right serif
+ serif(1,2,a,1/3,-jut); % upper left serif
+ serif(3,4,d,1/3,jut); % upper right serif
slab:=vair; % lower.slab
dish_serif(2,1,b,1/2,jut,c,1/2,jut)(dark); % lower left serif
if is_ogonek:
@@ -488,23 +486,18 @@ if serifs:
fi
fi
%%%%%
-% lowercase descender/ogonek
-if is_ogonek:
- endgroup;
- def the_pen=
- if known ogonek_pen: ogonek_pen elseif serifs: tiny else: fine fi
- enddef;
- % |stem| was drawn by |tiny| pen, hence |tiny| in the following equation:
- ogonek_pos=(x4 if not serifs: l fi,.5the_pen)
- if serifs and not is_egyptian: +(.5xvair,0) fi;
- easy_ogonek(the_pen,9,10,11); % ogonek
+% lowercase descender/saam tail
+slab:=vair; % lower.slab
+numeric right_jut;
+right_jut=if serifs: max(limit_dist,1.1jut) else: hround (r-rt x4r-.5u) fi;
+if unic:
+ %saam tail
+ serif(4,3,v,1/3,-jut);
+ siam_serif(4,3,w,1/3,right_jut);
else:
- slab:=vair; % lower.slab
- numeric right_jut;
- right_jut=if serifs: max(limit_dist,1.1jut) else: hround (r-rt x4r-.5u) fi;
r_serif(4,3,o,1/3,jut,p,1/3,beak_darkness,right_jut,.6beak_jut); % lower right descender
- endgroup;
fi
+endgroup;
penlabels(0,1,1',2,3,3',4,5,6,7,8, 9,10,11); endchar;
lhchar "Lowercase Cyrillic letter abh_ha - Abkhazian ha";
@@ -520,10 +513,12 @@ interim superness:=hein_super;
x2r=hround max(.5u,1.25u-.5curve); %o
x4r=w-x2r; x1=x3=x6=.5w; y1r=h+vround 1.5oo; y3r=-oo;
y2=y4=.5h-vair_corr; y2l:=.52h;
-y7=-1/3d; rt x7=hround(w-.5u); penpos7(.7[thin_join,vair],270);
-y6=.5y5r; penpos6(mid_curve,180);
+y7=vround -1/3d-eps; rt x7=hround(w-.5u)+eps; penpos7(.7[thin_join,vair],270);
+penpos6(mid_curve,180);
x5=if serifs:.5[x6,x4]else:.5[x6,x4]fi;
-y5r=.5[y4,y1]; penpos5(.7[thin_join,vair],90);
+y5r=vround max(.5[y4,y1],y4+.7[thin_join,vair])+eps;
+penpos5(.7[thin_join,vair],90);
+y6=vround min(.5y5r,y5l-.5)-eps;
fill stroke pulled_super_arc.e(1,2)(.5superpull)
& pulled_super_arc.e(2,3)(.5superpull)
& pulled_super_arc.e(3,4)(.5superpull) % 3/4 bowl
@@ -560,12 +555,12 @@ if serifs:
if rt x1r+jut+.5u+1<=lft x3l-jut: inner_jut1=jut; % stay for tail serif
else: rt x1r+inner_jut1+.5u+1=lft x3l-inner_jut1; fi
save slab; slab:=vair; % lower.slab
- dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut1); % lower left serif
- %dish_serif(4,3,g,1/3,inner_jut1,h,1/3,jut); %!!! % lower right serif
+ dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut1); % lower left serif
+ %dish_serif(4,3,g,1/3,inner_jut1,h,1/3,jut); %!!! % lower right serif
inner_jut2=min(.5(lft x3l-rt x1r)-eps,.5jut);
slab:=Vround(vair-vair_corr); % lower.slab
- nodish_serif(1,2,a,1/3,jut,b,1/3,inner_jut2); % upper left serif
- nodish_serif(3,4,e,1/3,inner_jut2,f,1/3,jut); % upper right serif
+ nodish_serif(1,2,a,1/3,jut,b,1/3,inner_jut2); % upper left serif
+ nodish_serif(3,4,e,1/3,inner_jut2,f,1/3,jut); % upper right serif
filldraw z.b0--z.b1--z.e1--z.e0--cycle; % upper inter_serif bar
else:
lft x1'= lft x1l; top y1'r=h; pos1'(vair,90);
@@ -818,10 +813,10 @@ if serifs:
else: rt x1r+inner_jut+.5u+1=lft x3l-inner_jut; fi
%%%
save slab; slab:=Vround(vair-vair_corr); % lower.slab
- dish_serif(1,2,a,1/3,jut,b,1/3,inner_jut); % upper left serif
- dish_serif(3,4,e,1/3,inner_jut,f,1/3,jut); % upper right serif
+ dish_serif(1,2,a,1/3,jut,b,1/3,inner_jut); % upper left serif
+ dish_serif(3,4,e,1/3,inner_jut,f,1/3,jut); % upper right serif
slab:=vair; % lower.slab
- dish_serif(4,3,g,1/3,inner_jut,h,1/3,jut); % lower right serif
+ dish_serif(4,3,g,1/3,inner_jut,h,1/3,jut); % lower right serif
else:
fill stroke pulled_arc.e(2',5) & z5e{right}...{right}z6e; fi % arc
%%%%%
@@ -926,7 +921,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
%rt x[_four]l=floor x[_zero]-1.5u if monospace: / expansion_factor fi); %2.5u
lft x[_four]r=-1/6u if monospace: / expansion_factor fi; %2.5u
@@ -934,7 +929,7 @@ if serifs:
x[_two]r:=max(x,.5[x[_three]r,x[_two]]);
forsuffixes e=l,r:
z[_one]'e=((0,y[_four])--(w,y[_four])) intersectionpoint
- (pulled_arc.e([_one],[_two])); endfor
+ (z[_five]e--pulled_arc.e([_one],[_two])); endfor
if lft x[_one]'l>rt x[_four]l+max(1,1/3vair+.5):
filldraw stroke z[_five]e--pulled_arc.e([_one],[_two]);
else:
@@ -1043,11 +1038,11 @@ if serifs: numeric inner_jut;
if rt x2r+jut+.5u+1+eps+.5stem3<=lft x4l-.5stem3-jut: inner_jut=jut;
else: rt x2r+inner_jut+.5u+1+eps+.5stem3=lft x4l-.5stem3-inner_jut; fi
save slab; slab:=Vround(vair-vair_corr); % lower.slab
- serif(1,2,a,1/3,-jut); % upper left serif
- serif(3,4,d,1/3,jut); % upper right serif
+ serif(1,2,a,1/3,-jut); % upper left serif
+ serif(3,4,d,1/3,jut); % upper right serif
slab:=vair; % lower.slab
- dish_serif(2,1,b,1/2,jut,c,1/2,jut)(dark); fi % lower left serif
- %dish_serif(4,3,e,1/3,jut,f,1/3,jut); fi %!!! % lower right serif
+ dish_serif(2,1,b,1/2,jut,c,1/2,jut)(dark); fi % lower left serif
+ %dish_serif(4,3,e,1/3,jut,f,1/3,jut); fi %!!! % lower right serif
%%%%%
% l_tail(4);
_zero:=4;
@@ -1064,7 +1059,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
rt x[_four]l=max(x[_zero]l-bulb_diam,
floor x[_zero]-2.5u if monospace: / expansion_factor fi);
@@ -1182,7 +1177,7 @@ arm(3,4,e,beak_darkness,.4beak_jut); % upper arm and beak
save slab; % lower.slab
if serifs:
slab:=Vround(vair-vair_corr); % lower.slab
- nodish_serif(1,2,a,1/3,jut,b,1/3,.5jut); % upper serif
+ nodish_serif(1,2,a,1/3,jut,b,1/3,.5jut); % upper serif
if is_ogonek:
slab:=vair; % lower.slab
dish_serif(2,1,c,1/3,jut,d,1/3,1.25jut); fi %!!! % lower serif
@@ -1246,10 +1241,10 @@ if serifs:
if rt x3'r+jut+.5u+1<=lft x4'l-jut-xjut: inner_jut2=jut;
else: rt x3'r+inner_jut2+.5u+1=lft x4'l-inner_jut2-xjut; fi
save slab; slab:=Vround(vair-vair_corr); % lower.slab
- dish_serif(1',4,a,1/3,outer_jut,b,2/3,inner_jut1); % upper left serif
+ dish_serif(1',4,a,1/3,outer_jut,b,2/3,inner_jut1); % upper left serif
dish_serif(2',3,e,2/3,inner_jut1+xjut,f,1/2,outer_jut+xjut)(dark); % upper right serif
slab:=vair; % lower.slab
- dish_serif(4',1,c,2/3,inner_jut2,d,1/3,outer_jut); % lower right serif
+ dish_serif(4',1,c,2/3,inner_jut2,d,1/3,outer_jut); % lower right serif
dish_serif(3',2,g,1/2,outer_jut+xjut,h,2/3,inner_jut2+xjut)(dark); fi % lower left serif
%%%%%
% hstroke
@@ -1267,7 +1262,7 @@ if serifs:
save slab; slab:=Vround(vair-vair_corr); % lower.slab
sloped_serif.l(1,2,a,1/3,outer_jut,serif_drop); % upper serif
slab:=vair; % lower.slab
- nodish_serif(2,1,c,1/3,jut,d,1/3,.5jut); fi % lower serif
+ nodish_serif(2,1,c,1/3,jut,d,1/3,.5jut); fi % lower serif
%%%
% lsftsn_bowl(2);
_zero:=2;
@@ -1314,7 +1309,7 @@ if hefty: numeric upper_notch,lower_notch;
upper_notch=y6-cap_notch_cut-eps; lower_notch=y5+cap_notch_cut+eps;
if monospace:
x5r =rt x1r; x6l =lft x3l; y5=vround(vair'+eps); y6=vround(h-vair-eps);
- alpha1=diag_ratio(1,stem1,y6-y5,x5r-x6l);
+ alpha1=diag_ratio(1,stem1,y5-y6,x5r-x6l);
penpos5(min(2fudged.stem,alpha1*stem1),0);
penpos6(min(2fudged.stem,alpha1*stem1),0);
x5'=lft x1l; z5'=whatever[z5l,z6l]; x6'=rt x4r; z6'=whatever[z5r,z6r];
@@ -1341,30 +1336,25 @@ if serifs:
if rt x1r+jut+.5u+1<=lft x3l-jut: inner_jut=jut;
else: rt x1r+inner_jut+.5u+1=lft x3l-inner_jut; fi
save slab; slab:=Vround(vair-vair_corr); % lower.slab
- dish_serif(1,2,a,1/3,jut,b,1/3,inner_jut); % upper left serif
- dish_serif(3,4,e,1/3,inner_jut,f,1/3,jut); % upper right serif
+ dish_serif(1,2,a,1/3,jut,b,1/3,inner_jut); % upper left serif
+ dish_serif(3,4,e,1/3,inner_jut,f,1/3,jut); % upper right serif
slab:=vair; % lower.slab
- dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut); % lower left serif
+ dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut); % lower left serif
if is_ogonek:
dish_serif(4,3,g,1/3,inner_jut,h,1/3,jut); fi % lower right serif
fi
% lowercase descender
-if is_ogonek:
- endgroup;
- def the_pen=
- if known ogonek_pen: ogonek_pen elseif serifs: tiny else: fine fi
- enddef;
- % |stem| was drawn by |tiny| pen, hence |tiny| in the following equation:
- ogonek_pos=(x4 if not serifs: l fi,.5the_pen)
- if serifs and not is_egyptian: +(.5xvair,0) fi;
- easy_ogonek(the_pen,14,15,16); % ogonek
+if not serifs: inner_jut:=0; fi
+slab:=vair; % lower.slab
+right_jut:=if serifs: max(limit_dist,1.1jut) else: hround (r-rt x4r-.5u) fi;
+if unic:
+ %saam tail
+ serif(4,3,v,1/3,-jut);
+ siam_serif(4,3,w,1/3,right_jut);
else:
- if not serifs: inner_jut:=0; fi
- slab:=vair; % lower.slab
- right_jut:=if serifs: max(limit_dist,1.1jut) else: hround (r-rt x4r-.5u) fi;
r_serif(4,3,g,1/3,inner_jut,h,1/3,beak_darkness,right_jut,.6beak_jut); % lower right descender
- endgroup;
fi
+endgroup;
%%%%%
% the accent
h:=full_h; cbreve(.5w,0, 7,8,9,10,11,12,13);
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2lou.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2lou.mf
index 2b4dfdf2490..91dd1af7a91 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2lou.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2lou.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -31,12 +31,14 @@
% M_dsc "4c L - - "88 Em with descender
% ABH_HA "4e N - - "97 Abkhasian kha
% P_tl "4f O - - "80 Pe with tail
+%
% R_dsc "50 P - - "85 Er with descender
% LAT_Q "51 Q - - - Latin letter Q
% T_dsc "52 R - - "82 Te with descender
% TETSE "54 T - - "81 Ligature Te-Tse
% CH_vcrs "56 V "97 - - Che vertically crossed
% LAT_W "57 W - - - Latin letter W
+%
% N_ltl "1c - - "99 En with left tail
% DELTA "1e - "86 - Delta
% M_tl - - - "8e Em with tail
@@ -44,12 +46,13 @@
% S_acrs - - - "91 Es acute crossed
% G_crsdsc - - "80 - Ghe crossed with descender
% H_hcrs - - "94 - Kha horisontally crossed
+%
% SEMISN - - - "93 Semi Soft Sign
% I_shdsc - - - "94 I Short with descender
% R_tl - - - "9b Er with tail
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Uppercase Cyrillic letter AE - ligature AE";
cyrchar(AE,16u#,cap_height#,0);
@@ -222,6 +225,7 @@ else:
easy_ogonek(the_pen,9,10,11); % ogonek
penlabels(0,1,2,3,4,5,6,7,8, 9,10,11); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Uppercase Cyrillic letter K_vcrs - KA vcrossed (`roman')";
cyrchar(K_vcrs,15u# if not serifs:+.5width_adj# fi, % N_width+1.5u
@@ -277,6 +281,7 @@ top y11-bot y9=.5cap_height; .52[y9,y11]=y7;
filldraw stroke z9e--z11e; % cross bar
penlabels(1,2,3,4,5,6,7,8,9,10,11); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Uppercase Cyrillic letter K_hcrs - KA hcrossed (`roman')";
cyrchar(K_hcrs,13.5u#,cap_height#,0); % N_width
@@ -326,18 +331,19 @@ if serifs:
pickup crisp.nib; numeric outer_jut;
outer_jut=if serifs: max(limit_dist,1.1cap_jut) else: 1.8u fi;
pos7(bar,90); pos8(bar,90);
-top y7r=top y8r=vround (min(.5[x_height,h]+.5bar,h-max(bracket,1.2slab))-eps);
+top y7r=top y8r=vround (min(1/3[x_height,h]+.5bar,h-max(bracket,1.2slab))-eps);
x7=x1r+1.15outer_jut; x8=hround 1/3u-cap_serif_fit;
filldraw stroke z7e--z8e; % cross bar
penlabels(1,2,3,4,5,6, 7,8); endchar;
+iff not concrete:%
lhchar "Uppercase Cyrillic letter L_dsc - EL descender";
cyrchar(L_dsc,13.5u#,cap_height#, % DL_width:N_width
if is_ogonek: desc_depth# else: cap_sbeak# fi); %udesc/og_depth
if is_small_cap: getcharcode(l_dsc); fi
italcorr cap_height#*slant-cap_serif_fit#+cap_jut#-2.5u#+min(.5cap_stem#,u#);
adjust_fit(cap_serif_fit# if not serifs:
- +\\.5(cap_stem#-u#),.5(cap_stem#-u#)+ else:,fi\\ cap_serif_fit#); %D_adj
+ +\\.5(cap_stem#-u#),.5(cap_stem#-u#)+ else:,fi\\ cap_serif_fit#); %D_adj
% upper_l;
pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
rt x1r=rt x2r=w-hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
@@ -385,19 +391,15 @@ if serifs:
nodish_serif(3,0,e,1/3,1.05cap_jut,f,1/3,inner_jut); % upper left serif
filldraw z.c0--z.c1--z.f1--z.f0--cycle; fi % upper inter_serif bar
%%%%%
-% uppercase descender/ogonek
-if is_ogonek:
- def the_pen=if known ogonek_pen: ogonek_pen
- elseif serifs: tiny elseif is_bold: fisp else: fine fi
- enddef;
- % |diag_end| refers to |tiny| pen, hence |tiny| in the following equation:
- ogonek_pos=(x2 if not serifs: l if is_bold: +.75tiny fi\\ fi,.5the_pen)
- if serifs and not is_egyptian: +(.5xvair,0) fi;
- easy_ogonek(the_pen,7,8,9); % ogonek
+% uppercase descender/saam tail
+numeric right_jut;
+right_jut=
+ if serifs: max(limit_dist,cap_jut) else: hround (r-rt x2r-.65u) fi;
+if unic:
+ %saam tail
+ serif(2,1,v,1/3,-cap_jut);
+ siam_serif(2,1,w,1/3,right_jut);
else:
- numeric right_jut;
- right_jut=
- if serifs: max(limit_dist,1.1cap_jut) else: hround (r-rt x2r-.65u) fi;
r_serif(2,1,x,1/3,cap_jut,y,1/3,beak_darkness,right_jut,beak_jut); % lower right descender
fi
penlabels(1,2,3,4,5,6, 7,8,9); endchar;
@@ -452,18 +454,14 @@ if serifs:
dish_serif(4,3,e,1/3,cap_jut,f,1/3,cap_jut); fi %!!! % lower right serif
fi
%%%%%
-% uppercase descender/ogonek
-if is_ogonek:
- def the_pen=if known ogonek_pen: ogonek_pen
- elseif serifs: tiny elseif is_bold: fisp else: fine fi
- enddef;
- % |diag_end| refers to |tiny| pen, hence |tiny| in the following equation:
- ogonek_pos=(x4 if not serifs: l if is_bold: +.4tiny fi\\ fi,.5the_pen)
- if serifs and not is_egyptian: +(.5xvair,0) fi;
- easy_ogonek(the_pen,9,10,11); % ogonek
+% uppercase descender/saam tail
+numeric right_jut;
+right_jut=if serifs: max(limit_dist,1.1cap_jut) else: hround (r-rt x4r-.65u) fi;
+if unic:
+ %saam tail
+ serif(4,3,v,1/3,-cap_jut);
+ siam_serif(4,3,w,1/3,right_jut);
else:
- numeric right_jut;
- right_jut=if serifs: max(limit_dist,1.1cap_jut) else: hround (r-rt x4r-.65u) fi;
r_serif(4,3,x,1/3,cap_jut,y,1/3,beak_darkness,right_jut,beak_jut); % lower right descender
fi
penlabels(0,1,1',2,3,3',4,5,6,7,8, 9,10,11); endchar;
@@ -865,14 +863,14 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
%rt x[_four]l=floor x[_zero]-2u if monospace: / expansion_factor fi;%2.5u
lft x[_four]r=-1/3u if monospace: / expansion_factor fi;%2.5u
%filldraw stroke z[_five]e--pulled_arc.e([_one],[_two]);
forsuffixes e=l,r:
z[_one]'e=((0,y[_four])--(w,y[_four])) intersectionpoint
- (pulled_arc.e([_one],[_two])); endfor
+ (z[_five]e--pulled_arc.e([_one],[_two])); endfor
if lft x[_one]'l>rt x[_four]l+max(1,.5vair+.5):
filldraw stroke z[_five]e--pulled_arc.e([_one],[_two]);
else:
@@ -1004,7 +1002,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
rt x[_four]l=floor x[_zero]-2.5u if monospace: / expansion_factor fi;
filldraw stroke z[_five]e--pulled_arc.e([_one],[_two]);
@@ -1267,7 +1265,7 @@ if hefty: numeric upper_notch,lower_notch;
upper_notch=y6-cap_notch_cut-eps; lower_notch=y5+cap_notch_cut+eps;
if monospace:
x5r =rt x1r; x6l =lft x3l; y5=vround(slab+eps); y6=vround(h-slab-eps);
- alpha1=diag_ratio(1,stem1,y6-y5,x5r-x6l);
+ alpha1=diag_ratio(1,stem1,y5-y6,x5r-x6l);
penpos5(min(2fudged.cap_stem,alpha1*stem1),0);
penpos6(min(2fudged.cap_stem,alpha1*stem1),0);
x5'=lft x1l; z5'=whatever[z5l,z6l]; x6'=rt x4r; z6'=whatever[z5r,z6r];
@@ -1299,19 +1297,15 @@ if serifs:
dish_serif(4,3,g,1/3,inner_jut,h,1/3,cap_jut); fi % lower right serif
fi
%%%
-% uppercase descender/ogonek
-if is_ogonek:
- def the_pen=if known ogonek_pen: ogonek_pen
- elseif serifs: tiny elseif is_bold: fisp else: fine fi
- enddef;
- % |diag_end| refers to |tiny| pen, hence |tiny| in the following equation:
- ogonek_pos=(x4 if not serifs: l if is_bold: +.75tiny fi\\ fi,.5the_pen)
- if serifs and not is_egyptian: +(.5xvair,0) fi;
- easy_ogonek(the_pen,14,15,16); % ogonek
+% uppercase descender/saam tail
+if not serifs: inner_jut:=0; fi
+numeric right_jut;
+right_jut=if serifs: max(limit_dist,1.1cap_jut) else: hround (r-rt x4r-.65u) fi;
+if unic:
+ %saam tail
+ serif(4,3,v,1/3,-inner_jut);
+ siam_serif(4,3,w,1/3,right_jut);
else:
- if not serifs: inner_jut:=0; fi
- numeric right_jut;
- right_jut=if serifs: max(limit_dist,1.1cap_jut) else: hround (r-rt x4r-.65u) fi;
r_serif(4,3,g,1/3,inner_jut,h,1/3,beak_darkness,right_jut,beak_jut); % lower right descender
fi
%%%%%
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2slvi.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2slvi.mf
index 47078c5937d..b01b35ab11e 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2slvi.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2slvi.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -50,7 +50,7 @@
% narrow_e used eps
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Italic Cyrillic letter ligature az - old a";
cyrcharmoving(az);
@@ -59,10 +59,93 @@ lhchar "Italic Cyrillic letter ligature i_az - iot az";
cyrcharmoving(i_az);
lhchar "Italic Cyrillic letter l_yus - little yus";
-cyrcharmoving(l_yus);
+%cyrcharmoving(l_yus);%restored for Unicode
+cyrchar(l_yus,11u#,x_height#,0);
+italcorr 1/3x_height#*slant+.5hair#+.5u#;
+adjust_fit(if monospace:-.5u# else:.5u# fi, %wbulb_adj
+ 0);
+% ital_amod;
+pickup fine.nib; pos1(vair,-90); pos2(hair,0); pos3(hair,0); pos4(vair,-90);
+pos5(hair,-180); pos6(flare,-180);
+pos1'(stem,180); pos10(stem,0);
+top y1l=h+oo; x1=.5[x3,x1']; x2=x3=3u; y3=.35h; y2=.75h;
+bot y4r=-oo; x4=lft x6r+flare; y6-.5flare=.1h; lft x6r=-.25u; z5r=z6r;
+y1'=.8h; x1'=x7; z10=z1';
+rt x7r=hround(w-2.5u+.5stem);
+bulb(4,5,6); % bulb
+x9=w; hook_out(7,8,9); % closing hook
+filldraw stroke z10e--z7e; % tie
+filldraw stroke pulled_arc.e(4,3) & super_arc.e(3,1)
+ & super_arc.e(1,1'); % right stem
+% stem&bar
+pos11(vair,90); pos12(vair,90);
+z11=((l,bar_height)..(w,bar_height)) intersectionpoint
+ (pulled_arc.r(4,3) & super_arc.r(3,1));
+z12=((0,bar_height)..(w,bar_height)) intersectionpoint (z10l..z7l);
+filldraw stroke z11e--z12e; % bar
+numeric stem[]; stem1=max(fine.breadth+eps,.7[thin_join,stem]);
+pos13(stem1,0); pos14(stem1,0);
+x13=x14=.5[x11,x12]; y13=y12; y14-.5stem1=0;
+filldraw circ_stroke z14e--z13e; % stem
+%%%
+penlabels(1,1',2,3,4,5,6,7,8,9,11,11',14,15);
+endchar;
lhchar "Italic Cyrillic letter il_yus - iotfied little yus";
-cyrcharmoving(il_yus);
+%cyrcharmoving(il_yus);%restored for Unicode
+cyrchar(il_yus,11u#,x_height#,0);
+italcorr 1/3x_height#*slant+.5hair#+.5u#;
+adjust_fit(if monospace: 3.5u#+else: 4.5u#+fi.5u#,
+ if monospace:-1.5u# else:0 fi); %rstem_adj
+% ital_amod;iot
+pickup fine.nib; pos1(vair,-90); pos2(hair,0); pos3(hair,0); pos4(vair,-90);
+pos5(hair,-180); pos6(flare,-180);
+pos1'(stem,180); pos10(stem,0);
+top y1l=h+oo; x1=.5[x3,x1']; x2=x3=3u-eps; y3=.35h; y2=.75h;
+bot y4r=-oo; lft x6r=-.25u;
+x4=min(lft x6r+flare,lft x3l-eps); y6-.5flare=.1h; z5r=z6r;
+y1'=min(.8h,bot y1l)-eps; z10=z1';
+rt x7r=hround (w-2.5u+.5stem)+eps;
+x1'=x7;
+bulb(4,5,6); % bulb
+% right_stem;
+_one:=7; _two:=8; _three:=9;
+if monospace: pos[_three](vair,90); pos[_one](stem,0);
+ x[_three]=good.x .5[x[_one],w]; bot y[_three]l=0; y[_one]=1/3h;
+ filldraw stroke z[_one]e{down}...{right}z[_three]e; % terminal
+else: x[_three]=w; hook_out([_one],[_two],[_three]); fi % opening hook
+filldraw stroke z10e--z7e; % tie
+if lft x1'r<x1: lft x1'r:=x1+eps; fi
+filldraw stroke pulled_arc.e(4,3) &
+ super_arc.e(3,1) & super_arc.e(1,1'); % right stem
+% stem&bar
+pos11(vair,90); pos12(vair,90);
+z11=((l,bar_height)..(w,bar_height)) intersectionpoint
+ (pulled_arc.r(4,3) & super_arc.r(3,1));
+z12=((0,bar_height)..(w,bar_height)) intersectionpoint (z10l..z7l);
+filldraw stroke z11e--z12e; % bar
+numeric stem[]; stem1=max(fine.breadth+eps,.7[thin_join,stem]);
+pos13(stem1,0); pos14(stem1,0);
+x13=x14=.5[x11,x12]; y13=y12; y14-.5stem1=0;
+filldraw circ_stroke z14e--z13e; % stem
+%%%
+% i half
+_one:=15; _two:=16; _three:=17; _four:=18; _five:=19; _six:=20;
+%
+pos[_four](stem,0);
+lft x[_four]l=l+letter_fit if not monospace: +hround(2.5u-.5stem) fi;
+y[_four]-.5stem=-oo; x[_three]=x[_four];
+if monospace:
+ pos[_three](stem,0); top y[_three]=h;
+else:
+ x[_one]=l+letter_fit; hook_in([_one],[_two],[_three]); fi % opening hook
+filldraw circ_stroke z[_four]e--z[_three]e; % stem
+pos[_five](vair,90); pos[_six](vair,90); %!!!
+x[_five]=x[_four]; x[_six]=x11; y[_five]=y[_six]=bar_height; %!!!
+filldraw stroke z[_five]e--z[_six]e; % bar %!!!
+%%%
+penlabels(1,1',2,3,4,5,6,7,8,9,11,12,13,14,15,16,17,18,19,20);
+endchar;
lhchar "Italic Cyrillic letter gerv - Glagolic letter";
cyrcharmoving(gerv);
@@ -113,16 +196,168 @@ lhchar "Italic Cyrillic letter izhe";
cyrcharmoving(izhe);
lhchar "Italic Cyrillic letter omga - omega";
-cyrcharmoving(omga);
+%cyrcharmoving(omga);%restored for Unicode
+cyrchar(omga,11u#,x_height#,0);
+italcorr .7x_height#*slant+.5curve#-u# if math_fitting:-.15u# fi; %o+.35u
+adjust_fit(if monospace:-.35u#,-.35u# else:0,0 fi); %bowl_adj
+% ital_omega;
+pickup fine.nib; pos2(stem,-180); lft x2r=hround.5u; y2=y4=y6=y8=bar_height;
+pos3(vair,-90); pos4(hair,0); pos5(vair,90);
+pos6(hair,180); pos7(vair,270); pos8(stem,360);
+bot y3r=bot y7r=-oo; top y5r=vround(.2[y4,h]+.5vair);
+x3=.5[x2,x4]; x7+.25u=.5[x6,x8]; rt x8r=hround(w-.5u);
+x5+.5stem=hround(.5[x2l,x8l]+.5stem)+eps;
+x5=.5[x4,x6]; rt x4r-lft x6r=min(stem,2hair)+2eps;
+y1+.5hair=h+oo; x1=min(x2l+1.25u,lft x6r); x9=w-x1; y9=y1;
+pos1(hair,angle(2(x1-x2),y1-y2)+90); pos9(hair,-angle(2(x1-x2),y1-y2)+90);
+if x4l<x6l: x4l:=x6l:=x5; fi
+filldraw stroke z1e...z2e{down}...z3e{right}
+ ...{up}z4e...{left}z5e; % left arc
+filldraw stroke z5e{left}...z6e{down}...
+ z7e{right}...{up}z8e...z9e; % right arc
+%%%
+penlabels(1,2,3,4,5,6,7,8,9); endchar;
lhchar "Italic Cyrillic letter omga_rnd - omega round";
-cyrcharmoving(omga_rnd);
+%cyrcharmoving(omga_rnd);%restored for Unicode
+cyrchar(omga_rnd,11u#,x_height#,0); %f width
+italcorr .7x_height#*slant+.5curve#-u# if math_fitting:-.5u# fi;
+adjust_fit(if monospace:0,0 else:-.35u#,-.35u#fi); pickup fine.nib;
+pos1(vair,90); pos2(curve,180); pos3(vair,270); pos4(curve,360);
+interim superness:=1.075 superness; %
+x1=x3=.5w; lft x2r=hround(1.5u-.5curve); x4=w-x2;
+top y1r=h+oo; y2=y4=.5[y1,y3]; bot y3r=-oo;
+filldraw stroke pulled_arc.e(1,2) & pulled_arc.e(2,3)
+ & pulled_arc.e(3,4) & pulled_arc.e(4,1); % bowl
+pickup crisp.nib;
+% dots
+numeric bulb_diam; bulb_diam=hround 7/8[hair,flare];
+z5=z1r; z6=z3r; x5'=x6'=x1; pos5(bulb_diam,0); pos6(bulb_diam,0);
+bot y5'=max(.5h+1,bot y1l-.7bulb_diam);
+top y6'=min(.5h-1,top y3l+.7bulb_diam);
+pos6'(min(bulb_diam,.7[hair,fudged.stem]),0);
+pos5'(min(bulb_diam,.7[hair,fudged.stem]),0);
+filldraw circ_stroke z5e--z5'e; filldraw circ_stroke z6e--z6'e; %dots
+penlabels(1,2,3,4); endchar;
lhchar "Italic Cyrillic letter ot - omega with te accent";
-cyrcharmoving(ot);
+%cyrcharmoving(ot);%restored for Unicode
+cyrchar(ot,11u#,x_height#+acc_height#,0);
+italcorr .7x_height#*slant+.5curve#-u# if math_fitting:-.15u# fi; %o+.35u
+adjust_fit(if monospace:-.35u#,-.35u# else:0,0 fi); %bowl_adj
+full_h:=h; h:=x_height;
+% ital_omega;
+pickup fine.nib; pos2(stem,-180); lft x2r=hround.5u; y2=y4=y6=y8=bar_height;
+pos3(vair,-90); pos4(hair,0); pos5(vair,90);
+pos6(hair,180); pos7(vair,270); pos8(stem,360);
+bot y3r=bot y7r=-oo; top y5r=vround(.2[y4,h]+.5vair);
+x3=.5[x2,x4]; x7+.25u=.5[x6,x8]; rt x8r=hround(w-.5u);
+x5+.5stem=hround(.5[x2l,x8l]+.5stem)+eps;
+x5=.5[x4,x6]; rt x4r-lft x6r=min(stem,2hair)+2eps;
+y1+.5hair=h+oo; x1=min(x2l+1.25u,lft x6r); x9=w-x1; y9=y1;
+pos1(hair,angle(2(x1-x2),y1-y2)+90); pos9(hair,-angle(2(x1-x2),y1-y2)+90);
+if x4l<x6l: x4l:=x6l:=x5; fi
+filldraw stroke z1e...z2e{down}...z3e{right}
+ ...{up}z4e...{left}z5e; % left arc
+filldraw stroke z5e{left}...z6e{down}...
+ z7e{right}...{up}z8e...z9e; % right arc
+%%%
+% the accent
+%%%%%
+% the accent
+% low_te(16);
+_zero:=5;
+_one:=10; _two:=11; _three:=12; _four:=13;
+_five:=14; _six:=15; _seven:=16; _eight:=17; _nine:=18;
+%
+if serifs: pickup crisp.nib;
+ else: pickup pencircle scaled min(.5fine,.15vair); fi
+numeric stem[]; stem1=if hefty: fudged.hair-2stem_corr else: .7[vair,stem] fi;
+stem2=if serifs: vair else: max(currentbreadth+eps,.6[thin_join,vair]) fi;
+stem3=if serifs: hair else: max(currentbreadth+eps,.6[thin_join,vair]) fi;
+pos[_one](stem1,0); pos[_two](stem1,0);
+lft x[_one]l=lft x[_two]l=hround(x[_zero]-.5stem1);
+numeric mid_thickness;
+mid_thickness=vround if serifs:1/4 else: 1/3 fi[vair,stem];
+bot y[_two]=bot y[_four]=bot y[_five]=
+ vround max(h+o+max(tiny,.5mid_thickness),1/3[h,h+acc_height]+o-.5mid_thickness);
+top y[_one]=top y[_three]r=max(h+acc_height,bot y[_two]+1.5vair);
+filldraw stroke z[_one]e--z[_two]e; % stem
+pos[_three](stem2,90); pos[_four](stem3,0); pos[_five](stem3,180);
+x[_three]=x[_one];
+rt x[_four]r=hround(x[_zero]+2.5u if monospace:/expansion_factor fi+.5vair);
+x[_four]-x[_three]=x[_three]-x[_five];
+z[_four]'=beak_darkness[(x[_four]l,y[_three]l),
+ .5[(x[_one]r,y[_three]l),z[_four]l] ];
+z[_five]'=beak_darkness[(x[_five]l,y[_three]l),
+ .5[(x[_one]l,y[_three]l),z[_five]l] ];
+filldraw z[_four]r--z[_four]l{up}...z[_four]'
+ ...{left}(x[_one]r,y[_three]l)--(x[_one]r,y[_three]l){left}...z[_five]'
+ ...{down}z[_five]l--z[_five]r---
+ (x[_five]r,y[_three]r)---(x[_four]r,y[_three]r)---cycle;
+%%%
+penlabels(1,2,3,4,5,6,7,8,9); endchar;
-lhchar "Italic Cyrillic letter omga_tlo";
-cyrcharmoving(omga_tlo);
+lhchar "Italic Cyrillic letter omga_tlo - omega titlo";
+%cyrcharmoving(omga_tlo);%restored for Unicode
+cyrchar(omga_tlo,11u#,x_height#+acc_height#,0);
+italcorr .7x_height#*slant+.5curve#-u# if math_fitting:-.15u# fi; %o+.35u
+adjust_fit(if monospace:-.35u#,-.35u# else:0,0 fi); %bowl_adj
+full_h:=h; h:=x_height;
+% ital_omega;
+pickup fine.nib; pos2(stem,-180); lft x2r=hround.5u; y2=y4=y6=y8=bar_height;
+pos3(vair,-90); pos4(hair,0); pos5(vair,90);
+pos6(hair,180); pos7(vair,270); pos8(stem,360);
+bot y3r=bot y7r=-oo; top y5r=vround(.2[y4,h]+.5vair);
+x3=.5[x2,x4]; x7+.25u=.5[x6,x8]; rt x8r=hround(w-.5u);
+x5+.5stem=hround(.5[x2l,x8l]+.5stem)+eps;
+x5=.5[x4,x6]; rt x4r-lft x6r=min(stem,2hair)+2eps;
+y1+.5hair=h+oo; x1=min(x2l+1.25u,lft x6r); x9=w-x1; y9=y1;
+pos1(hair,angle(2(x1-x2),y1-y2)+90); pos9(hair,-angle(2(x1-x2),y1-y2)+90);
+if x4l<x6l: x4l:=x6l:=x5; fi
+filldraw stroke z1e...z2e{down}...z3e{right}
+ ...{up}z4e...{left}z5e; % left arc
+filldraw stroke z5e{left}...z6e{down}...
+ z7e{right}...{up}z8e...z9e; % right arc
+%%%
+% the accent
+h:=full_h;
+% low_palatal(expr .5w+u,0,-o);
+x_center:=.5w+u; x_move:=0; y_move:=-o;
+_one:=10; _two:=11; _three:=12; _four:=13;
+_five:=14; _six:=15; _seven:=16; _eight:=17; _nine:=18;
+%
+% frown part
+pickup fine.nib; numeric frown_width,flare_width;
+frown_width=max(fine.breadth,.6[thin_join,vair]);
+flare_width=max(fine.breadth,.5[thin_join,flare]);
+penpos[_one](frown_width,180); penpos[_three](frown_width,0);
+penpos[_two](frown_width,90);
+top y[_two]r=y_move+x_height+max(if serifs:.75 fi acc_height,frown_width+1);
+x[_two]=x_center-u; lft x[_one]r=hround(x[_two]-1.5u-0.5frown_width);
+rt x[_three]r=hround(x[_two]+1.5u+0.5frown_width);
+bot y[_one]=bot y[_three]=y_move+vround
+ max(x_height+oo+tiny,1/3[x_height,h]+oo-.5frown_width);
+%fill stroke z[_one]e{up}...z[_two]e{right}...{down}z[_three]e; % stroke
+% tilde part
+penpos[_five](frown_width,180); penpos[_seven](frown_width,90);
+penpos[_seven]'(flare_width,0);
+bot y[_six]l=y[_two]r+.5flare_width;
+rt x[_five]l=x[_one]r-.5flare_width;
+x[_six]=x[_two]+.25u; x[_six]-x[_five]l=x[_seven]'l-x[_six];
+rt x[_seven]=max(x[_six]+5.5u
+ if monospace:/expansion_factor fi,x[_three]r+.5frown_width);
+penpos[_six](flare_width,90);
+bot y[_five]=bot y[_seven]'=bot y[_one]; bot y[_seven]l=x_height+oo;
+forsuffixes e=l,r: path p.e;
+p.e=(x[_five]e,y[_five]e+.5fine){up}
+ ...z[_six]e{right}...{down}z[_seven]'e; endfor
+fill subpath(0,1.5) of p.l..tension.85..
+ {right}(x[_seven]l-.5fine,y[_seven]l)
+ ...z[_seven]...(x[_seven]r-.5fine,y[_seven]r){left}
+ ..tension.85..reverse subpath(0,1.6) of p.r...z[_five]...cycle; % stroke
+%%%
+penlabels(1,2,3,4,5,6,7,8,9); endchar;
lhchar "Italic Cyrillic letter koppa (looks like c with tail)";
cyrchar(koppa,8u#,x_height#,desc_depth#);
@@ -141,7 +376,50 @@ ellipse_set(2l,3l,4l,5l); ellipse_set(2r,3r,4r,5r);
penlabels(0,1,2,3,4,5,6); endchar;
lhchar "Italic Cyrillic letter uk";
-cyrcharmoving(uk);
+%cyrcharmoving(uk);%restored for Unicode
+cyrchar(uk,9.75u#,asc_height#,0);
+italcorr asc_height#*slant-.5u#;
+adjust_fit(0,0);
+% ital_uk;
+numeric top_thickness,mid_thickness,bot_thickness,upper_side,lower_side,theta;
+top_thickness=max(fine.breadth,vround(slab-2vair_corr));
+bot_thickness=max(fine.breadth,vround(slab-vair_corr));
+x0=.5w; y0=if hefty:bar_height else:.7x_height fi; %h;%%%%%%%%%%%%%%
+pickup fine.nib; theta=90-angle(20u,h); slope:=-h/20u;
+upper_side=max(fine.breadth+eps,hround(.5[hair,stem]-stem_corr));
+lower_side=hround(.5[hair,stem]+stem_corr);
+if lower_side>1.2upper_side: upper_side:=lower_side; fi
+pos1(top_thickness,-90); pos6(bot_thickness,-90);
+x1=x6=.5w; top y1l=h+o; bot y6r=-o; pos0(cap_stem,theta);
+lft x2l=w-rt x8l=hround 1.25u; lft x7r=w-rt x5r=hround 1.75u;
+ x2r-x2l=stem-fine; x5r-x5l=lower_side-fine;%%%%%%%%%%%
+ellipse_set(1l,2l,3l,0l); ellipse_set(1r,2r,3r,0r);
+ellipse_set(6l,5l,4l,0l); ellipse_set(6r,5r,4r,0r);
+numeric tau; tau=max(.8,.20710678/(superness-.5));
+y2r:=vround(y2l+max(1,serif_drop)+eps);
+filldraw stroke z2e{down}
+ ..z3e---z4e..z5e{down}..tension atleast tau..z6e{left}; % S stroke
+pos7(lower_side,180); pos8(upper_side,180);
+y7=.5[y5l,y5r]; y8=.5[y2l,y2r]; pos9(vair,90); z9=z0;
+filldraw stroke z8e{down}
+ ..tension atleast tau and atleast 1..{-18u,-.618h}z9e; % upper right stroke
+filldraw stroke z6e{left}..tension atleast tau..z7e{up}
+ ..tension atleast tau and atleast 1..{18u,.5h}z9e;% lower left stroke
+% italic bulb
+z8'=z8; pos8'(upper_side,0);
+y1'+.5curve=h+oo; x1'=x8-max(u,.5u+.5curve); %+.5curve%y8+(x_height-bar_height); %%%%%%%%%%%
+numeric theta; theta=angle(4(x8'-x1'),y8'-y1'); pos1'(curve,theta+90);
+filldraw z1'l{dir theta}..tension atleast 1 and 1..{down}z8'l
+ --z8'r{up}...{-dir theta}z1'r..cycle; % bulb
+% from sloped serif
+if serif_drop>0:
+ pos12(slab,90); lft x12=x2l-.5jut-eps; y12r=y2r-serif_drop; z14=z2l;
+ filldraw z2r--z12r--z12l{right}
+ ...1/3[(x14,y12l),.5[z12l,z14] ]{z14-z12l}
+ ...{down}z14--(x2r,y14)--cycle; % sloped serif
+fi
+%%%%%
+penlabels(0,1,2,3,4,5,6,7,8,9); endchar;
lhchar "Italic Cyrillic letter cherv - old che";
cyrcharmoving(cherv);
@@ -180,10 +458,92 @@ lhchar "Italic Cyrillic letter shta - old sh";
cyrcharmoving(shta);
lhchar "Italic Cyrillic letter ib_yus - iot big yus";
-cyrcharmoving(ib_yus);
+%cyrcharmoving(ib_yus);%restored for Unicode
+cyrchar(ib_yus,9u#,x_height#,0);
+italcorr 1/3x_height#*slant+.5hair#+.5u#; %h
+adjust_fit(if monospace: 4u#+else: 5u#+fi w#-5u#,
+ if monospace:-1.5u# else:0 fi); %rstem_adj
+% ital_yus;iot
+% itop_yus;
+pickup fine.nib;
+penpos1(fudged.stem,0); penpos2(fudged.hair,0);
+penpos3(fudged.stem,0); penpos4(fudged.hair,0);
+w-x2r=.24w; x2-x3=x3-x1; y1=h; y2=y1; y3=y4=bar_height;
+x3l=hround(2.5u-.5stem); x3r=x4r;
+z0=whatever[z4l,z2l]=whatever[z1r,z3r];
+if hefty: y0:=bar_height+.5fine;
+ fill z3l--diag_end(3l,1l,1,1,1r,3r){z3r-z1r}
+ ...{down}(x0-.5,y0)..(x0+.5,y0){up}...
+ {z2l-z4l}diag_end(4l,2l,1,1,2r,4r)--z4r--cycle; % diagonals
+else: fill z3l--diag_end(3l,1l,1,1,1r,3r)--z0--
+ diag_end(4l,2l,1,1,2r,4r)--z4r--cycle; fi % diagonals
+penpos5(fudged.stem,0); x5=x3; y5-.5stem=-oo;
+fill circ_stroke z5e--z3e; %middle stem
+z6'r=z1; z7'r=z2;
+z7'l=whatever[z4l,z2l]; z6'l=whatever[z1r,z3r]; y6'l=y7'l=vround(y1-vair)-eps;
+if x7'l<x6'l: x7'l:=x6'l+eps; fi
+fill stroke z6'e--z7'e; % upper bar
+% bowls
+pos8(vair,90); pos9(stem,0); pos10(vair,90); pos11(hair,180);
+pos12(stem,180); pos13(vair,90); pos14(hair,0); z8=z3;
+x11=hround(w+.5hair-eps)-.5hair; x11-x3=x3-x14; y11=y14=1/3x_height;
+lft x9l=hround(w-2.75u-.5stem); x9-x3=x3-x12; y9=y12=1/2y8;
+x10=hround(w-1.2u); x10-x3=x3-x13;
+bot y10l=bot y13l=if monospace: 0 else:-oo fi;
+filldraw stroke if not monospace:z14e{down}... fi
+ z13e{right}...z12e{up}...z8e{right}...z9e{down}...z10e{right}
+ if not monospace:...{up}z11e fi; % left lower diagonal
+%%%
+% i half
+_one:=15; _two:=16; _three:=17; _four:=18; _five:=19; _six:=20;
+%
+pos[_four](stem,0);
+lft x[_four]l=l+letter_fit if not monospace: +hround(2.5u-.5stem) fi;
+y[_four]-.5stem=-oo; x[_three]=x[_four];
+if monospace:
+ pos[_three](stem,0); top y[_three]=h;
+else:
+ x[_one]=l+letter_fit; hook_in([_one],[_two],[_three]); fi % opening hook
+filldraw circ_stroke z[_four]e--z[_three]e; % stem
+pos[_five](vair,90); pos[_six](vair,90); %!!!
+x[_five]=x[_four]; x[_six]=x8; y[_five]=y[_six]=bar_height; %!!!
+filldraw stroke z[_five]e--z[_six]e; % bar %!!!
+%%%
+penlabels(1,2,3,4,5,6,7,8,9,11,12,13,14,15,16,17,178,19,20); endchar;
lhchar "Italic Cyrillic letter i_est - iot est (IC with mid-line)";
-cyrcharmoving(i_est);
+%cyrcharmoving(i_est);%restored for Unicode
+cyrchar(i_est,8u#,x_height#,0);
+italcorr if math_fitting:1/3x_height#*slant else:x_height#*slant-.5u# fi; %c+.5u
+adjust_fit(if monospace: 3u# else: 4.5u# fi +0.2u#,0);
+% ital_ukre;iot
+pickup fine.nib; pos0(flare,0); pos1(hair,0); pos2(vair,90);
+pos3(curve,180); pos4(vair,270); pos5(hair,320);
+x2=x4=.5(w+u); rt x1r=max(rt x2,hround(w-.5u))+eps;
+lft x3r=hround(1.5u-.5curve); x5r=good.x(w-eps); x6=x5;
+y1=.5[bar_height,h]; top y2r=h+oo; bulb(2,1,0); % bulb
+bot y4r=-oo; y3=.5[y2,y4]; top y5l=vround .5bar_height; y6=bar_height;
+path p; p=z4{right}..z5..z6;
+filldraw stroke pulled_arc.e(2,3)
+ & pulled_arc.e(3,4)...{direction 1 of p}z5e; % arc
+pos7(vair,90);
+y7=bar_height; rt x7=hround max(rt x2+1+eps,lft x0l-eps);
+% i half
+_one:=8; _two:=9; _three:=10; _four:=11; _five:=12; _six:=13;
+%
+pos[_four](stem,0);
+lft x[_four]l=l+letter_fit if not monospace: +hround(2.5u-.5stem) fi;
+y[_four]-.5stem=-oo; x[_three]=x[_four];
+if monospace:
+ pos[_three](stem,0); top y[_three]=h;
+else:
+ x[_one]=l+letter_fit; hook_in([_one],[_two],[_three]); fi % opening hook
+filldraw circ_stroke z[_four]e--z[_three]e; % stem
+pos[_five](vair,90); pos[_six](vair,90); %!!!
+x[_five]=x[_four]; x[_six]=x7; y[_five]=y[_six]=bar_height; %!!!
+filldraw stroke z[_five]e--z[_six]e; % bar %!!!
+%%%
+penlabels(1,1',2,3,4,5,6,7,8,9,10,11,12); endchar;
lhchar "Italic Cyrillic letter vnarrow_e";
cyrcharmoving(vnarrow_e);
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2slvl.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2slvl.mf
index 0db9b511d50..8fd935adc20 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2slvl.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2slvl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -51,7 +51,7 @@
% narrow_e used eps
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Cyrillic letter az - old a";
cyrchar(az,9u#,x_height#,0);
@@ -159,8 +159,8 @@ else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
--diag_end(2l,1l,1,1,1r,0)--cycle; fi % left and right diagonals
penpos5(whatever,angle(z2-z1)); z5=whatever[z1,z2];
penpos6(whatever,angle(z3-z4)); z6=whatever[z3,z4]; y6=y5;
-if hefty: y5r else: y5 fi =.5y0;
-y5r-y5l=y6r-y6l=.6[thin_join,vair];
+if hefty: y5r else: y5 fi =.5y0; y5r-y5l=y6r-y6l=.6[thin_join,vair];
+forsuffixes $=l,r: if x5$>x6$: x5$:=x6$-eps; fi endfor;
penstroke z5e--z6e; % bar line
pickup tiny.nib; x7=.5[x5,x6]; top y7=y5; bot y8=0;
pos7(max(tiny.breadth+eps,.7[thin_join,stem]),0);
@@ -199,8 +199,8 @@ else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
--diag_end(2l,1l,1,1,1r,0)--cycle; fi % left and right diagonals
penpos5(whatever,angle(z2-z1)); z5=whatever[z1,z2];
penpos6(whatever,angle(z3-z4)); z6=whatever[z3,z4]; y6=y5;
-if hefty: y5r else: y5 fi =.5y0;
-y5r-y5l=y6r-y6l=.6[thin_join,vair];
+if hefty: y5r else: y5 fi =.5y0; y5r-y5l=y6r-y6l=.6[thin_join,vair];
+forsuffixes $=l,r: if x5$>x6$: x5$:=x6$-eps; fi endfor;
penstroke z5e--z6e; % bar line
pickup tiny.nib; x7=.5[x5,x6]; top y7=y5; bot y8=0;
pos7(max(tiny.breadth+eps,.7[thin_join,stem]),0);
@@ -381,7 +381,8 @@ if serifs: pos1(hair,180); pos0(flare,180); pos2'(vair,90); z2'=z2;
penpos16(.25[vair,curve],angle(z16-z14)+90);
z15l=z14l+whatever*(z14-z15); (x15r,y)=z14r+whatever*(z14-z15);
fill stroke z15e--z14e{z16r-z14}..{.5right}z16e; % diagonals
-else: pos1(min(right_curve,1.2flare)-.2tiny,175); pos2'(vair,90);
+else: pos1(max(currentbreadth+eps,min(right_curve,1.2flare)-.2tiny),175);
+ pos2'(vair,90);
z2'=z2; y1l=max(.76h,top y5r+eps);
filldraw stroke z1e{x2-x1,5(y2-y1)}...{right}z2'e;
pos10(vair,45);
@@ -592,7 +593,7 @@ _one:=8; _two:=9; _three:=10; _four:=11; _five:=12;
%
if serifs: pickup crisp.nib;
else: pickup pencircle scaled min(.5fine,.15vair); fi
-numeric stem[]; stem1=if hefty: fudged.hair-2stem_corr else: .7[vair,stem] fi;
+numeric stem[]; stem1=max(currentbreadth+eps,if hefty: fudged.hair-2stem_corr else: .7[vair,stem] fi);
stem2=if serifs: vair else: max(currentbreadth+eps,.6[thin_join,vair]) fi;
stem3=if serifs: hair else: max(currentbreadth+eps,.6[thin_join,vair]) fi;
pos[_one](stem1,0); pos[_two](stem1,0);
@@ -760,7 +761,7 @@ else:
bot_thickness=vair';
upper_side=max(fine.breadth,hround(.3[vair',stem]-stem_corr));
lower_side=hround(.3[vair',stem]+stem_corr); fi
- x0=.5w; y0=if serifs:.7x_height else:bar_height fi; %h;%%%%%%%%%%%%%%
+ x0=.5w; y0=if hefty:bar_height else:.7x_height fi; %h;%%%%%%%%%%%%%%
pickup fine.nib; theta=90-angle(20u,h); slope:=-h/20u;
if lower_side>1.2upper_side: upper_side:=lower_side; fi
pos1(top_thickness,-90); pos6(bot_thickness,-90);
@@ -772,7 +773,7 @@ x5r-x5l=lower_side-fine;
ellipse_set(1l,2l,3l,0l); ellipse_set(1r,2r,3r,0r);
ellipse_set(6l,5l,4l,0l); ellipse_set(6r,5r,4r,0r);
numeric tau; tau=max(.8,.20710678/(superness-.5));
-y2r:=vround(y2l+serif_drop+eps);
+y2r:=vround(y2l+max(1,serif_drop)+eps);
filldraw stroke z2e{down}
..z3e---z4e..z5e{down}..tension atleast tau..z6e{left}; % S stroke
pos7(lower_side,180); pos8(upper_side,180);
@@ -789,11 +790,13 @@ if serifs:
filldraw z1'l{dir theta}..tension atleast 1 and 1..{down}z8'l
--z8'r{up}...{-dir theta}z1'r..cycle; % bulb
% from sloped serif
- pos12(slab,90); lft x12=hround(x2l-.5jut-.5-eps);
- y12r=vround(y2r-serif_drop-eps); z14=(x2l,min(y2l-.5,y12)-eps);
- filldraw z2r--z12r--z12l{right}
- ...1/3[(x14,y12l),.5[z12l,z14] ]{z14-z12l}
- ...{down}z14--(x2r,y14)--cycle; % sloped serif
+ if serif_drop>0:
+ pos12(slab,90); lft x12=hround(x2l-max(1,.5jut)-.5-eps);
+ top y12r=vround(y2r-max(0,serif_drop)-eps); z14=(x2l,min(y2l-.5,y12)-eps);
+ filldraw z2r--z12r--z12l{right}
+ ...1/3[(x14,y12l),.5[z12l,z14] ]{z14-z12l}
+ ...{down}z14--(x2r,y14)--cycle; % sloped serif
+ fi
else: pos10(flare,225); x10r=x1; y10l=h+oo;
filldraw stroke z8e{up}...z10e; fi
%%%%%
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2slvu.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2slvu.mf
index 167cc669c6c..f418564a0ff 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2slvu.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2slvu.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -50,7 +50,7 @@
% NARROW_E used EPS
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Uppercase Cyrillic letter ligature AZ - OLD A";
cyrchar(AZ,12u#,cap_height#,0);
@@ -146,8 +146,9 @@ else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
--diag_end(2l,1l,1,1,1r,0)--cycle; fi % left and right diagonals
penpos5(whatever,angle(z2-z1)); z5=whatever[z1r,z2r];
penpos6(whatever,angle(z3-z4)); z6=whatever[z3l,z4l]; y6=y5;
-if hefty: y5r else: y5 fi =.5y0;
-y5r-y5l=y6r-y6l=cap_band; penstroke z5e--z6e; % bar line
+if hefty: y5r else: y5 fi =.5y0; y5r-y5l=y6r-y6l=cap_band;
+forsuffixes $=l,r: if x5$>x6$: x5$:=x6$-eps; fi endfor;
+penstroke z5e--z6e; % bar line
pickup tiny.nib;
x7=.5[x5,x6]; top y7=y5; x8=x7; bot y8=0;
pos7(max(currentbreadth+eps,.5[cap_band,cap_stem]),0);
@@ -186,10 +187,11 @@ if y0<h-cap_notch_cut: y0:=h-cap_notch_cut;
...{up}z0+.5left--cycle; % left and right diagonals
else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
--diag_end(2l,1l,1,1,1r,0)--cycle; fi % left and right diagonals
-penpos5(whatever,angle(z2-z1)); z5=whatever[z1r,z2r];
-penpos6(whatever,angle(z3-z4)); z6=whatever[z3l,z4l]; y6=y5;
-if hefty: y5r else: y5 fi =.5y0;
-y5r-y5l=y6r-y6l=cap_band; penstroke z5e--z6e; % bar line
+penpos5(whatever,angle(z2-z1)); z5=whatever[z1r,z2r]-(eps,0);
+penpos6(whatever,angle(z3-z4)); z6=whatever[z3l,z4l]+(eps,0); y6=y5;
+if hefty: y5r else: y5 fi =.5y0; y5r-y5l=y6r-y6l=cap_band;
+forsuffixes $=l,r: if x5$>x6$: x5$:=x6$-eps; fi endfor;
+penstroke z5e--z6e; % bar line
pickup tiny.nib;
x7=.5[x5,x6]; top y7=y5; x8=x7; bot y8=0;
pos7(max(currentbreadth+eps,.5[cap_band,cap_stem]),0);
@@ -369,7 +371,7 @@ if serifs: pos0(flare+(cap_stem-stem),180); pos1(cap_hair,180);
pos16(.25[vair,curve],angle(z16-z14)+90);
z15l=z14l+whatever*(z14-z15); z15r=z14r+whatever*(z14-z15);
filldraw stroke z15e--z14e{z16r-z14}..{.5right}z16e; % hachek
-else: y1=.8h; pos1(min(cap_hair,1.2flare)-.2tiny,170);
+else: y1=.8h; pos1(max(currentbreadth+eps,min(cap_hair,1.2flare)-.2tiny),170);
filldraw stroke z1e{x2-x1,10(y2-y1)}...{right}z2e; % upper bowl
pos10(middle_weight,45);
filldraw stroke z10e{left}...z9e{z8e-z9e}; % tail
@@ -467,8 +469,8 @@ if serifs:
y1=h-vround max(.1fig_height+.5flare,.15fig_height-.5flare)+o;
x5=(.5w+eps);
rt x1r=hround min(.5w-max(
- if monospace:.67u,.55stem else:u,.7stem fi)+eps,lft x5l-1);
- x2=x4+if monospace:-fi.25u=hround (.67[lft x3r,rt x1r]);
+ if monospace:.67u,.55stem else:u,.7stem fi),lft x5l-1)+eps;
+ x2=x4+if monospace:-fi.25u=hround min(.67[lft x3r,rt x1r],rt x1r-.5)-eps;
{{less_tense; bulb(2,1,0)}}; % bulb
y5=max(good.y(.5bar_height-.9),y4l+vair');
(x,y4l)=whatever[z4r,z5l]; x4l:=min(x,x4l+.5u);
@@ -563,8 +565,8 @@ if serifs:
y1=h-vround max(.1fig_height+.5flare,.15fig_height-.5flare)+o;
x5=(.5w+eps);
rt x1r=hround min(.5w-max(
- if monospace:.67u,.55stem else:u,.7stem fi)+eps,lft x5l-1);
- x2=x4+if monospace:-fi.25u=hround (.67[lft x3r,rt x1r]);
+ if monospace:.67u,.55stem else:u,.7stem fi),lft x5l-1)+eps;
+ x2=x4+if monospace:-fi.25u=hround min(.67[lft x3r,rt x1r],rt x1r-.5)-eps;
{{less_tense; bulb(2,1,0)}}; % bulb
y5=max(good.y(.5bar_height-.9),y4l+vair');
(x,y4l)=whatever[z4r,z5l]; x4l:=min(x,x4l+.5u);
@@ -614,7 +616,7 @@ _one:=8; _two:=9; _three:=10; _four:=11; _five:=12;
%
if serifs: pickup crisp.nib;
else: pickup pencircle scaled min(.5fine,.15vair); fi
-numeric stem[]; stem1=if hefty: fudged.hair-2stem_corr else: .7[vair,stem] fi;
+numeric stem[]; stem1=max(currentbreadth+eps,if hefty: fudged.hair-2stem_corr else: .7[vair,stem] fi);
stem2=if serifs: vair else: max(currentbreadth+eps,.6[thin_join,vair]) fi;
stem3=if serifs: hair else: max(currentbreadth+eps,.6[thin_join,vair]) fi;
pos[_one](stem1,0); pos[_two](stem1,0);
@@ -661,8 +663,8 @@ if serifs:
top y2r=h+o; bot y4r=-o; lft x3r=hround u; y3=.5[y2,y4];
y1=h-vround max(.1fig_height+.5flare,.15fig_height-.5flare)+o; x5=(.5w+eps);
rt x1r=hround min(.5w-max(
- if monospace:.67u,.55stem else:u,.7stem fi)+eps,lft x5l-1);
- x2=x4+if monospace:-fi.25u=hround (.67[lft x3r,rt x1r]);
+ if monospace:.67u,.55stem else:u,.7stem fi),lft x5l-1)+eps;
+ x2=x4+if monospace:-fi.25u=hround min(.67[lft x3r,rt x1r],rt x1r-.5)-eps;
{{less_tense; bulb(2,1,0)}}; % bulb
y5=max(good.y(.5bar_height-.9),y4l+vair');
(x,y4l)=whatever[z4r,z5l]; x4l:=min(x,x4l+.5u);
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2upi.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2upi.mf
index dd84a7f08c0..a53f7cb3af8 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2upi.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2upi.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -51,7 +51,7 @@
% schwa "ba "ba "ba "ba Schwa
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Italic Cyrillic letter g_hcrs - ghe hcrossed"; % italic shape
cyrchar(g_hcrs,6.25u#,x_height#,0);
@@ -256,7 +256,7 @@ pair delta; delta=penoffset z3-z2 of currentpen;
fill top lft z1l--z2l+delta---z3l+delta..lft z3l---lft z4l..bot z4l
---bot rt z4r--z3r-delta---z2r-delta..rt z2r---rt z1r..top z1r
---cycle; % diagonal
-pickup crisp.nib; pos5(arm_thickness1,90); pos6(hair,180);
+pickup crisp.nib; pos5(max(currentbreadth+eps,arm_thickness1),90); pos6(hair,180);
top y5r=h; x5=x1; lft x6r=hround .75u;
bot y6=2/3x_height-.5fine;%max(good.y(top y5r-vair-beak/1.4)-eps,y3+1)
arm(5,6,a,beak_darkness,-.4beak_jut); % upper arm and beak
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2upl.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2upl.mf
index 39e06c0fed2..cb22ea99ce2 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2upl.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2upl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -46,7 +46,7 @@
% schwa "ba "ba "ba "ba Schwa
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Cyrillic letter g_hcrs - ghe hcrossed";
cyrchar(g_hcrs,8u#-.5width_adj#,x_height#,0);
@@ -61,9 +61,9 @@ top y3r=h; x3=x1; rt x4r=hround(w-.45u); y4=good.y(y3l-beak/1.4)-eps;
arm(3,4,e,beak_darkness,.4beak_jut); % upper arm and beak
if serifs:
save slab; slab:=Vround(vair-vair_corr); % lower.slab
- nodish_serif(1,2,a,1/3,jut,b,1/3,.5jut); % upper serif
+ nodish_serif(1,2,a,1/3,jut,b,1/3,.5jut); % upper serif
slab:=vair; % lower.slab
- dish_serif(2,1,c,1/3,jut,d,1/3,1.25jut); fi % lower serif
+ dish_serif(2,1,c,1/3,jut,d,1/3,1.25jut); fi % lower serif
%%%%%
% hstroke
bar_stroke(hround 1/3u-serif_fit,tiny.rt x1r+1.8u);
@@ -193,17 +193,18 @@ if serifs:
if rt x2r+jut+.5u+1<=lft x4l-jut: inner_jut=jut;
else: rt x2r+jut+.5u+1=lft x4l-inner_jut; fi
save slab; slab:=vair; % lower.slab
- dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower left serif
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower left serif
dish_serif(4,3,e,1/3,inner_jut,f,1/3,jut); fi % lower right serif
penlabels(1,2,3,4); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Lowercase Cyrillic letter zh_dsc - zhe descender (`roman')";
cyrchar(zh_dsc,if serifs:10u# else:9.5u# fi % zhk_width: n_width;keng_width
,x_height#,if is_ogonek: desc_depth# else: sbeak# fi); %ldesc/og_depth
italcorr x_height#*slant-.2u#;
adjust_fit(w#-5u#+ %zhr_adj
- if monospace: 0 else: serif_fit# fi, %wlett_adj
+ if monospace: 0 else: serif_fit# fi, %wlett_adj
if monospace: 0 else: serif_fit# fi); %wlett_adj
begingroup
% lowerr_zh;
@@ -217,7 +218,7 @@ filldraw stroke z1e--z2e; % stem
save slab; % lower.slab
if serifs:
slab:=Vround(vair-vair_corr);% lower.slab
- dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
slab:=vair; % lower.slab
dish_serif(2,1,c,1/3,jut,d,1/3,jut); fi% lower stem serif
% k_rbowl;zh%monospace:+.25u
@@ -402,6 +403,7 @@ penlabels(1,2,3,4,5,6,7,8,9,10,12,13); endchar;
% Ukrainian i moved up for LH font
+iff not concrete:%
iff not specific:%
lhchar "Lowercase Cyrillic letter k_dsc - ka descender (`roman')";
cyrchar(k_dsc,if serifs:10u# else:9.5u# fi % zhk_width: n_width;keng_width
@@ -418,7 +420,7 @@ filldraw stroke z1e--z2e; % stem
save slab; % lower.slab
if serifs:
slab:=Vround(vair-vair_corr); % lower.slab
- dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
slab:=vair; % lower.slab
dish_serif(2,1,c,1/3,jut,d,1/3,jut); fi% lower stem serif
% k_rbowl;
@@ -474,6 +476,7 @@ else:
fi
penlabels(1,2,3,4,5,6); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Lowercase Cyrillic letter k_beak - ka beak (`roman')";
cyrchar(k_beak,if serifs:10u# else:9.5u# fi % zhk_width: n_width;keng_width
@@ -601,11 +604,12 @@ if serifs:
else: rt x2r+inner_jut+.5u+1=x[_three]r; fi
save slab; slab:=Vround(vair-vair_corr); % lower.slab
dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
- dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
slab:=vair; % lower.slab
dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut); fi % lower stem serif
penlabels(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15); endchar;
+iff not concrete:%
lhchar "Lowercase Cyrillic letter l_tl - el tail";
cyrchar(l_tl,10u# % if not serifs:+.5width_adj# fi % dl_width;n_width
,x_height#,desc_depth#);
@@ -646,7 +650,7 @@ else:
if serifs:
x0=x3; y0=0;
numeric inner_jut; inner_jut=min(.5(lft x1l-rt x3r)-eps,.5jut);
- %dish_serif(2,1,a,1/3,jut,b,1/3,jut); %!!! %lower right serif
+ %dish_serif(2,1,a,1/3,jut,b,1/3,jut); %!!! %lower right serif
save slab; slab:=Vround(vair-vair_corr); %lower.slab
nodish_serif(1,2,c,1/3,inner_jut,d,1/3,jut); % upper right serif
nodish_serif(3,0,e,1/3,1.05jut,f,1/3,inner_jut); % upper left serif
@@ -667,7 +671,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
rt x[_four]l=max(x[_zero]l-bulb_diam,
floor x[_zero]-2.5u if monospace: / expansion_factor fi);
@@ -706,10 +710,10 @@ if rt x1r+jut+.5u+1<=lft x3l-jut: inner_jut=jut;
save slab; % lower.slab
if serifs:
slab:=Vround(vair-vair_corr); % lower.slab
- dish_serif(1,2,a,1/3,jut,b,1/3,inner_jut); % upper left serif
- dish_serif(3,4,e,1/3,inner_jut,f,1/3,jut); % upper right serif
+ dish_serif(1,2,a,1/3,jut,b,1/3,inner_jut); % upper left serif
+ dish_serif(3,4,e,1/3,inner_jut,f,1/3,jut); % upper right serif
slab:=vair; % lower.slab
- dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut); % lower left serif
+ dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut); % lower left serif
if is_ogonek:
dish_serif(4,3,g,1/3,inner_jut,h,1/3,jut); fi %!!! % lower right serif
fi
@@ -732,6 +736,49 @@ else:
fi
penlabels(1,2,3,4,5,6, 7,8,9); endchar;
+lhchar "Lowercase Cyrillic letter n_stl - saam en with tail";
+cyrchar(n_stl,10u# if not serifs:+.5width_adj# fi,x_height#, % n_width
+ if is_ogonek: desc_depth# else: sbeak# fi); %ldesc/og_depth
+italcorr x_height#*slant-serif_fit#+jut#-2u#+.5stem#; %d->x_height+jut
+adjust_fit(serif_fit#,
+ serif_fit# if not serifs:+.5(stem#-u#) fi) %dl_adj
+begingroup
+% lower_n;
+pickup tiny.nib; pos1(fudged.stem,0); pos2(fudged.stem,0);
+pos3(fudged.stem,0); pos4(fudged.stem,0);
+lft x1l=lft x2l=hround(2.5u-.5fudged.stem-eps); x3=x4=w-x1;
+top y1=top y3=h; bot y2=bot y4=0;
+filldraw stroke z1e--z2e; % left stem
+filldraw stroke z3e--z4e; % right stem
+bar_stroke(x1,x3); % bar
+%%%
+numeric inner_jut,right_jut; % for cyr_serif
+if rt x1r+jut+.5u+1<=lft x3l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+1=lft x3l-inner_jut; fi
+save slab; % lower.slab
+if serifs:
+ slab:=Vround(vair-vair_corr); % lower.slab
+ dish_serif(1,2,a,1/3,jut,b,1/3,inner_jut); % upper left serif
+ dish_serif(3,4,e,1/3,inner_jut,f,1/3,jut); % upper right serif
+ slab:=vair; % lower.slab
+ dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut); % lower left serif
+ if is_ogonek:
+ dish_serif(4,3,g,1/3,inner_jut,h,1/3,jut); fi %!!! % lower right serif
+fi
+%%%%%
+% lowercase descender/saam tail
+slab:=vair; % lower.slab
+right_jut=if serifs: max(limit_dist,1.1jut) else: hround (r-rt x4r-.5u) fi;
+if unic:
+ %saam tail
+ serif(4,3,v,1/3,-inner_jut);
+ siam_serif(4,3,w,1/3,right_jut);
+else:
+ r_serif(4,3,o,1/3,inner_jut,p,1/3,beak_darkness,right_jut,.6beak_jut); % lower right descender
+fi
+endgroup;
+penlabels(1,2,3,4,5,6, 7,8,9); endchar;
+
lhchar "Lowercase Cyrillic letter n_tl - en tail";
cyrchar(n_tl,10u# if not serifs:+.5width_adj# fi,x_height#,desc_depth#); % n_width
italcorr .5x_height#*slant+min(.5curve#-.85u#,-.1u#); %p
@@ -750,10 +797,10 @@ if serifs:
if rt x1r+jut+.5u+1<=lft x3l-jut: inner_jut=jut;
else: rt x1r+inner_jut+.5u+1=lft x3l-inner_jut; fi
save slab; slab:=Vround(vair-vair_corr); % lower.slab
- dish_serif(1,2,a,1/3,jut,b,1/3,inner_jut); % upper left serif
+ dish_serif(1,2,a,1/3,jut,b,1/3,inner_jut); % upper left serif
dish_serif(3,4,e,1/3,inner_jut,f,1/3,jut); % upper right serif
slab:=vair; % lower.slab
- dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut); fi % lower left serif
+ dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut); fi % lower left serif
%dish_serif(4,3,g,1/3,inner_jut,h,1/3,jut); fi %!!! % lower right serif
%%%%%
% l_tail(4);
@@ -771,7 +818,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
rt x[_four]l=max(x[_zero]l-bulb_diam,
floor x[_zero]-2.5u if monospace: / expansion_factor fi);
@@ -869,10 +916,10 @@ if serifs:
prime_points_inside(1,2); prime_points_inside(4,3); prime_points_inside(6,5);
if rt x1'r+jut+.5u+1<=lft x4'l-jut: inner_jut=jut;
else: rt x1'r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
- dish_serif(6',5,e,1/3,jut,f,1/3,jut); % lower serif
+ dish_serif(6',5,e,1/3,jut,f,1/3,jut); % lower serif
save slab; slab:=Vround(vair-vair_corr); % lower.slab
- dish_serif(1',2,a,1/3,outer_jut,b,1/2,inner_jut); % upper left serif
- dish_serif(4',3,c,.6,inner_jut,d,1/2,outer_jut)(dark); fi % upper right serif
+ dish_serif(1',2,a,1/3,outer_jut,b,1/2,inner_jut); % upper left serif
+ dish_serif(4',3,c,.6,inner_jut,d,1/2,outer_jut)(dark); fi % upper right serif
%%%%%
penlabels(0,1,2,3,4,5,6); endchar;
@@ -904,10 +951,10 @@ if serifs:
prime_points_inside(1,2); prime_points_inside(4,3); prime_points_inside(6,5);
if rt x1'r+jut+.5u+1<=lft x4'l-jut: inner_jut=jut;
else: rt x1'r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
- dish_serif(6',5,e,1/3,jut,f,1/3,jut); % lower serif
+ dish_serif(6',5,e,1/3,jut,f,1/3,jut); % lower serif
save slab; slab:=Vround(vair-vair_corr); % lower.slab
- dish_serif(1',2,a,1/3,outer_jut,b,1/2,inner_jut); % upper left serif
- dish_serif(4',3,c,.6,inner_jut,d,1/2,outer_jut)(dark); fi % upper right serif
+ dish_serif(1',2,a,1/3,outer_jut,b,1/2,inner_jut); % upper left serif
+ dish_serif(4',3,c,.6,inner_jut,d,1/2,outer_jut)(dark); fi % upper right serif
%%%%%
% hcross
pickup crisp.nib; pos7(bar,90); pos8(bar,90);
@@ -955,11 +1002,11 @@ if serifs:
if rt x1'r+jut+.5u+1<=lft x2'l-jut-xjut: inner_jut1=jut;
else: rt x1'r+inner_jut1+.5u+1=lft x2'l-inner_jut1-xjut; fi
slab:=Vround(vair-vair_corr); % lower.slab
- dish_serif(1',4,a,1/3,outer_jut,b,2/3,inner_jut1); % upper left serif
+ dish_serif(1',4,a,1/3,outer_jut,b,2/3,inner_jut1); % upper left serif
dish_serif(2',3,e,2/3,inner_jut1+xjut,f,1/2,outer_jut+xjut)(dark); % upper right serif
slab:=vair; % lower.slab
if is_ogonek:
- dish_serif(4',1,c,2/3,inner_jut2,d,1/3,outer_jut); % lower right serif
+ dish_serif(4',1,c,2/3,inner_jut2,d,1/3,outer_jut); % lower right serif
fi
dish_serif(3',2,g,1/2,outer_jut+xjut,h,2/3,inner_jut2+xjut)(dark); fi % lower left serif
%%%%%
@@ -1021,13 +1068,12 @@ if serifs:
if rt x1'r+jut+.5u+1<=lft x2'l-jut-xjut: inner_jut1=jut;
else: rt x1'r+inner_jut1+.5u+1=lft x2'l-inner_jut1-xjut; fi
save slab; slab:=Vround(vair-vair_corr); % lower.slab
- dish_serif(1',4,a,1/3,outer_jut,b,2/3,inner_jut1); % upper left serif
+ dish_serif(1',4,a,1/3,outer_jut,b,2/3,inner_jut1); % upper left serif
dish_serif(2',3,e,2/3,inner_jut1+xjut,f,1/2,outer_jut+xjut)(dark); % upper right serif
slab:=vair; % lower.slab
- %dish_serif(4',1,c,2/3,inner_jut2,d,1/3,outer_jut); % lower right serif
+ %dish_serif(4',1,c,2/3,inner_jut2,d,1/3,outer_jut); % lower right serif
dish_serif(3',2,g,1/2,outer_jut+xjut,h,2/3,inner_jut2+xjut)(dark); fi % lower left serif
%%%%%
-%%%%%
% l_tail(4);x_tail
_zero:=4;
_one:=7; _two:=8; _three:=9; _four:=10;
@@ -1035,16 +1081,17 @@ _one:=7; _two:=8; _three:=9; _four:=10;
% x_
pickup fine.nib;
stem3=hround (max(fine.breadth,.5[stem1,x[_zero]r-x[_zero]l]));
-x[_one]'r=x4r;
+x[_one]'r=hround x4r+eps;
penpos[_one]'(stem3,0); pos[_one](stem3,0); z[_one]=z[_one]';
-bot y[_one]=max(-1/3d,-d+vair')-eps;
-(x[_one]'l,y54')=whatever[z4l,z4l+dir angle(z4l-if serifs:z1l else:z34'fi)];
+bot y[_one]=max(-1/3d,min(y[_zero]r-.5,-d+vair'))-eps;
+(x[_one]'l,y54')=whatever[z[_zero]l,z[_zero]l+
+ dir angle(z[_zero]l-if serifs: z1l else: z34'fi)];
z54'=(x[_one]'l,y54');
-fill z54l{z4r-z1r}
- ..controls (z54')..
+fill z54l{z[_zero]r-z1r}
+ ..controls (x54'+eps,y54'+eps)..
{down}z[_one]'l--z[_one]'r{up}
- ..controls (z4r)..
- {z1r-z4r}z54r--cycle; %link
+ ..controls (x[_zero]r+eps,y[_zero]r+eps)..
+ {z1r-z[_zero]r}z54r--cycle; %link
% _x
if serifs:
numeric bulb_diam;
@@ -1052,7 +1099,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
rt x[_four]l=max(x[_one]l-bulb_diam,%!!!
floor x[_one]-2.5u if monospace: / expansion_factor fi);%!!!
@@ -1067,6 +1114,7 @@ else:
filldraw stroke super_arc.e([_one],[_two])%!!!
& term.e([_two],[_three],left,.8,4); fi
%%%
+%r:=r-.5jut; %x_tl adjustment
penlabels(0,1,2,3,4,54,54',5,6,7',8); endchar;
lhchar "Lowercase Cyrillic letter ch_ldsc - che left descender";
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2upu.mf b/Master/texmf-dist/fonts/source/lh/base/lgt2upu.mf
index bc7c6cefb98..b5520e23f55 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2upu.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lgt2upu.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=2
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -45,7 +45,7 @@
% SCHWA "9a "9a "9a "9a Schwa
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Uppercase Cyrillic letter G_hcrs - GHE hcrossed";
cyrchar(G_hcrs,if monospace: 9u# else: 11u# fi-width_adj#, %G_width
@@ -192,6 +192,7 @@ if serifs:
dish_serif(4,3,e,1/3,inner_jut,f,1/3,cap_jut); fi % lower left serif
penlabels(1,2,3,4); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Uppercase Cyrillic letter ZH_dsc - ZHE descender (`roman')";
cyrchar(ZH_dsc,13.5u#,cap_height#, % N_width
@@ -376,6 +377,7 @@ penlabels(1,2,3,4,5,6,7,8,9,10,12,13); endchar;
% Ukrainian i moved up for LH font
+iff not concrete:%
iff not specific:%
lhchar "Uppercase Cyrillic letter K_dsc - KA descender (`roman')";
cyrchar(K_dsc,13.5u#,cap_height#, % N_width
@@ -440,6 +442,7 @@ else:
fi
penlabels(1,2,3,4,5,6, 7,8,9); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Uppercase Cyrillic letter K_beak - KA beak (`roman')";
cyrchar(K_beak,13.5u#,cap_height#,0); % N_width
@@ -566,6 +569,7 @@ if serifs:
dish_serif(2,1,c,1/3,cap_jut,d,1/3,inner_jut); fi % lower stem serif
penlabels(1,2,3,4,5,6, 7,8,9,10,11,12,13,14); endchar;
+iff not concrete:%
lhchar "Uppercase Cyrillic letter L_tl - EL tail";
cyrchar(L_tl,13.5u#,cap_height#,desc_depth#); % DL_width:N_width
if is_small_cap: getcharcode(l_tl); fi
@@ -632,7 +636,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
rt x[_four]l=floor x[_zero]-2.5u if monospace: / expansion_factor fi;
filldraw stroke z[_five]e--pulled_arc.e([_one],[_two]);
@@ -694,6 +698,50 @@ else:
fi
penlabels(1,2,3,4,5,6); endchar;
+lhchar "Uppercase Cyrillic letter N_stl - saam EN with tail";
+cyrchar(N_stl,13.5u#,cap_height#,
+ if is_ogonek: desc_depth# else: cap_sbeak# fi); %udesc/og_depth
+if is_small_cap: getcharcode(n_stl); fi
+italcorr cap_height#*slant-cap_serif_fit#+cap_jut#-2.5u#+min(.5cap_stem#,u#);
+adjust_fit(cap_serif_fit#,
+ cap_serif_fit# if not serifs:+.5(cap_stem#-u#) fi); %DL_adj
+% upper_n;
+pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
+pos3(cap_stem,0); pos4(cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); x3=x4=w-x1;
+top y1=top y3=h; bot y2=bot y4=0;
+filldraw stroke z1e--z2e; % left stem
+filldraw stroke z3e--z4e; % right stem
+penpos5(cap_bar,90); penpos6(cap_bar,90);
+x5=x1; x6=x3; y5=y6=.52h;
+fill stroke z5e--z6e; % bar
+%%%
+if serifs:
+ numeric inner_jut;
+ if rt x1r+cap_jut+.5u+1<=lft x3l-cap_jut: inner_jut=cap_jut;
+ else: rt x1r+inner_jut+.5u+1=lft x3l-inner_jut; fi
+ dish_serif(1,2,a,1/3,cap_jut,b,1/3,inner_jut); % upper left serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,inner_jut); % lower left serif
+ dish_serif(3,4,e,1/3,inner_jut,f,1/3,cap_jut); % upper right serif
+ if is_ogonek:
+ dish_serif(4,3,g,1/3,inner_jut,h,1/3,cap_jut); fi % lower right serif
+fi
+%%%%%
+% uppercase descender/saam tail
+numeric right_jut;
+right_jut=if serifs: max(limit_dist,1.1cap_jut) else: hround (r-rt x4r-.65u) fi;
+if not serifs:
+ numeric arm_thickness; arm_thickness=vround(slab-vair_corr);
+ save slab; slab:=arm_thickness; fi %bottom.desc.slab
+if unic:
+ %saam tail
+ serif(4,3,v,1/3,-cap_jut);
+ siam_serif(4,3,w,1/3,right_jut);
+else:
+ r_serif(4,3,x,1/3,cap_jut,y,1/3,beak_darkness,right_jut,beak_jut); % lower right descender
+fi
+penlabels(1,2,3,4,5,6); endchar;
+
lhchar "Uppercase Cyrillic letter N_tl - EN tail";
cyrchar(N_tl,13.5u#,cap_height#,desc_depth#);
if is_small_cap: getcharcode(n_tl); fi
@@ -734,7 +782,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
rt x[_four]l=floor x[_zero]-2.5u if monospace: / expansion_factor fi;
filldraw stroke z[_five]e--pulled_arc.e([_one],[_two]);
@@ -905,7 +953,7 @@ cyrchar(H_dsc,13u#,cap_height#,
if is_ogonek: desc_depth# else: cap_sbeak# fi); %udesc/og_depth
if is_small_cap: getcharcode(h_dsc); fi
italcorr cap_height#*slant-.25u#;
-adjust_fit(cap_serif_fit#,cap_serif_fit#);
+adjust_fit(cap_serif_fit#,cap_serif_fit#); %ZhDL_adj
% upper_h;
numeric stem[],outer_jut,xjut,alpha[];
stem1=cap_stem-2stem_corr; stem2=min(cap_hair,stem1);
@@ -982,7 +1030,7 @@ alpha1=diag_ratio(1,stem1,h,x4r-x1l);
alpha2=diag_ratio(1,stem2,h,x2r-x3l);
penpos1(alpha1*stem1,0); penpos2(alpha2*stem2,0);
penpos3(alpha2*stem2,0); penpos4(alpha1*stem1,0);
-numeric t; t=slab+bracket;
+numeric t; t=slab+bracket+eps;
forsuffixes e=l,r: z54e=(((0,t)--(w,t)) intersectionpoint (z4e--z1e)); endfor;
if hefty:
z0=whatever[z1,z4]=whatever[z2,z3];
@@ -1019,16 +1067,16 @@ _one:=7; _two:=8; _three:=9; _four:=10;
% X_
pickup fine.nib;
stem3=hround (max(fine.breadth,.5[stem1,x[_zero]r-x[_zero]l]));
-x[_one]'r=x[_zero]r;
+x[_one]'r=hround x[_zero]r+eps;
penpos[_one]'(stem3,0); pos[_one](stem3,0); z[_one]=z[_one]';
-bot y[_one]=max(-1/3d-eps,-d+if serifs: vair'else: slab fi);
-(x[_one]'l,y54')=whatever[z4l,z4l+dir angle(z4l-if serifs:z1l else:z34'fi)];
-z54'=(x[_one]'l,y54');
-fill z54l{z4r-z1r}
- ..controls (z54')..
+bot y[_one]=vround max(-1/3d,min(y[_zero]r-.5,-d+if serifs: vair'else: slab fi))-eps;
+(x[_one]'l,y54')=whatever[z4l,z4l+dir angle(z4l-if serifs:z1l else: z34'fi)];
+z54'=(x[_one]'l+eps,y54'+eps);
+fill z54l{z[_zero]r-z1r}
+ ..controls (x54'+eps,y54'+eps)..
{down}z[_one]'l--z[_one]'r{up}
- ..controls (z4r)..
- {z1r-z4r}z54r--cycle; %link
+ ...%controls (x[_one]'r+eps,y[_zero]+eps)..
+ {z1r-z[_zero]r}z54r--cycle; %link
% _X
if serifs:
numeric bulb_diam;
@@ -1036,7 +1084,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
rt x[_four]l=floor x[_one]-2.5u if monospace: / expansion_factor fi;%!!!
filldraw stroke pulled_arc.e([_one],[_two]);%!!!
@@ -1048,6 +1096,7 @@ else:
filldraw stroke super_arc.e([_one],[_two])%!!!
& term.e([_two],[_three],left,.8,4); fi
%%%
+%r:=r-.5cap_jut; %X_tl adjustment
penlabels(0,1,2,3,4,12,13,24,34,54,54', 5,6,7',8); endchar;
lhchar "Uppercase Cyrillic letter CH_ldsc - CHE left descender";
diff --git a/Master/texmf-dist/fonts/source/lh/base/lkligtbl.mf b/Master/texmf-dist/fonts/source/lh/base/lkligtbl.mf
index 0214dc8cc72..8a4de7d8049 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lkligtbl.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lkligtbl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) A.Berdnikov
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
if known loaded_lgligtbl: endinput; fi
loaded_lgligtbl:=1; % if known this file has been loaded
diff --git a/Master/texmf-dist/fonts/source/lh/base/llbligtb.mf b/Master/texmf-dist/fonts/source/lh/base/llbligtb.mf
new file mode 100644
index 00000000000..1fe8c4f6ffa
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/base/llbligtb.mf
@@ -0,0 +1,231 @@
+%
+% llbligtb.mf
+%
+%% Cyrillic font container with T2 encoding beta-support
+%
+% This file is future part of lxfonts package
+% Version 3.5 // Patchlevel=0
+% (c) O.Lapko
+%
+% This package is freeware product under conditions similar to
+% those of D. E. Knuth specified for the Computer Modern family of fonts.
+% In particular, only the authors are entitled to modify this file
+% (and all this package as well) and to save it under the same name.
+%
+% Content:
+%
+% Lig & kern data for Roman font (T2 CMBRIGHT)
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+LHver_check(3,5); % like |version_check| in ec
+
+%
+% addtitional kern value
+%
+numeric itc#; % modified italic correction on `f' and `ff'%exrlig
+itc#=if serifs: max(0,flare#-.25u#) else: 1.25u# fi;
+
+%>>>!!!
+ligtable
+ "f": "i"=:oct"034",
+ "f"=:oct"033",
+ "l"=:oct"035",
+ "'" kern itc#,
+ "`" kern itc#,
+ oct"020" kern itc#,
+ oct"021" kern itc#,
+ "?" kern itc#,
+ "!" kern itc#,
+ ")" kern itc#,
+ "]" kern itc#;
+ligtable
+ oct"033": % ff
+ "i"=:oct"036",
+ "l"=:oct"037",
+ "'" kern itc#,
+ "`" kern itc#,
+ oct"020" kern itc#,
+ oct"021" kern itc#,
+ "?" kern itc#,
+ "!" kern itc#,
+ ")" kern itc#,
+ "]" kern itc#;
+%<<<!!!
+
+ligtable "k":
+ "W" kern kk#, %!!!
+ "V" kern kk#, %!!!
+ if serifs:
+ "v": "a" kern -u#,
+ fi\\
+ "w": "e" kern k#,
+ "a" kern k#,
+ "o" kern k#,
+ "c" kern k#;
+
+ligtable "P": "A" kern kk#,
+ "y": "o" kern k#,
+ "e" kern k#,
+ "a" kern k#,
+ "." kern kk#,
+ "," kern kk#;
+
+ligtable "F":
+ "V":
+ "W": if serifs:
+ "o" kern kk#,
+ "e" kern kk#,
+ "u" kern kk#,
+ "r" kern kk#,
+ "a" kern kk#,
+ "A" kern kkk#,
+ %>>>!!!
+ "y" kern kk#,
+ "v" kern kk#,
+ "s" kern kk#,
+ "c" kern kk#,
+ "d" kern kk#,
+ "g" kern kk#,
+ "m" kern kk#,
+ "n" kern kk#,
+ "p" kern kk#,
+ "w" kern kk#,
+ "z" kern kk#,
+ %<<<!!!
+ else:
+ "o" kern k#,
+ "e" kern k#,
+ "u" kern k#,
+ "r" kern k#,
+ "a" kern k#,
+ "A" kern kk#,
+ %>>>!!!
+ "y" kern k#,
+ "v" kern k#,
+ "s" kern k#,
+ "c" kern k#,
+ "d" kern k#,
+ "g" kern k#,
+ "m" kern k#,
+ "n" kern k#,
+ "p" kern k#,
+ "w" kern k#,
+ "z" kern k#,
+ %<<<!!!
+ fi
+% "K":
+ "X":
+ "O" kern k#,
+ "C" kern k#,
+ "G" kern k#,
+ "Q" kern k#;
+
+%>>>!!!
+ ligtable "K": if serifs:
+ "v" kern kk#,
+ "w" kern k#,
+ else:
+ "v" kern k#,
+ fi
+ "o" kern k#,
+ "C" kern k#,
+ "G" kern k#,
+ "Q" kern k#;
+%<<<!!!
+
+ligtable "T": "y" kern if serifs: k# else: kk# fi,
+ "Y": "e" kern kk#,
+ "o" kern kk#,
+ "r" kern kk#,
+ "a" kern kk#,
+ "A" kern kk#,
+ %>>>!!!
+ "n" kern kk#,
+ oct"031" kern kk#, % \i
+ "c" kern kk#,
+ "d" kern kk#,
+ "g" kern kk#,
+ "p" kern kk#,
+ "s" kern kk#,
+ "v" kern kk#,
+ "w" kern kk#,
+ "x" kern kk#,
+ "z" kern kk#,
+ %<<<!!!
+ "u" kern kk#;
+
+ligtable "O":
+ "D": "X" kern k#,
+ "W" kern k#,
+ "A" kern k#,
+ "V" kern k#,
+ "Y" kern k#;
+
+if serifs:
+ ligtable "h":
+ "m":
+ "n":
+ %>>>!!!
+ "W" kern kk#, "V" kern kk#,
+ %<<<!!!
+ "t" kern k#,
+ "u" kern k#,
+ "b" kern k#,
+ "y" kern k#,
+ "v" kern k#,
+ "w" kern k#;
+
+ ligtable "c": "h" kern k#,
+ "k" kern k#;
+fi
+
+ligtable "o":
+ "b":
+ "p":
+ if known bx_kerning: % (CMBR)
+ "e" kern -k#,
+ "o" kern -k#,
+ "d" kern -k#,
+ "c" kern -k#,
+ "q" kern -k#,
+ fi
+ "x" kern k#,
+ "a": if serifs: "v" kern k#,
+ "j" kern u#,
+ else: "r" kern k#, fi
+ "t": "y" kern k#,
+ "u": "w" kern k#;
+
+ligtable "A":
+ %>>>!!!
+ "y" kern if serifs: kk# else: k# fi,
+ "v" kern if serifs: kkk# else: k# fi,
+ "w" kern if serifs: kk# else: k# fi,
+ "c" kern k#,
+ "d" kern k#,
+ "e" kern k#,
+ "o" kern k#,
+ "q" kern k#,
+ %<<<!!!
+ if serifs: "R": fi\\ "t" kern k#,
+ "C" kern k#,
+ "O" kern k#,
+ "G" kern k#,
+ "U" kern k#,
+ "Q" kern k#,
+ "L": "T" kern kk#,
+ "Y" kern kk#,
+ "V" kern kkk#,
+ "W" kern kkk#;
+
+ligtable "g": "j" kern -k#; % logjam
+
+ligtable "I": "I" kern -k#; % Richard III
+
+%>>>!!!
+ligtable "e": "V" kern kk#; % eV
+%<<<!!!
+
+endinput;
+%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/base/llcligtb.mf b/Master/texmf-dist/fonts/source/lh/base/llcligtb.mf
index b787c738898..c19b449c1c5 100644
--- a/Master/texmf-dist/fonts/source/lh/base/llcligtb.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/llcligtb.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#; % three degrees of kerning
diff --git a/Master/texmf-dist/fonts/source/lh/base/lliligtb.mf b/Master/texmf-dist/fonts/source/lh/base/lliligtb.mf
index 9b71320faca..c88521b31d6 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lliligtb.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lliligtb.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
%
% addtitional kern value
diff --git a/Master/texmf-dist/fonts/source/lh/base/llmligtb.mf b/Master/texmf-dist/fonts/source/lh/base/llmligtb.mf
index d48f1497b4b..8dfc5f1b2ba 100644
--- a/Master/texmf-dist/fonts/source/lh/base/llmligtb.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/llmligtb.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -36,7 +36,7 @@
% ``
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
if known spanish_shriek: % for CM fonts only
diff --git a/Master/texmf-dist/fonts/source/lh/base/llrligtb.mf b/Master/texmf-dist/fonts/source/lh/base/llrligtb.mf
index 886553d2bb6..3c1d53ab94c 100644
--- a/Master/texmf-dist/fonts/source/lh/base/llrligtb.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/llrligtb.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
%
% addtitional kern value
diff --git a/Master/texmf-dist/fonts/source/lh/base/llvligtb.mf b/Master/texmf-dist/fonts/source/lh/base/llvligtb.mf
index 902ea7a956a..b5dc5de6d73 100644
--- a/Master/texmf-dist/fonts/source/lh/base/llvligtb.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/llvligtb.mf
@@ -7,10 +7,10 @@
% Version 3.1 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -19,7 +19,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
% The following ligatures are integrated:
%
@@ -90,7 +90,18 @@ if (altcoding and (ligs <> 0)) % for CM
setlig ([ASCII","],CYR_.baseqq); % ",,"
endligtable;
-fi % ligatures for cyrillic quotes
+% ligatures for closing cyrillic quotes in CM
+ beginligtable
+ labelchar ([oct"134"]);
+ setlig ([ASCII"`"],CYR_.grqq); % "```"
+ endligtable;
+
+ beginligtable
+ labelchar ([oct"042"]);
+ setlig ([ASCII"'"],CYR_.grqq); % "'''"
+ endligtable;
+
+fi
k#:=-.5u#; ku#:=-1u#; kk#:=-1.5u#; kkk#:=-2u#; % four degrees of kerning
@@ -116,6 +127,7 @@ if genmode="ex":
beginligtable
labelchar ([oct"021"]); %ec:''
+% setlig ([ASCII"'"],[oct"020"]); % "'''" - CM compatibility
setkern [2u#] ([oct"047"], %'
[oct"021"]);%ec:''
setkern [-kk#] (boundarychar);
diff --git a/Master/texmf-dist/fonts/source/lh/base/lwnligs.mf b/Master/texmf-dist/fonts/source/lh/base/lwnligs.mf
index ce7d9b745f2..9e0d4445e56 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lwnligs.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lwnligs.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
% ligatures for cyrillic quotes
beginligtable
diff --git a/Master/texmf-dist/fonts/source/lh/base/lxpseudo.mf b/Master/texmf-dist/fonts/source/lh/base/lxpseudo.mf
index aa7d9f921f3..5422fe60046 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lxpseudo.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lxpseudo.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -24,13 +24,15 @@
% parameters with different values at each occuerence (like |theta|).
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
% Diameters of dots
%
numeric idot_diam#,udot_diam#,pdot_diam#;
-idot_diam#=max(dot_size#,cap_curve#); % dot of letters `i' and `j'
-udot_diam#=max(dot_size#,cap_curve#); % umlaut dots
+if ebbase<>1: %(CMBRIGHT)
+ idot_diam#=max(dot_size#,cap_curve#); % dot of letters `i' and `j'
+ udot_diam#=max(dot_size#,cap_curve#); % umlaut dots
+fi
pdot_diam#=if monospace: 5/4 fi\\ dot_size#; % punctuation dots
@@ -57,8 +59,11 @@ vardef limit_dist=5/4u enddef;
numeric lc_trema_height#;
% lc_trema_height# = min(cap_height#,9/7x_height#+.5max(dot_size#,cap_curve#));
-lc_trema_height# = min(cap_height#,9/7hi.x_height#+max(dot_size#,cap_curve#));
-
+if ebbase=1: %(CMBRIGHT)
+ lc_trema_height# = min(cap_height#,x_height#+ldot_height#);
+else:
+ lc_trema_height# = min(cap_height#,9/7hi.x_height#+max(dot_size#,cap_curve#));
+fi
% More parametrisations for accents from csaccent.mf (csfonts):
@@ -86,6 +91,12 @@ numeric cap_accent_height, cap_accent_height#;
cap_accent_height# = cap_height# + acc_height#;
def pseudo_setup =
+ if ebbase=1:%(CMBRIGHT)
+ idot_diam:=stem';
+ idot_diam#:=stem'/hppp;
+ udot_diam:=min(stem', hround(.85dot_size));
+ udot_diam#:=udot_diam/hppp;
+ fi
define_whole_blacker_pixels(idot_diam,udot_diam,pdot_diam);
define_whole_vertical_pixels(lc_trema_height);
define_whole_vertical_pixels(uc_acc_height,lc_acute_height,
diff --git a/Master/texmf-dist/fonts/source/lh/base/lycyracc.mf b/Master/texmf-dist/fonts/source/lh/base/lycyracc.mf
index 053856c787d..1e6c6e03348 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lycyracc.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lycyracc.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -21,7 +21,7 @@
% Accents for capital letters
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
% A dirty trick, better left unseen. |cap_height| and |cap_height#|
% are restored at the end of this file.
diff --git a/Master/texmf-dist/fonts/source/lh/base/lypseudo.mf b/Master/texmf-dist/fonts/source/lh/base/lypseudo.mf
index 6deb4ac793d..aef1672edc8 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lypseudo.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/lypseudo.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
% This file contains pseudoparameters which are not entered in the
% parameter files, but are computed from the initial parameter set.
@@ -29,8 +29,10 @@ LHver_check(3,4); % like |version_check| in ec
% Diameters of dots
%
numeric idot_diam#,udot_diam#,pdot_diam#;
-idot_diam#=max(dot_size#,cap_curve#); % dot of letters `i' and `j'
-udot_diam#=max(dot_size#,cap_curve#); % umlaut dots
+if ebbase<>1: %(CMBRIGHT)
+ idot_diam#=max(dot_size#,cap_curve#); % dot of letters `i' and `j'
+ udot_diam#=max(dot_size#,cap_curve#); % umlaut dots
+fi
pdot_diam#=if monospace: 5/4 fi\\ dot_size#; % punctuation dots
% |limit_dist| is used in |put_cross|
@@ -65,6 +67,12 @@ numeric cap_accent_height, cap_accent_height#;
cap_accent_height# = acc_height# + hi.x_height#;
def pseudo_setup=
+ if ebbase=1:%(CMBRIGHT)
+ idot_diam:=stem';
+ idot_diam#:=stem'/hppp;
+ udot_diam:=min(stem', hround(.85dot_size));
+ udot_diam#:=udot_diam/hppp;
+ fi
define_whole_blacker_pixels(idot_diam,udot_diam,pdot_diam);
define_whole_vertical_pixels(uc_acc_height,lc_acute_height,
lc_hachek_height);
diff --git a/Master/texmf-dist/fonts/source/lh/base/nodraw.mf b/Master/texmf-dist/fonts/source/lh/base/nodraw.mf
index ee9ee949671..57ac4dd2fb3 100644
--- a/Master/texmf-dist/fonts/source/lh/base/nodraw.mf
+++ b/Master/texmf-dist/fonts/source/lh/base/nodraw.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
-% (c) O.Lapko
+% Version 3.5 // Patchlevel=0
+% (c) A.Khodulev
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -18,7 +18,7 @@
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
def addto text t = enddef; % Draw nothing
def filldraw text t = enddef;
@@ -68,10 +68,10 @@ def big_tilde = enddef;
def labels text t = enddef;
def penlabels text t = enddef;
+endinput;
vardef bar_stroke(expr left_jut,right_jut) = enddef;
vardef cyr_serif(suffix $,$$,@) % serif at |z$| for stroke from |z$$|
(expr darkness,beak_darkness,jut,beak_jut) =
enddef;
-endinput;
%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/ccb10.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/ccb10.mf
new file mode 100644
index 00000000000..fcb92867aa6
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/ccb10.mf
@@ -0,0 +1 @@
+input cmb10; \ No newline at end of file
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx10.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx10.mf
new file mode 100644
index 00000000000..088edd32ffd
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx10.mf
@@ -0,0 +1 @@
+input cmbx10;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx5.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx5.mf
new file mode 100644
index 00000000000..03d4329223d
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx5.mf
@@ -0,0 +1 @@
+input cmbx5;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx6.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx6.mf
new file mode 100644
index 00000000000..6c7a19a8b97
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx6.mf
@@ -0,0 +1 @@
+input cmbx6;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx7.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx7.mf
new file mode 100644
index 00000000000..a5787e3f398
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx7.mf
@@ -0,0 +1 @@
+input cmbx7;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx8.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx8.mf
new file mode 100644
index 00000000000..87ab0bd507e
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx8.mf
@@ -0,0 +1 @@
+input cmbx8;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx9.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx9.mf
new file mode 100644
index 00000000000..c1795573b1e
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbx9.mf
@@ -0,0 +1 @@
+input cmbx9;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/ccbxsl10.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbxsl10.mf
new file mode 100644
index 00000000000..7d984a83712
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbxsl10.mf
@@ -0,0 +1 @@
+input cmbxsl10; \ No newline at end of file
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/ccbxti10.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbxti10.mf
new file mode 100644
index 00000000000..03bd5f3285c
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/ccbxti10.mf
@@ -0,0 +1 @@
+input cmbxti10; \ No newline at end of file
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/concb10pt.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/concb10pt.mf
new file mode 100644
index 00000000000..4f974484a74
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/concb10pt.mf
@@ -0,0 +1,80 @@
+5 concb10pt.mf - modified cmb10.mf (follows idea of ecc package)
+
+% Computer Modern Bold Roman 10 point
+if unknown cmbase: input cmbase fi
+
+%font_identifier:="CMB"; font_size 10pt#;
+
+u#:=20/36pt#; % unit width
+width_adj#:=10/36pt#; % width adjustment for certain characters
+serif_fit#:=0pt#; % extra sidebar near lowercase serifs
+cap_serif_fit#:=6/36pt#; % extra sidebar near uppercase serifs
+letter_fit#:=0pt#; % extra space added to all sidebars
+
+body_height#:=270/36pt#; % height of tallest characters
+asc_height#:=250/36pt#; % height of lowercase ascenders
+cap_height#:=247/36pt#; % height of caps
+fig_height#:=232/36pt#; % height of numerals
+x_height#:=160/36pt#; % height of lowercase without ascenders
+math_axis#:=90/36pt#; % axis of symmetry for math symbols
+bar_height#:=85/36pt#; % height of crossbar in lowercase e
+comma_depth#:=70/36pt#; % depth of comma below baseline
+desc_depth#:=70/36pt#; % depth of lowercase descenders
+acc_height#:=75/36pt#;
+dot_height#:=66/36pt#;
+
+crisp#:=0pt#; % diameter of serif corners
+tiny#:=13/36pt#; % diameter of rounded corners
+fine#:=10/36pt#; % diameter of sharply rounded corners
+thin_join#:=10/36pt#; % width of extrafine details
+hair#:=17/36pt#; % lowercase hairline breadth
+stem#:=41/36pt#; % lowercase stem breadth
+curve#:=46/36pt#; % lowercase curve breadth
+ess#:=38/36pt#; % breadth in middle of lowercase s
+flare#:=45/36pt#; % diameter of bulbs or breadth of terminals
+dot_size#:=56/36pt#; % diameter of dots
+cap_hair#:=19/36pt#; % uppercase hairline breadth
+cap_stem#:=51/36pt#; % uppercase stem breadth
+cap_curve#:=55/36pt#; % uppercase curve breadth
+cap_ess#:=53/36pt#; % breadth in middle of uppercase s
+rule_thickness#:=.6pt#; % thickness of lines in math symbols
+
+dish#:=1/36pt#; % amount erased at top or bottom of serifs
+bracket#:=10/36pt#; % vertical distance from serif base to tangent
+jut#:=25/36pt#; % protrusion of lowercase serifs
+cap_jut#:=34/36pt#; % protrusion of uppercase serifs
+beak_jut#:=11/36pt#; % horizontal protrusion of beak serifs
+beak#:=70/36pt#; % vertical protrusion of beak serifs
+vair#:=13/36pt#; % vertical diameter of hairlines
+notch_cut#:=10pt#; % maximum breadth above or below notches
+bar#:=17/36pt#; % lowercase bar thickness
+slab#:=17/36pt#; % serif and arm thickness
+cap_bar#:=17/36pt#; % uppercase bar thickness
+cap_band#:=17/36pt#; % uppercase thickness above/below lobes
+cap_notch_cut#:=10pt#; % max breadth above/below uppercase notches
+serif_drop#:=3/36pt#; % vertical drop of sloped serifs
+stem_corr#:=2/36pt#; % for small refinements of stem breadth
+vair_corr#:=1.5/36pt#; % for small refinements of hairline height
+apex_corr#:=0pt#; % extra width at diagonal junctions
+
+o#:=4/36pt#; % amount of overshoot for curves
+apex_o#:=3/36pt#; % amount of overshoot for diagonal junctions
+
+%slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+fudge:=1; % factor applied to weights of heavy characters
+math_spread:=.5; % extra openness of math symbols
+superness:=8/11; % parameter for superellipses
+superpull:=1/8; % extra openness inside bowls
+beak_darkness:=.4; % fraction of triangle inside beak serifs
+%ligs:=2; % level of ligatures to be included
+
+square_dots:=false; % should dots be square?
+hefty:=false; % should we try hard not to be overweight?
+serifs:=true; % should serifs and bulbs be attached?
+monospace:=false; % should all characters have the same width?
+variant_g:=false; % should an italic-style g be used?
+low_asterisk:=false; % should the asterisk be centered at the axis?
+%math_fitting:=false; % should math-mode spacing be used?
+
+%generate roman % switch to the driver file
+endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/concbx10pt.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx10pt.mf
new file mode 100644
index 00000000000..c0418da5f17
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx10pt.mf
@@ -0,0 +1,80 @@
+% concbx10pt.mf - modified cmbx10.mf (follows idea of ecc package)
+
+% Computer Modern Bold Extended Roman 10 point
+if unknown cmbase: input cmbase fi
+
+%font_identifier:="CMBX"; font_size 10pt#;
+
+u#:=23/36pt#; % unit width
+width_adj#:=11/36pt#; % width adjustment for certain characters
+serif_fit#:=0pt#; % extra sidebar near lowercase serifs
+cap_serif_fit#:=7/36pt#; % extra sidebar near uppercase serifs
+letter_fit#:=0pt#; % extra space added to all sidebars
+
+body_height#:=270/36pt#; % height of tallest characters
+asc_height#:=250/36pt#; % height of lowercase ascenders
+cap_height#:=247/36pt#; % height of caps
+fig_height#:=232/36pt#; % height of numerals
+x_height#:=160/36pt#; % height of lowercase without ascenders
+math_axis#:=90/36pt#; % axis of symmetry for math symbols
+bar_height#:=85/36pt#; % height of crossbar in lowercase e
+comma_depth#:=70/36pt#; % depth of comma below baseline
+desc_depth#:=70/36pt#; % depth of lowercase descenders
+acc_height#:=75/36pt#;
+dot_height#:=66/36pt#;
+
+crisp#:=0pt#; % diameter of serif corners
+tiny#:=13/36pt#; % diameter of rounded corners
+fine#:=10/36pt#; % diameter of sharply rounded corners
+thin_join#:=10/36pt#; % width of extrafine details
+hair#:=17/36pt#; % lowercase hairline breadth
+stem#:=41/36pt#; % lowercase stem breadth
+curve#:=46/36pt#; % lowercase curve breadth
+ess#:=38/36pt#; % breadth in middle of lowercase s
+flare#:=45/36pt#; % diameter of bulbs or breadth of terminals
+dot_size#:=56/36pt#; % diameter of dots
+cap_hair#:=19/36pt#; % uppercase hairline breadth
+cap_stem#:=51/36pt#; % uppercase stem breadth
+cap_curve#:=55/36pt#; % uppercase curve breadth
+cap_ess#:=53/36pt#; % breadth in middle of uppercase s
+rule_thickness#:=.6pt#; % thickness of lines in math symbols
+
+dish#:=1/36pt#; % amount erased at top or bottom of serifs
+bracket#:=10/36pt#; % vertical distance from serif base to tangent
+jut#:=25/36pt#; % protrusion of lowercase serifs
+cap_jut#:=39/36pt#; % protrusion of uppercase serifs
+beak_jut#:=11/36pt#; % horizontal protrusion of beak serifs
+beak#:=70/36pt#; % vertical protrusion of beak serifs
+vair#:=13/36pt#; % vertical diameter of hairlines
+notch_cut#:=10pt#; % maximum breadth above or below notches
+bar#:=17/36pt#; % lowercase bar thickness
+slab#:=17/36pt#; % serif and arm thickness
+cap_bar#:=17/36pt#; % uppercase bar thickness
+cap_band#:=17/36pt#; % uppercase thickness above/below lobes
+cap_notch_cut#:=10pt#; % max breadth above/below uppercase notches
+serif_drop#:=3/36pt#; % vertical drop of sloped serifs
+stem_corr#:=2/36pt#; % for small refinements of stem breadth
+vair_corr#:=1.5/36pt#; % for small refinements of hairline height
+apex_corr#:=0pt#; % extra width at diagonal junctions
+
+o#:=4/36pt#; % amount of overshoot for curves
+apex_o#:=3/36pt#; % amount of overshoot for diagonal junctions
+
+%slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+fudge:=1; % factor applied to weights of heavy characters
+math_spread:=.5; % extra openness of math symbols
+superness:=8/11; % parameter for superellipses
+superpull:=1/8; % extra openness inside bowls
+beak_darkness:=.4; % fraction of triangle inside beak serifs
+%ligs:=2; % level of ligatures to be included
+
+square_dots:=false; % should dots be square?
+hefty:=false; % should we try hard not to be overweight?
+serifs:=true; % should serifs and bulbs be attached?
+monospace:=false; % should all characters have the same width?
+variant_g:=false; % should an italic-style g be used?
+low_asterisk:=false; % should the asterisk be centered at the axis?
+%math_fitting:=false; % should math-mode spacing be used?
+
+%generate roman % switch to the driver file
+endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/concbx12pt.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx12pt.mf
new file mode 100644
index 00000000000..6111d1b02ec
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx12pt.mf
@@ -0,0 +1,80 @@
+% concbx12pt.mf - modified cmbx12.mf (follows idea of ecc package)
+
+% Computer Modern Bold Extended Roman 12 point
+if unknown cmbase: input cmbase fi
+
+%font_identifier:="CMBX"; font_size 12pt#;
+
+u#:=27/36pt#; % unit width
+width_adj#:=13/36pt#; % width adjustment for certain characters
+serif_fit#:=0pt#; % extra sidebar near lowercase serifs
+cap_serif_fit#:=8/36pt#; % extra sidebar near uppercase serifs
+letter_fit#:=0pt#; % extra space added to all sidebars
+
+body_height#:=324/36pt#; % height of tallest characters
+asc_height#:=300/36pt#; % height of lowercase ascenders
+cap_height#:=296.4/36pt#; % height of caps
+fig_height#:=278.4/36pt#; % height of numerals
+x_height#:=192/36pt#; % height of lowercase without ascenders
+math_axis#:=108/36pt#; % axis of symmetry for math symbols
+bar_height#:=102/36pt#; % height of crossbar in lowercase e
+comma_depth#:=84/36pt#; % depth of comma below baseline
+desc_depth#:=84/36pt#; % depth of lowercase descenders
+acc_height#:=75/36pt#;
+dot_height#:=66/36pt#;
+
+crisp#:=0pt#; % diameter of serif corners
+tiny#:=13/36pt#; % diameter of rounded corners
+fine#:=10/36pt#; % diameter of sharply rounded corners
+thin_join#:=10.5/36pt#; % width of extrafine details
+hair#:=18.3/36pt#; % lowercase hairline breadth
+stem#:=47/36pt#; % lowercase stem breadth
+curve#:=52/36pt#; % lowercase curve breadth
+ess#:=44/36pt#; % breadth in middle of lowercase s
+flare#:=51/36pt#; % diameter of bulbs or breadth of terminals
+dot_size#:=62/36pt#; % diameter of dots
+cap_hair#:=20/36pt#; % uppercase hairline breadth
+cap_stem#:=57/36pt#; % uppercase stem breadth
+cap_curve#:=61/36pt#; % uppercase curve breadth
+cap_ess#:=59/36pt#; % breadth in middle of uppercase s
+rule_thickness#:=.66pt#; % thickness of lines in math symbols
+
+dish#:=1/36pt#; % amount erased at top or bottom of serifs
+bracket#:=12/36pt#; % vertical distance from serif base to tangent
+jut#:=30/36pt#; % protrusion of lowercase serifs
+cap_jut#:=46/36pt#; % protrusion of uppercase serifs
+beak_jut#:=12.4/36pt#; % horizontal protrusion of beak serifs
+beak#:=84/36pt#; % vertical protrusion of beak serifs
+vair#:=14.3/36pt#; % vertical diameter of hairlines
+notch_cut#:=12pt#; % maximum breadth above or below notches
+bar#:=18.5/36pt#; % lowercase bar thickness
+slab#:=18.5/36pt#; % serif and arm thickness
+cap_bar#:=18.5/36pt#; % uppercase bar thickness
+cap_band#:=18.5/36pt#; % uppercase thickness above/below lobes
+cap_notch_cut#:=12pt#; % max breadth above/below uppercase notches
+serif_drop#:=3.6/36pt#; % vertical drop of sloped serifs
+stem_corr#:=2/36pt#; % for small refinements of stem breadth
+vair_corr#:=1.5/36pt#; % for small refinements of hairline height
+apex_corr#:=0pt#; % extra width at diagonal junctions
+
+o#:=5/36pt#; % amount of overshoot for curves
+apex_o#:=4/36pt#; % amount of overshoot for diagonal junctions
+
+%slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+fudge:=1; % factor applied to weights of heavy characters
+math_spread:=.4; % extra openness of math symbols
+superness:=8/11; % parameter for superellipses
+superpull:=1/8; % extra openness inside bowls
+beak_darkness:=.4; % fraction of triangle inside beak serifs
+%ligs:=2; % level of ligatures to be included
+
+square_dots:=false; % should dots be square?
+hefty:=false; % should we try hard not to be overweight?
+serifs:=true; % should serifs and bulbs be attached?
+monospace:=false; % should all characters have the same width?
+variant_g:=false; % should an italic-style g be used?
+low_asterisk:=false; % should the asterisk be centered at the axis?
+%math_fitting:=false; % should math-mode spacing be used?
+
+%generate roman % switch to the driver file
+endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/concbx5pt.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx5pt.mf
new file mode 100644
index 00000000000..4bc8d85159f
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx5pt.mf
@@ -0,0 +1,80 @@
+% concbx5pt.mf - cmbx5.mf (follows idea of ecc package)
+
+% Computer Modern Bold Extended Roman 5 point
+if unknown cmbase: input cmbase fi
+
+%font_identifier:="CMBX"; font_size 5pt#;
+
+u#:=14.5/36pt#; % unit width
+width_adj#:=7/36pt#; % width adjustment for certain characters
+serif_fit#:=0pt#; % extra sidebar near lowercase serifs
+cap_serif_fit#:=3/36pt#; % extra sidebar near uppercase serifs
+letter_fit#:=3/36pt#; % extra space added to all sidebars
+
+body_height#:=135/36pt#; % height of tallest characters
+asc_height#:=125/36pt#; % height of lowercase ascenders
+cap_height#:=123.5/36pt#; % height of caps
+fig_height#:=116/36pt#; % height of numerals
+x_height#:=80/36pt#; % height of lowercase without ascenders
+math_axis#:=45/36pt#; % axis of symmetry for math symbols
+bar_height#:=40/36pt#; % height of crossbar in lowercase e
+comma_depth#:=35/36pt#; % depth of comma below baseline
+desc_depth#:=35/36pt#; % depth of lowercase descenders
+acc_height#:=42.5/36pt#;
+dot_height#:=42/36pt#;
+
+crisp#:=0pt#; % diameter of serif corners
+tiny#:=9/36pt#; % diameter of rounded corners
+fine#:=8/36pt#; % diameter of sharply rounded corners
+thin_join#:=8/36pt#; % width of extrafine details
+hair#:=15/36pt#; % lowercase hairline breadth
+stem#:=24/36pt#; % lowercase stem breadth
+curve#:=27/36pt#; % lowercase curve breadth
+ess#:=19/36pt#; % breadth in middle of lowercase s
+flare#:=27/36pt#; % diameter of bulbs or breadth of terminals
+dot_size#:=31/36pt#; % diameter of dots
+cap_hair#:=17/36pt#; % uppercase hairline breadth
+cap_stem#:=28/36pt#; % uppercase stem breadth
+cap_curve#:=31/36pt#; % uppercase curve breadth
+cap_ess#:=24/36pt#; % breadth in middle of uppercase s
+rule_thickness#:=.43pt#; % thickness of lines in math symbols
+
+dish#:=.7/36pt#; % amount erased at top or bottom of serifs
+bracket#:=5/36pt#; % vertical distance from serif base to tangent
+jut#:=13/36pt#; % protrusion of lowercase serifs
+cap_jut#:=19/36pt#; % protrusion of uppercase serifs
+beak_jut#:=7/36pt#; % horizontal protrusion of beak serifs
+beak#:=25/36pt#; % vertical protrusion of beak serifs
+vair#:=10/36pt#; % vertical diameter of hairlines
+notch_cut#:=5pt#; % maximum breadth above or below notches
+bar#:=12/36pt#; % lowercase bar thickness
+slab#:=12/36pt#; % serif and arm thickness
+cap_bar#:=12/36pt#; % uppercase bar thickness
+cap_band#:=12/36pt#; % uppercase thickness above/below lobes
+cap_notch_cut#:=5pt#; % max breadth above/below uppercase notches
+serif_drop#:=1.5/36pt#; % vertical drop of sloped serifs
+stem_corr#:=1.5/36pt#; % for small refinements of stem breadth
+vair_corr#:=1/36pt#; % for small refinements of hairline height
+apex_corr#:=9/36pt#; % extra width at diagonal junctions
+
+o#:=3/36pt#; % amount of overshoot for curves
+apex_o#:=3/36pt#; % amount of overshoot for diagonal junctions
+
+%slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+fudge:=1; % factor applied to weights of heavy characters
+math_spread:=1.5; % extra openness of math symbols
+superness:=8/11; % parameter for superellipses
+superpull:=1/8; % extra openness inside bowls
+beak_darkness:=.4; % fraction of triangle inside beak serifs
+%ligs:=2; % level of ligatures to be included
+
+square_dots:=false; % should dots be square?
+hefty:=false; % should we try hard not to be overweight?
+serifs:=true; % should serifs and bulbs be attached?
+monospace:=false; % should all characters have the same width?
+variant_g:=false; % should an italic-style g be used?
+low_asterisk:=false; % should the asterisk be centered at the axis?
+%math_fitting:=false; % should math-mode spacing be used?
+
+%generate roman % switch to the driver file
+endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/concbx6pt.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx6pt.mf
new file mode 100644
index 00000000000..d7e9ab27499
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx6pt.mf
@@ -0,0 +1,80 @@
+% concbx6pt.mf - modified cmbx6.mf (follows idea of ecc package)
+
+% Computer Modern Bold Extended Roman 6 point
+if unknown cmbase: input cmbase fi
+
+%font_identifier:="CMBX"; font_size 6pt#;
+
+u#:=16.2/36pt#; % unit width
+width_adj#:=7.8/36pt#; % width adjustment for certain characters
+serif_fit#:=0pt#; % extra sidebar near lowercase serifs
+cap_serif_fit#:=3.8/36pt#; % extra sidebar near uppercase serifs
+letter_fit#:=2/36pt#; % extra space added to all sidebars
+
+body_height#:=162/36pt#; % height of tallest characters
+asc_height#:=150/36pt#; % height of lowercase ascenders
+cap_height#:=148.2/36pt#; % height of caps
+fig_height#:=139.2/36pt#; % height of numerals
+x_height#:=96/36pt#; % height of lowercase without ascenders
+math_axis#:=54/36pt#; % axis of symmetry for math symbols
+bar_height#:=49/36pt#; % height of crossbar in lowercase e
+comma_depth#:=42/36pt#; % depth of comma below baseline
+desc_depth#:=42/36pt#; % depth of lowercase descenders
+acc_height#:=49/36pt#;
+dot_height#:=46.6/36pt#;
+
+crisp#:=0pt#; % diameter of serif corners
+tiny#:=10/36pt#; % diameter of rounded corners
+fine#:=9/36pt#; % diameter of sharply rounded corners
+thin_join#:=9/36pt#; % width of extrafine details
+hair#:=15.4/36pt#; % lowercase hairline breadth
+stem#:=28/36pt#; % lowercase stem breadth
+curve#:=31/36pt#; % lowercase curve breadth
+ess#:=25/36pt#; % breadth in middle of lowercase s
+flare#:=31/36pt#; % diameter of bulbs or breadth of terminals
+dot_size#:=36/36pt#; % diameter of dots
+cap_hair#:=18/36pt#; % uppercase hairline breadth
+cap_stem#:=33/36pt#; % uppercase stem breadth
+cap_curve#:=36/36pt#; % uppercase curve breadth
+cap_ess#:=31/36pt#; % breadth in middle of uppercase s
+rule_thickness#:=.47pt#; % thickness of lines in math symbols
+
+dish#:=.8/36pt#; % amount erased at top or bottom of serifs
+bracket#:=6/36pt#; % vertical distance from serif base to tangent
+jut#:=15/36pt#; % protrusion of lowercase serifs
+cap_jut#:=23/36pt#; % protrusion of uppercase serifs
+beak_jut#:=7.8/36pt#; % horizontal protrusion of beak serifs
+beak#:=36/36pt#; % vertical protrusion of beak serifs
+vair#:=11/36pt#; % vertical diameter of hairlines
+notch_cut#:=6pt#; % maximum breadth above or below notches
+bar#:=13/36pt#; % lowercase bar thickness
+slab#:=13/36pt#; % serif and arm thickness
+cap_bar#:=13/36pt#; % uppercase bar thickness
+cap_band#:=13/36pt#; % uppercase thickness above/below lobes
+cap_notch_cut#:=6pt#; % max breadth above/below uppercase notches
+serif_drop#:=1.8/36pt#; % vertical drop of sloped serifs
+stem_corr#:=1.6/36pt#; % for small refinements of stem breadth
+vair_corr#:=1.1/36pt#; % for small refinements of hairline height
+apex_corr#:=5/36pt#; % extra width at diagonal junctions
+
+o#:=3/36pt#; % amount of overshoot for curves
+apex_o#:=3/36pt#; % amount of overshoot for diagonal junctions
+
+%slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+fudge:=1; % factor applied to weights of heavy characters
+math_spread:=1.3; % extra openness of math symbols
+superness:=8/11; % parameter for superellipses
+superpull:=1/8; % extra openness inside bowls
+beak_darkness:=.4; % fraction of triangle inside beak serifs
+%ligs:=2; % level of ligatures to be included
+
+square_dots:=false; % should dots be square?
+hefty:=false; % should we try hard not to be overweight?
+serifs:=true; % should serifs and bulbs be attached?
+monospace:=false; % should all characters have the same width?
+variant_g:=false; % should an italic-style g be used?
+low_asterisk:=false; % should the asterisk be centered at the axis?
+%math_fitting:=false; % should math-mode spacing be used?
+
+%generate roman % switch to the driver file
+endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/concbx7pt.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx7pt.mf
new file mode 100644
index 00000000000..37cd2a8b3ee
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx7pt.mf
@@ -0,0 +1,80 @@
+% concbx7pt.mf - cmbx7.mf (follows idea of ecc package)
+
+% Computer Modern Bold Extended Roman 7 point
+if unknown cmbase: input cmbase fi
+
+%font_identifier:="CMBX"; font_size 7pt#;
+
+u#:=17.9/36pt#; % unit width
+width_adj#:=8.6/36pt#; % width adjustment for certain characters
+serif_fit#:=0pt#; % extra sidebar near lowercase serifs
+cap_serif_fit#:=4.6/36pt#; % extra sidebar near uppercase serifs
+letter_fit#:=1/36pt#; % extra space added to all sidebars
+
+body_height#:=189/36pt#; % height of tallest characters
+asc_height#:=175/36pt#; % height of lowercase ascenders
+cap_height#:=172.9/36pt#; % height of caps
+fig_height#:=162.4/36pt#; % height of numerals
+x_height#:=112/36pt#; % height of lowercase without ascenders
+math_axis#:=63/36pt#; % axis of symmetry for math symbols
+bar_height#:=58/36pt#; % height of crossbar in lowercase e
+comma_depth#:=49/36pt#; % depth of comma below baseline
+desc_depth#:=49/36pt#; % depth of lowercase descenders
+acc_height#:=55.5/36pt#;
+dot_height#:=51.2/36pt#;
+
+crisp#:=0pt#; % diameter of serif corners
+tiny#:=11/36pt#; % diameter of rounded corners
+fine#:=9/36pt#; % diameter of sharply rounded corners
+thin_join#:=9/36pt#; % width of extrafine details
+hair#:=15.8/36pt#; % lowercase hairline breadth
+stem#:=32/36pt#; % lowercase stem breadth
+curve#:=35/36pt#; % lowercase curve breadth
+ess#:=29/36pt#; % breadth in middle of lowercase s
+flare#:=35/36pt#; % diameter of bulbs or breadth of terminals
+dot_size#:=41/36pt#; % diameter of dots
+cap_hair#:=18/36pt#; % uppercase hairline breadth
+cap_stem#:=38/36pt#; % uppercase stem breadth
+cap_curve#:=41/36pt#; % uppercase curve breadth
+cap_ess#:=37/36pt#; % breadth in middle of uppercase s
+rule_thickness#:=.51pt#; % thickness of lines in math symbols
+
+dish#:=.9/36pt#; % amount erased at top or bottom of serifs
+bracket#:=7/36pt#; % vertical distance from serif base to tangent
+jut#:=17/36pt#; % protrusion of lowercase serifs
+cap_jut#:=27/36pt#; % protrusion of uppercase serifs
+beak_jut#:=8.6/36pt#; % horizontal protrusion of beak serifs
+beak#:=46/36pt#; % vertical protrusion of beak serifs
+vair#:=11.5/36pt#; % vertical diameter of hairlines
+notch_cut#:=7pt#; % maximum breadth above or below notches
+bar#:=14/36pt#; % lowercase bar thickness
+slab#:=14/36pt#; % serif and arm thickness
+cap_bar#:=14/36pt#; % uppercase bar thickness
+cap_band#:=14/36pt#; % uppercase thickness above/below lobes
+cap_notch_cut#:=7pt#; % max breadth above/below uppercase notches
+serif_drop#:=2.1/36pt#; % vertical drop of sloped serifs
+stem_corr#:=1.7/36pt#; % for small refinements of stem breadth
+vair_corr#:=1.2/36pt#; % for small refinements of hairline height
+apex_corr#:=2/36pt#; % extra width at diagonal junctions
+
+o#:=3/36pt#; % amount of overshoot for curves
+apex_o#:=3/36pt#; % amount of overshoot for diagonal junctions
+
+%slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+fudge:=1; % factor applied to weights of heavy characters
+math_spread:=1.1; % extra openness of math symbols
+superness:=8/11; % parameter for superellipses
+superpull:=1/8; % extra openness inside bowls
+beak_darkness:=.4; % fraction of triangle inside beak serifs
+%ligs:=2; % level of ligatures to be included
+
+square_dots:=false; % should dots be square?
+hefty:=false; % should we try hard not to be overweight?
+serifs:=true; % should serifs and bulbs be attached?
+monospace:=false; % should all characters have the same width?
+variant_g:=false; % should an italic-style g be used?
+low_asterisk:=false; % should the asterisk be centered at the axis?
+%math_fitting:=false; % should math-mode spacing be used?
+
+%generate roman % switch to the driver file
+endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/concbx8pt.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx8pt.mf
new file mode 100644
index 00000000000..69d26fd98e2
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx8pt.mf
@@ -0,0 +1,80 @@
+% concbx8pt.mf - modofied cmbx8.mf (follows idea of ecc package)
+
+% Computer Modern Bold Extended Roman 8 point
+if unknown cmbase: input cmbase fi
+
+%font_identifier:="CMBX"; font_size 8pt#;
+
+u#:=19.6/36pt#; % unit width
+width_adj#:=9.4/36pt#; % width adjustment for certain characters
+serif_fit#:=0pt#; % extra sidebar near lowercase serifs
+cap_serif_fit#:=5.4/36pt#; % extra sidebar near uppercase serifs
+letter_fit#:=0pt#; % extra space added to all sidebars
+
+body_height#:=216/36pt#; % height of tallest characters
+asc_height#:=200/36pt#; % height of lowercase ascenders
+cap_height#:=197.6/36pt#; % height of caps
+fig_height#:=185.6/36pt#; % height of numerals
+x_height#:=128/36pt#; % height of lowercase without ascenders
+math_axis#:=72/36pt#; % axis of symmetry for math symbols
+bar_height#:=67/36pt#; % height of crossbar in lowercase e
+comma_depth#:=56/36pt#; % depth of comma below baseline
+desc_depth#:=56/36pt#; % depth of lowercase descenders
+acc_height#:=62/36pt#;
+dot_height#:=56/36pt#;
+
+crisp#:=0pt#; % diameter of serif corners
+tiny#:=12/36pt#; % diameter of rounded corners
+fine#:=10/36pt#; % diameter of sharply rounded corners
+thin_join#:=10/36pt#; % width of extrafine details
+hair#:=16.2/36pt#; % lowercase hairline breadth
+stem#:=35/36pt#; % lowercase stem breadth
+curve#:=39/36pt#; % lowercase curve breadth
+ess#:=32/36pt#; % breadth in middle of lowercase s
+flare#:=39/36pt#; % diameter of bulbs or breadth of terminals
+dot_size#:=46/36pt#; % diameter of dots
+cap_hair#:=19/36pt#; % uppercase hairline breadth
+cap_stem#:=43/36pt#; % uppercase stem breadth
+cap_curve#:=46/36pt#; % uppercase curve breadth
+cap_ess#:=43/36pt#; % breadth in middle of uppercase s
+rule_thickness#:=.54pt#; % thickness of lines in math symbols
+
+dish#:=1/36pt#; % amount erased at top or bottom of serifs
+bracket#:=8/36pt#; % vertical distance from serif base to tangent
+jut#:=19/36pt#; % protrusion of lowercase serifs
+cap_jut#:=31/36pt#; % protrusion of uppercase serifs
+beak_jut#:=9.4/36pt#; % horizontal protrusion of beak serifs
+beak#:=55/36pt#; % vertical protrusion of beak serifs
+vair#:=12/36pt#; % vertical diameter of hairlines
+notch_cut#:=8pt#; % maximum breadth above or below notches
+bar#:=15/36pt#; % lowercase bar thickness
+slab#:=15/36pt#; % serif and arm thickness
+cap_bar#:=15/36pt#; % uppercase bar thickness
+cap_band#:=15/36pt#; % uppercase thickness above/below lobes
+cap_notch_cut#:=8pt#; % max breadth above/below uppercase notches
+serif_drop#:=2.4/36pt#; % vertical drop of sloped serifs
+stem_corr#:=1.8/36pt#; % for small refinements of stem breadth
+vair_corr#:=1.3/36pt#; % for small refinements of hairline height
+apex_corr#:=0pt#; % extra width at diagonal junctions
+
+o#:=4/36pt#; % amount of overshoot for curves
+apex_o#:=3/36pt#; % amount of overshoot for diagonal junctions
+
+%slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+fudge:=1; % factor applied to weights of heavy characters
+math_spread:=.9; % extra openness of math symbols
+superness:=8/11; % parameter for superellipses
+superpull:=1/8; % extra openness inside bowls
+beak_darkness:=.4; % fraction of triangle inside beak serifs
+%ligs:=2; % level of ligatures to be included
+
+square_dots:=false; % should dots be square?
+hefty:=false; % should we try hard not to be overweight?
+serifs:=true; % should serifs and bulbs be attached?
+monospace:=false; % should all characters have the same width?
+variant_g:=false; % should an italic-style g be used?
+low_asterisk:=false; % should the asterisk be centered at the axis?
+%math_fitting:=false; % should math-mode spacing be used?
+
+%generate roman % switch to the driver file
+endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/concbx9pt.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx9pt.mf
new file mode 100644
index 00000000000..3456b8848d0
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/concbx9pt.mf
@@ -0,0 +1,80 @@
+% concbx9pt.mf - modified cmbx9.mf (follows idea of ecc package)
+
+% Computer Modern Bold Extended Roman 9 point
+if unknown cmbase: input cmbase fi
+
+%font_identifier:="CMBX"; font_size 9pt#;
+
+u#:=21.3/36pt#; % unit width
+width_adj#:=10.2/36pt#; % width adjustment for certain characters
+serif_fit#:=0pt#; % extra sidebar near lowercase serifs
+cap_serif_fit#:=6.2/36pt#; % extra sidebar near uppercase serifs
+letter_fit#:=0pt#; % extra space added to all sidebars
+
+body_height#:=243/36pt#; % height of tallest characters
+asc_height#:=225/36pt#; % height of lowercase ascenders
+cap_height#:=222.3/36pt#; % height of caps
+fig_height#:=208.8/36pt#; % height of numerals
+x_height#:=144/36pt#; % height of lowercase without ascenders
+math_axis#:=81/36pt#; % axis of symmetry for math symbols
+bar_height#:=76/36pt#; % height of crossbar in lowercase e
+comma_depth#:=63/36pt#; % depth of comma below baseline
+desc_depth#:=63/36pt#; % depth of lowercase descenders
+acc_height#:=68.5/36pt#;
+dot_height#:=60.4/36pt#;
+
+crisp#:=0pt#; % diameter of serif corners
+tiny#:=13/36pt#; % diameter of rounded corners
+fine#:=10/36pt#; % diameter of sharply rounded corners
+thin_join#:=10/36pt#; % width of extrafine details
+hair#:=16.6/36pt#; % lowercase hairline breadth
+stem#:=38/36pt#; % lowercase stem breadth
+curve#:=43/36pt#; % lowercase curve breadth
+ess#:=35/36pt#; % breadth in middle of lowercase s
+flare#:=42/36pt#; % diameter of bulbs or breadth of terminals
+dot_size#:=51/36pt#; % diameter of dots
+cap_hair#:=19/36pt#; % uppercase hairline breadth
+cap_stem#:=47/36pt#; % uppercase stem breadth
+cap_curve#:=51/36pt#; % uppercase curve breadth
+cap_ess#:=48/36pt#; % breadth in middle of uppercase s
+rule_thickness#:=.57pt#; % thickness of lines in math symbols
+
+dish#:=1/36pt#; % amount erased at top or bottom of serifs
+bracket#:=9/36pt#; % vertical distance from serif base to tangent
+jut#:=22/36pt#; % protrusion of lowercase serifs
+cap_jut#:=35/36pt#; % protrusion of uppercase serifs
+beak_jut#:=10.2/36pt#; % horizontal protrusion of beak serifs
+beak#:=63/36pt#; % vertical protrusion of beak serifs
+vair#:=12.5/36pt#; % vertical diameter of hairlines
+notch_cut#:=9pt#; % maximum breadth above or below notches
+bar#:=16/36pt#; % lowercase bar thickness
+slab#:=16/36pt#; % serif and arm thickness
+cap_bar#:=16/36pt#; % uppercase bar thickness
+cap_band#:=16/36pt#; % uppercase thickness above/below lobes
+cap_notch_cut#:=9pt#; % max breadth above/below uppercase notches
+serif_drop#:=2.7/36pt#; % vertical drop of sloped serifs
+stem_corr#:=1.9/36pt#; % for small refinements of stem breadth
+vair_corr#:=1.4/36pt#; % for small refinements of hairline height
+apex_corr#:=0pt#; % extra width at diagonal junctions
+
+o#:=4/36pt#; % amount of overshoot for curves
+apex_o#:=3/36pt#; % amount of overshoot for diagonal junctions
+
+%slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+fudge:=1; % factor applied to weights of heavy characters
+math_spread:=.7; % extra openness of math symbols
+superness:=8/11; % parameter for superellipses
+superpull:=1/8; % extra openness inside bowls
+beak_darkness:=.4; % fraction of triangle inside beak serifs
+%ligs:=2; % level of ligatures to be included
+
+square_dots:=false; % should dots be square?
+hefty:=false; % should we try hard not to be overweight?
+serifs:=true; % should serifs and bulbs be attached?
+monospace:=false; % should all characters have the same width?
+variant_g:=false; % should an italic-style g be used?
+low_asterisk:=false; % should the asterisk be centered at the axis?
+%math_fitting:=false; % should math-mode spacing be used?
+
+%generate roman % switch to the driver file
+endinput;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/concbxti10.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/concbxti10.mf
new file mode 100644
index 00000000000..2c996349958
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/concbxti10.mf
@@ -0,0 +1,78 @@
+% THIS IS THE OFFICIAL COMPUTER MODERN SOURCE FILE cmbxti10.mf BY D E KNUTH.
+% IT MUST NOT BE MODIFIED IN ANY WAY UNLESS THE FILE NAME IS CHANGED!
+
+% Computer Modern Bold Extended Text Italic 10 point
+if unknown cmbase: input cmbase fi
+
+%font_identifier:="CMBXTI"; font_size 10pt#;
+
+u#:=21.2/36pt#; % unit width
+width_adj#:=11/36pt#; % width adjustment for certain characters
+serif_fit#:=0pt#; % extra sidebar near lowercase serifs
+cap_serif_fit#:=7/36pt#; % extra sidebar near uppercase serifs
+letter_fit#:=11/36pt#; % extra space added to all sidebars
+
+body_height#:=270/36pt#; % height of tallest characters
+asc_height#:=250/36pt#; % height of lowercase ascenders
+cap_height#:=247/36pt#; % height of caps
+fig_height#:=232/36pt#; % height of numerals
+x_height#:=160/36pt#; % height of lowercase without ascenders
+math_axis#:=90/36pt#; % axis of symmetry for math symbols
+bar_height#:=85/36pt#; % height of crossbar in lowercase e
+comma_depth#:=70/36pt#; % depth of comma below baseline
+desc_depth#:=70/36pt#; % depth of lowercase descenders
+
+crisp#:=13/36pt#; % diameter of serif corners
+tiny#:=13/36pt#; % diameter of rounded corners
+fine#:=10/36pt#; % diameter of sharply rounded corners
+thin_join#:=10/36pt#; % width of extrafine details
+hair#:=20/36pt#; % lowercase hairline breadth
+stem#:=38/36pt#; % lowercase stem breadth
+curve#:=43/36pt#; % lowercase curve breadth
+ess#:=35/36pt#; % breadth in middle of lowercase s
+flare#:=42/36pt#; % diameter of bulbs or breadth of terminals
+dot_size#:=53/36pt#; % diameter of dots
+cap_hair#:=22/36pt#; % uppercase hairline breadth
+cap_stem#:=49/36pt#; % uppercase stem breadth
+cap_curve#:=52/36pt#; % uppercase curve breadth
+cap_ess#:=50/36pt#; % breadth in middle of uppercase s
+rule_thickness#:=.6pt#; % thickness of lines in math symbols
+
+dish#:=1/36pt#; % amount erased at top or bottom of serifs
+bracket#:=10/36pt#; % vertical distance from serif base to tangent
+jut#:=27/36pt#; % protrusion of lowercase serifs
+cap_jut#:=39/36pt#; % protrusion of uppercase serifs
+beak_jut#:=10/36pt#; % horizontal protrusion of beak serifs
+beak#:=70/36pt#; % vertical protrusion of beak serifs
+vair#:=13/36pt#; % vertical diameter of hairlines
+notch_cut#:=10pt#; % maximum breadth above or below notches
+bar#:=17/36pt#; % lowercase bar thickness
+slab#:=17/36pt#; % serif and arm thickness
+cap_bar#:=17/36pt#; % uppercase bar thickness
+cap_band#:=17/36pt#; % uppercase thickness above/below lobes
+cap_notch_cut#:=10pt#; % max breadth above/below uppercase notches
+serif_drop#:=3/36pt#; % vertical drop of sloped serifs
+stem_corr#:=2/36pt#; % for small refinements of stem breadth
+vair_corr#:=1.5/36pt#; % for small refinements of hairline height
+apex_corr#:=0pt#; % extra width at diagonal junctions
+
+o#:=6/36pt#; % amount of overshoot for curves
+apex_o#:=6/36pt#; % amount of overshoot for diagonal junctions
+
+%slant:=.25; % tilt ratio $(\Delta x/\Delta y)$
+fudge:=1; % factor applied to weights of heavy characters
+math_spread:=.5; % extra openness of math symbols
+superness:=8/11; % parameter for superellipses
+superpull:=1/8; % extra openness inside bowls
+beak_darkness:=.4; % fraction of triangle inside beak serifs
+%ligs:=2; % level of ligatures to be included
+
+square_dots:=false; % should dots be square?
+hefty:=false; % should we try hard not to be overweight?
+serifs:=true; % should serifs and bulbs be attached?
+monospace:=false; % should all characters have the same width?
+variant_g:=true; % should an italic-style g be used?
+low_asterisk:=false; % should the asterisk be centered at the axis?
+%math_fitting:=false; % should math-mode spacing be used?
+
+generate textit % switch to the driver file
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/concc9pt.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/concc9pt.mf
new file mode 100644
index 00000000000..cf794ee43c8
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/concc9pt.mf
@@ -0,0 +1,75 @@
+% concc9.mf - modified ccslc9.mf (follows idea of ecc package)
+
+% Concrete Slanted Condensed Roman 9 point
+if unknown cmbase: input cmbase fi
+
+u#:=16/36pt#; % unit width
+width_adj#:=0pt#; % width adjustment for certain characters
+serif_fit#:=0pt#; % extra sidebar near lowercase serifs
+cap_serif_fit#:=2/36pt#; % extra sidebar near uppercase serifs
+letter_fit#:=0pt#; % extra space added to all sidebars
+
+body_height#:=243/36pt#; % height of tallest characters
+asc_height#:=225/36pt#; % height of lowercase ascenders
+cap_height#:=221.4/36pt#; % height of caps
+fig_height#:=208.8/36pt#; % height of numerals
+x_height#:=155/36pt#; % height of lowercase without ascenders
+math_axis#:=81/36pt#; % axis of symmetry for math symbols
+bar_height#:=85/36pt#; % height of crossbar in lowercase e
+comma_depth#:=63/36pt#; % depth of comma below baseline
+desc_depth#:=63/36pt#; % depth of lowercase descenders
+
+crisp#:=0pt#; % diameter of serif corners
+tiny#:=9/36pt#; % diameter of rounded corners
+fine#:=6/36pt#; % diameter of sharply rounded corners
+thin_join#:=13/36pt#; % width of extrafine details
+hair#:=16/36pt#; % lowercase hairline breadth
+stem#:=22/36pt#; % lowercase stem breadth
+curve#:=23/36pt#; % lowercase curve breadth
+ess#:=25/36pt#; % breadth in middle of lowercase s
+flare#:=28/36pt#; % diameter of bulbs or breadth of terminals
+dot_size#:=35/36pt#; % diameter of dots
+cap_hair#:=16/36pt#; % uppercase hairline breadth
+cap_stem#:=23/36pt#; % uppercase stem breadth
+cap_curve#:=24/36pt#; % uppercase curve breadth
+cap_ess#:=23/36pt#; % breadth in middle of uppercase s
+rule_thickness#:=.38pt#; % thickness of lines in math symbols
+
+dish#:=0/36pt#; % amount erased at top or bottom of serifs
+bracket#:=5/36pt#; % vertical distance from serif base to tangent
+jut#:=15/36pt#; % protrusion of lowercase serifs
+cap_jut#:=16/36pt#; % protrusion of uppercase serifs
+beak_jut#:=9.2/36pt#; % horizontal protrusion of beak serifs
+beak#:=63/36pt#; % vertical protrusion of beak serifs
+vair#:=15/36pt#; % vertical diameter of hairlines
+notch_cut#:=27/36pt#; % maximum breadth above or below notches
+bar#:=15/36pt#; % lowercase bar thickness
+slab#:=15/36pt#; % serif and arm thickness
+cap_bar#:=15/36pt#; % uppercase bar thickness
+cap_band#:=15/36pt#; % uppercase thickness above/below lobes
+cap_notch_cut#:=.9pt#; % max breadth above/below uppercase notches
+serif_drop#:=3.6/36pt#; % vertical drop of sloped serifs
+stem_corr#:=1/36pt#; % for small refinements of stem breadth
+vair_corr#:=1/36pt#; % for small refinements of hairline height
+apex_corr#:=0pt#; % extra width at diagonal junctions
+
+o#:=4/36pt#; % amount of overshoot for curves
+apex_o#:=3/36pt#; % amount of overshoot for diagonal junctions
+
+%slant:=1/6; % tilt ratio $(\Delta x/\Delta y)$
+fudge:=1; % factor applied to weights of heavy characters
+math_spread:=.2; % extra openness of math symbols
+superness:=8/11; % parameter for superellipses
+superpull:=1/15; % extra openness inside bowls
+beak_darkness:=5/30; % fraction of triangle inside beak serifs
+%ligs:=2; % level of ligatures to be included
+
+square_dots:=false; % should dots be square?
+hefty:=false; % should we try hard not to be overweight?
+serifs:=true; % should serifs and bulbs be attached?
+monospace:=false; % should all characters have the same width?
+variant_g:=false; % should an italic-style g be used?
+low_asterisk:=false; % should the asterisk be centered at the axis?
+%math_fitting:=false; % should math-mode spacing be used?
+
+%generate roman % switch to the driver file
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/eob10.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/eob10.mf
new file mode 100644
index 00000000000..a675945a2fd
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/eob10.mf
@@ -0,0 +1,14 @@
+% T2*/X2 encodings
+% Bold Faced font with concrete Russian letters
+% based on cmb10
+
+if unknown exbase: input exbase fi
+
+font_identifier:="EOB"; font_size 10pt#;
+
+input concb10pt;
+slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+math_fitting:=false; % should math-mode spacing be used?
+
+generate exroman; % switch to the driver file
+
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/eobx10.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx10.mf
new file mode 100644
index 00000000000..319182ad506
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx10.mf
@@ -0,0 +1,14 @@
+% T2*/X2 encodings
+% Bold Faced font with concrete Russian letters
+% based on cmbx10
+
+if unknown exbase: input exbase fi
+
+font_identifier:="EOBX"; font_size 10pt#;
+
+input concbx10pt;
+slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+math_fitting:=false; % should math-mode spacing be used?
+
+generate exroman; % switch to the driver file
+
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/eobx5.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx5.mf
new file mode 100644
index 00000000000..784c9dcf3b3
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx5.mf
@@ -0,0 +1,14 @@
+% T2*/X2 encodings
+% Bold Faced font with concrete Russian letters
+% based on cmbx5
+
+if unknown exbase: input exbase fi
+
+font_identifier:="EOBX"; font_size 5pt#;
+
+input concbx5pt;
+slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+math_fitting:=false; % should math-mode spacing be used?
+
+generate exroman; % switch to the driver file
+
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/eobx6.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx6.mf
new file mode 100644
index 00000000000..5fed3f69be9
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx6.mf
@@ -0,0 +1,14 @@
+% T2*/X2 encodings
+% Bold Faced font with concrete Russian letters
+% based on cmbx6
+
+if unknown exbase: input exbase fi
+
+font_identifier:="EOBX"; font_size 6pt#;
+
+input concbx6pt;
+slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+math_fitting:=false; % should math-mode spacing be used?
+
+generate exroman % switch to the driver file
+
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/eobx7.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx7.mf
new file mode 100644
index 00000000000..53abbdf4464
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx7.mf
@@ -0,0 +1,14 @@
+% T2*/X2 encodings
+% Bold Faced font with concrete Russian letters
+% based on cmbx7
+
+if unknown exbase: input exbase fi
+
+font_identifier:="EOBX"; font_size 7pt#;
+
+input concbx7pt;
+slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+math_fitting:=false; % should math-mode spacing be used?
+
+generate exroman; % switch to the driver file
+
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/eobx8.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx8.mf
new file mode 100644
index 00000000000..1a138f70af8
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx8.mf
@@ -0,0 +1,14 @@
+% T2*/X2 encodings
+% Bold Faced font with concrete Russian letters
+% based on cmbx8
+
+if unknown exbase: input exbase fi
+
+font_identifier:="EOBX"; font_size 8pt#;
+
+input concbx8pt;
+slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+math_fitting:=false; % should math-mode spacing be used?
+
+generate exroman; % switch to the driver file
+
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/eobx9.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx9.mf
new file mode 100644
index 00000000000..e3beea071e1
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/eobx9.mf
@@ -0,0 +1,14 @@
+% T2*/X2 encodings
+% Bold Faced font with concrete Russian letters
+% based on cmbx9
+
+if unknown exbase: input exbase fi
+
+font_identifier:="EOBX"; font_size 9pt#;
+
+input concbx9pt;
+slant:=0; % tilt ratio $(\Delta x/\Delta y)$
+math_fitting:=false; % should math-mode spacing be used?
+
+generate exroman; % switch to the driver file
+
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/eobxsl10.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/eobxsl10.mf
new file mode 100644
index 00000000000..47940cf4ae9
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/eobxsl10.mf
@@ -0,0 +1,14 @@
+% T2*/X2 encodings
+% Bold Faced font with concrete Russian letters
+% based on cmbxsl10 (cmbx10)
+
+if unknown exbase: input exbase fi
+
+font_identifier:="EOBXSL"; font_size 10pt#;
+
+input concbx10pt;
+slant:=1/6; % tilt ratio $(\Delta x/\Delta y)$
+math_fitting:=false; % should math-mode spacing be used?
+
+generate exroman; % switch to the driver file
+
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/eobxti10.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/eobxti10.mf
new file mode 100644
index 00000000000..ce54d1f9dd8
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/eobxti10.mf
@@ -0,0 +1,14 @@
+% T2*/X2 encodings
+% Bold Faced font with concrete Russian letters
+% based on cmbxsl10 (cmbx10)
+
+if unknown exbase: input exbase fi
+
+font_identifier:="EOBXTI"; font_size 10pt#;
+
+input concbx10pt;
+slant:=1/6; % tilt ratio $(\Delta x/\Delta y)$
+math_fitting:=false; % should math-mode spacing be used?
+
+generate extextit; % switch to the driver file
+
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/eoslc9.mf b/Master/texmf-dist/fonts/source/lh/lh-conc/eoslc9.mf
new file mode 100644
index 00000000000..2997a9b5513
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/eoslc9.mf
@@ -0,0 +1,14 @@
+% T2*/X2 encodings
+% Condenced Slanted concrete
+% based on cccslc9
+
+if unknown exbase: input exbase fi
+
+font_identifier:="EOSLC"; font_size 9pt#;
+
+input concc9pt;
+slant:=1/6; % tilt ratio $(\Delta x/\Delta y)$
+math_fitting:=false; % should math-mode spacing be used?
+
+generate exroman; % switch to the driver file
+
diff --git a/Master/texmf-dist/fonts/source/lh/lh-conc/readme.txt b/Master/texmf-dist/fonts/source/lh/lh-conc/readme.txt
new file mode 100644
index 00000000000..5c588a8bfb2
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/lh-conc/readme.txt
@@ -0,0 +1,9 @@
+"Sources" for bold faced fonts
+(based on cmb10, cmbx*, cmbxsl10)
+with concrete shapes of letters
+CYRD, CYRL, CYRZH, CYRK, CYRYA
+and modified lettershapes for
+other Cyrillic-writing languages
+
+Missed font ccslc9 for graffiti
+(concrete condenced slanted font)
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/ilhcsc10.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/ilhcsc10.mf
deleted file mode 100644
index 85786a4c0f2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/ilhcsc10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilhcsc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/ilhtt8.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/ilhtt8.mf
deleted file mode 100644
index 1ffcaa04eac..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/ilhtt8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilhtt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/illhss8.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/illhss8.mf
deleted file mode 100644
index 2400cc13d72..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/illhss8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is illhss8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=4 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/illhssb8.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/illhssb8.mf
deleted file mode 100644
index 3b3ba635583..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/illhssb8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is illhssb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=4 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/illhssi8.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/illhssi8.mf
deleted file mode 100644
index 54d652a7a1b..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/illhssi8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is illhssi8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=4 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr10.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr10.mf
deleted file mode 100644
index 114d6ce21b6..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhbr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr17.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr17.mf
deleted file mode 100644
index 7aeaeccd844..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr17.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhbr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr8.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr8.mf
deleted file mode 100644
index feec49dcfa1..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhbr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr9.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr9.mf
deleted file mode 100644
index 3398af350ca..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbr9.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhbr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrbx10.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrbx10.mf
deleted file mode 100644
index decd3f0be1b..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrbx10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhbrbx10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl10.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl10.mf
deleted file mode 100644
index 09e0d670452..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhbrsl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl17.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl17.mf
deleted file mode 100644
index d748716fd1d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl17.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhbrsl17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl8.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl8.mf
deleted file mode 100644
index c2c890098ec..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhbrsl8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl9.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl9.mf
deleted file mode 100644
index af79f872c2b..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhbrsl9.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhbrsl9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhccsc10.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhccsc10.mf
deleted file mode 100644
index 2e7867dcd65..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhccsc10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhccsc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcodes.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcodes.mf
deleted file mode 100644
index 85ffe5a1958..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcodes.mf
+++ /dev/null
@@ -1,87 +0,0 @@
-% This is lhcodes.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-CYR_.A := hex"80";
-CYR_.a := hex"a0";
-CYR_.B := hex"81";
-CYR_.b := hex"a1";
-CYR_.V := hex"82";
-CYR_.v := hex"a2";
-CYR_.G := hex"83";
-CYR_.g := hex"a3";
-CYR_.D := hex"84";
-CYR_.d := hex"a4";
-CYR_.E := hex"85";
-CYR_.e := hex"a5";
-CYR_.ZH := hex"86";
-CYR_.zh := hex"a6";
-CYR_.Z := hex"87";
-CYR_.z := hex"a7";
-CYR_.I := hex"88";
-CYR_.i := hex"a8";
-CYR_.I_shrt := hex"89";
-CYR_.i_shrt := hex"a9";
-CYR_.K := hex"8a";
-CYR_.k := hex"aa";
-CYR_.L := hex"8b";
-CYR_.l := hex"ab";
-CYR_.M := hex"8c";
-CYR_.m := hex"ac";
-CYR_.N := hex"8d";
-CYR_.n := hex"ad";
-CYR_.O := hex"8e";
-CYR_.o := hex"ae";
-CYR_.P := hex"8f";
-CYR_.p := hex"af";
-CYR_.R := hex"90";
-CYR_.r := hex"e0";
-CYR_.S := hex"91";
-CYR_.s := hex"e1";
-CYR_.T := hex"92";
-CYR_.t := hex"e2";
-CYR_.U := hex"93";
-CYR_.u := hex"e3";
-CYR_.F := hex"94";
-CYR_.f := hex"e4";
-CYR_.H := hex"95";
-CYR_.h := hex"e5";
-CYR_.C := hex"96";
-CYR_.c := hex"e6";
-CYR_.CH := hex"97";
-CYR_.ch := hex"e7";
-CYR_.SH := hex"98";
-CYR_.sh := hex"e8";
-CYR_.SHCH := hex"99";
-CYR_.shch := hex"e9";
-CYR_.HRDSN := hex"9a";
-CYR_.hrdsn := hex"ea";
-CYR_.ERY := hex"9b";
-CYR_.ery := hex"eb";
-CYR_.SFTSN := hex"9c";
-CYR_.sftsn := hex"ec";
-CYR_.EREV := hex"9d";
-CYR_.erev := hex"ed";
-CYR_.YU := hex"9e";
-CYR_.yu := hex"ee";
-CYR_.YA := hex"9f";
-CYR_.ya := hex"ef";
-CYR_.YO := hex"f0";
-CYR_.yo := hex"f1";
-CYR_.LAT_I := hex"f6";
-CYR_.lat_i := hex"f7";
-CYR_.G_up := hex"f2";
-CYR_.g_up := hex"f3";
-CYR_.UKR_I := hex"f8";
-CYR_.ukr_i := hex"f9";
-CYR_.U_shrt := hex"fa";
-CYR_.u_shrt := hex"fb";
-CYR_.UKR_E := hex"f4";
-CYR_.ukr_e := hex"f5";
-CYR_.dash := hex"c4";
-CYR_.No := hex"fc";
-CYR_.currency := hex"c5";
-CYR_.baseqq := hex"ff";
-CYR_.flqq := hex"fd";
-CYR_.frqq := hex"fe";
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr10.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr10.mf
deleted file mode 100644
index 40e7aa708bd..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhcr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr5.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr5.mf
deleted file mode 100644
index 262c0003bae..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhcr5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr6.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr6.mf
deleted file mode 100644
index 3fb02019815..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhcr6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr7.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr7.mf
deleted file mode 100644
index 710eebf080c..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhcr7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr8.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr8.mf
deleted file mode 100644
index f5c8babc796..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhcr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr9.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr9.mf
deleted file mode 100644
index 70c37152c0d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhcr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcsl10.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcsl10.mf
deleted file mode 100644
index a582491c286..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcsl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhcsl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcsl9.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcsl9.mf
deleted file mode 100644
index 13f51240b13..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcsl9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhcsl9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcslc9.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcslc9.mf
deleted file mode 100644
index 96e91dff167..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcslc9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhcslc9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcti10.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcti10.mf
deleted file mode 100644
index 4db2347c24a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhcti10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lhcti10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhliker.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhliker.mf
deleted file mode 100644
index 9ecb744dbf2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhliker.mf
+++ /dev/null
@@ -1,1197 +0,0 @@
-% This is lhliker.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-
-beginligtable
- labelchar (
- CYR_.HRDSN
- ,CYR_.SFTSN
- );
- setkern [k#] (
- CYR_.ZH
- ,CYR_.H
- );
- labelchar (
- CYR_.A
- if serifs:
- fi
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.S
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.CH
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.u
- ,CYR_.u_shrt
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- );
- setkern [kk#] (
- CYR_.ch
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.k
- ,CYR_.n
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.ukr_i
- ,CYR_.lat_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-if concrete:
-
- beginligtable
- labelchar ( CYR_.D );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.S
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.CH
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.u
- ,CYR_.u_shrt
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.t
- ,CYR_.hrdsn
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.k
- ,CYR_.n
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.ukr_i
- ,CYR_.lat_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.L );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.S
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.CH
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.u
- ,CYR_.u_shrt
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.t
- ,CYR_.hrdsn
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.k
- ,CYR_.n
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.ukr_i
- ,CYR_.lat_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-fi
-
-beginligtable
- labelchar ( CYR_.K );
- labelchar (
- CYR_.ZH
- ,CYR_.H
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.S
- ,CYR_.UKR_E
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- );
- else:
- setkern [k#] (
- CYR_.ch
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- );
- fi
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.O
- ,CYR_.F
- ,CYR_.YU
- ,CYR_.EREV
- );
- setkern [k#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- ,CYR_.ZH
- ,CYR_.H
- ,CYR_.U
- ,CYR_.U_shrt
- if serifs:
- ,CYR_.YA
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- fi
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.u
- ,CYR_.u_shrt
- if serifs:
- ,CYR_.ya
- fi
- );
- elseif ROMANfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar ( CYR_.T );
- labelchar (
- CYR_.G
- );
- setkern [kk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- fi
- );
- if not concrete:
- if serifs:
- setkern [k#] (
- CYR_.L
- );
- else:
- setkern [-u#] (
- CYR_.L
- );
- fi
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- fi
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.u
- ,CYR_.u_shrt
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.f
- );
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- ,CYR_.g_up
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.G_up
- );
- setkern [kk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- fi
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.S
- ,CYR_.UKR_E
- );
- if not concrete:
- if serifs:
- setkern [k#] (
- CYR_.L
- );
- else:
- setkern [-u#] (
- CYR_.L
- );
- fi
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- fi
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.u
- ,CYR_.u_shrt
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.f
- );
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- ,CYR_.g_up
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.U
- ,CYR_.U_shrt
- );
- if serifs:
- setkern [kk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- fi
- ,CYR_.YA
- );
- if not concrete:
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- );
- fi
- else:
- setkern [k#] (
- CYR_.A
- );
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- );
- fi
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.S
- ,CYR_.UKR_E
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [kk#] (
- if concrete:
- CYR_.d
- ,CYR_.l
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- );
- else:
- if serifs:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.ukr_e
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.ukr_e
- );
- fi
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- ,CYR_.g_up
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.R
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.D
- ,CYR_.L
- if serifs:
- ,CYR_.YA
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.e
- ,CYR_.yo
- );
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- );
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.LAT_I
- ,CYR_.UKR_I
- );
- setkern [-k#] (
- CYR_.LAT_I
- ,CYR_.UKR_I
- );
- endligtable;
-
-if TITLEfont: endinput \\ fi;
-
-if SmallCapsfont:
-
- u#:=lower.u#;
- k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#;
-
-
-
- beginligtable
- labelchar (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- fi
- if SmallCapsfont:
- fi
- if SmallCapsfont:
- fi
- if serifs:
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- );
- endligtable;
-
- if concrete:
-
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.zh
- ,CYR_.h
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.o
- ,CYR_.f
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.erev
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.u
- ,CYR_.u_shrt
- if serifs:
- ,CYR_.ya
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.g
- ,CYR_.g_up
- ,CYR_.r
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- if serifs:
- ,CYR_.ya
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- ,CYR_.u_shrt
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.lat_i
- ,CYR_.ukr_i
- );
- setkern [-k#] (
- CYR_.lat_i
- ,CYR_.ukr_i
- );
- endligtable;
-
-else:
-
- if ROMANfont:
-
-
- beginligtable
- labelchar (
- CYR_.a
- );
- setkern [k#] (
- CYR_.ch
- ,CYR_.u
- ,CYR_.u_shrt
- if serifs:
- fi
- );
- endligtable;
-
- if concrete:
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.ch
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.ch
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- );
- endligtable;
-
- fi
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.g
- ,CYR_.g_up
- if kapitel:
- ,CYR_.r
- fi
- );
- if serifs:
- setkern [k#] (
- CYR_.a
- );
- fi
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ya
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.zh
- ,CYR_.h
- );
- setkern [k#] (
- CYR_.a
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.e
- ,CYR_.yo
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.lat_i
- );
- setkern [-k#] (
- CYR_.ukr_i
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.ukr_i
- );
- setkern [-k#] (
- CYR_.lat_i
- );
- setkern [-kk#] (
- CYR_.ukr_i
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- ,CYR_.u_shrt
- );
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.ya
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- );
- setkern [-u#] (
- CYR_.d
- ,CYR_.l
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
- else:
-
-
- beginligtable
- labelchar ( CYR_.e );
- labelchar (
- CYR_.yo
- );
- setkern [-u#] (
- CYR_.f
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.g_up
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.g_up
- );
- setkern [kkk#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.g_up
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.ukr_i
- );
- labelchar (
- CYR_.lat_i
- );
- setkern [-k#] (
- CYR_.ukr_i
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.g_up
- ,CYR_.hrdsn
- );
- setkern [kk#] (
- CYR_.ch
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar (
- CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- fi
- if SmallCapsfont:
- fi
- if SmallCapsfont:
- fi
- if kapitel:
- ,CYR_.a
- fi
- );
- if ROMANfont:
- setkern [-u#] (
- CYR_.u
- ,CYR_.u_shrt
- );
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- );
- if concrete:
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- );
- fi
- else:
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.g_up
- ,CYR_.hrdsn
- );
- fi
- setkern [kk#] (
- CYR_.ch
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.f
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.s );
- labelchar (
- CYR_.o
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.r
- ,CYR_.f
- ,CYR_.erev
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.d
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [-u#] (
- CYR_.f
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.g_up
- );
- fi
- endligtable;
-
-fi
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhsltl10.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhsltl10.mf
deleted file mode 100644
index 6d7bd755f68..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhsltl10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhsltl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhtl10.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/lhtl10.mf
deleted file mode 100644
index 4126b52b632..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/lhtl10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lhtl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/llhss8.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/llhss8.mf
deleted file mode 100644
index bbefe708596..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/llhss8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is llhss8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/llhssb8.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/llhssb8.mf
deleted file mode 100644
index 577a78a0e6e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/llhssb8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is llhssb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-lcy/llhssi8.mf b/Master/texmf-dist/fonts/source/lh/lh-lcy/llhssi8.mf
deleted file mode 100644
index 663178c989e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-lcy/llhssi8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is llhssi8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnss8.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnss8.mf
deleted file mode 100644
index 23a9b1acd17..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnss8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilwnss8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=4 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnssb8.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnssb8.mf
deleted file mode 100644
index bbd9e5dc022..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnssb8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilwnssb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=4 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnssi8.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnssi8.mf
deleted file mode 100644
index 3d06ed00815..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/ilwnssi8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilwnssi8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=4 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/iwncsc10.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/iwncsc10.mf
deleted file mode 100644
index 16c8d42fb00..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/iwncsc10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is iwncsc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/iwntt8.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/iwntt8.mf
deleted file mode 100644
index 02dff70aa4a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/iwntt8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is iwntt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/lwnss8.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/lwnss8.mf
deleted file mode 100644
index 5296b05404a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/lwnss8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lwnss8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/lwnssb8.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/lwnssb8.mf
deleted file mode 100644
index 052f3f1bee0..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/lwnssb8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lwnssb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/lwnssi8.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/lwnssi8.mf
deleted file mode 100644
index ddf6ca479d1..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/lwnssi8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lwnssi8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr10.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr10.mf
deleted file mode 100644
index 55c76b74f7f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wnbr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr17.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr17.mf
deleted file mode 100644
index e921b2f71af..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr17.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wnbr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr8.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr8.mf
deleted file mode 100644
index 04e4397f5d6..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wnbr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr9.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr9.mf
deleted file mode 100644
index 68df450071a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbr9.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wnbr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrbx10.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrbx10.mf
deleted file mode 100644
index f115cb90d16..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrbx10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wnbrbx10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl10.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl10.mf
deleted file mode 100644
index 9758e80a9bc..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wnbrsl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl17.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl17.mf
deleted file mode 100644
index 1e326bd1dde..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl17.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wnbrsl17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl8.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl8.mf
deleted file mode 100644
index 86879e80567..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wnbrsl8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl9.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl9.mf
deleted file mode 100644
index 9a3271e4ca5..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnbrsl9.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wnbrsl9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnccsc10.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnccsc10.mf
deleted file mode 100644
index 4ca28ece2a7..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnccsc10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wnccsc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncodes.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncodes.mf
deleted file mode 100644
index 170d0cd5b6d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncodes.mf
+++ /dev/null
@@ -1,103 +0,0 @@
-% This is wncodes.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-CYR_.A := hex"41";
-CYR_.a := hex"61";
-CYR_.B := hex"42";
-CYR_.b := hex"62";
-CYR_.V := hex"56";
-CYR_.v := hex"76";
-CYR_.G := hex"47";
-CYR_.g := hex"67";
-CYR_.D := hex"44";
-CYR_.d := hex"64";
-CYR_.E := hex"45";
-CYR_.e := hex"65";
-CYR_.ZH := hex"11";
-CYR_.zh := hex"19";
-CYR_.Z := hex"5a";
-CYR_.z := hex"7a";
-CYR_.I := hex"49";
-CYR_.i := hex"69";
-CYR_.I_shrt := hex"12";
-CYR_.i_shrt := hex"1a";
-CYR_.K := hex"4b";
-CYR_.k := hex"6b";
-CYR_.L := hex"4c";
-CYR_.l := hex"6c";
-CYR_.M := hex"4d";
-CYR_.m := hex"6d";
-CYR_.N := hex"4e";
-CYR_.n := hex"6e";
-CYR_.O := hex"4f";
-CYR_.o := hex"6f";
-CYR_.P := hex"50";
-CYR_.p := hex"70";
-CYR_.R := hex"52";
-CYR_.r := hex"72";
-CYR_.S := hex"53";
-CYR_.s := hex"73";
-CYR_.T := hex"54";
-CYR_.t := hex"74";
-CYR_.U := hex"55";
-CYR_.u := hex"75";
-CYR_.F := hex"46";
-CYR_.f := hex"66";
-CYR_.H := hex"48";
-CYR_.h := hex"68";
-CYR_.C := hex"43";
-CYR_.c := hex"63";
-CYR_.CH := hex"51";
-CYR_.ch := hex"71";
-CYR_.SH := hex"58";
-CYR_.sh := hex"78";
-CYR_.SHCH := hex"57";
-CYR_.shch := hex"77";
-CYR_.HRDSN := hex"5f";
-CYR_.hrdsn := hex"7f";
-CYR_.ERY := hex"59";
-CYR_.ery := hex"79";
-CYR_.SFTSN := hex"5e";
-CYR_.sftsn := hex"7e";
-CYR_.EREV := hex"03";
-CYR_.erev := hex"0b";
-CYR_.YU := hex"10";
-CYR_.yu := hex"18";
-CYR_.YA := hex"17";
-CYR_.ya := hex"1f";
-CYR_.YO := hex"13";
-CYR_.yo := hex"1b";
-CYR_.DJE := hex"06";
-CYR_.dje := hex"0e";
-CYR_.TSHE := hex"07";
-CYR_.tshe := hex"0f";
-CYR_.LAT_I := hex"04";
-CYR_.lat_i := hex"0c";
-CYR_.LAT_J := hex"4a";
-CYR_.lat_j := hex"6a";
-CYR_.LJE := hex"01";
-CYR_.lje := hex"09";
-CYR_.NJE := hex"00";
-CYR_.nje := hex"08";
-CYR_.LAT_S := hex"16";
-CYR_.lat_s := hex"1e";
-CYR_.DZHE := hex"02";
-CYR_.dzhe := hex"0a";
-CYR_.YAT := hex"23";
-CYR_.yat := hex"2b";
-CYR_.IZH := hex"14";
-CYR_.izh := hex"1c";
-CYR_.UKR_E := hex"05";
-CYR_.ukr_e := hex"0d";
-CYR_.Aacute := hex"26";
-CYR_.Aumlaut := hex"20";
-CYR_.Abreve := hex"40";
-CYR_.Acyrbreve := hex"24";
-CYR_.i_dotl := hex"3d";
-CYR_.No := hex"7d";
-CYR_.flqq := hex"3c";
-CYR_.frqq := hex"3e";
-CYR_.FITA := hex"15";
-CYR_.fita := hex"1d";
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr10.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr10.mf
deleted file mode 100644
index e4d3f4c214a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wncr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr5.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr5.mf
deleted file mode 100644
index 45ef606df38..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wncr5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr6.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr6.mf
deleted file mode 100644
index 0d89a230c73..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wncr6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr7.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr7.mf
deleted file mode 100644
index 2a8520f5357..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wncr7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr8.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr8.mf
deleted file mode 100644
index aa8b7bb32bd..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wncr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr9.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr9.mf
deleted file mode 100644
index 88fd6cd5680..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wncr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncsl10.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncsl10.mf
deleted file mode 100644
index bcfac2c8dfe..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncsl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wncsl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncsl9.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncsl9.mf
deleted file mode 100644
index cab9f41bc07..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncsl9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wncsl9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncslc9.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncslc9.mf
deleted file mode 100644
index a327ad049b0..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncslc9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wncslc9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncti10.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wncti10.mf
deleted file mode 100644
index 494535f2c69..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wncti10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is wncti10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnliker.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnliker.mf
deleted file mode 100644
index 54be45ccd61..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnliker.mf
+++ /dev/null
@@ -1,1543 +0,0 @@
-% This is wnliker.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-beginligtable
- labelchar ([ASCII"["]);
- setlig ([ASCII"["],CYR_.flqq); endligtable;
-
-beginligtable
- labelchar ([ASCII"]"]);
- setlig ([ASCII"]"],CYR_.frqq); endligtable;
-
-if not concrete:
- beginligtable
- labelchar (CYR_.D);
- setlig([ASCII "1"],CYR_.DJE);
- setlig([ASCII "2"],CYR_.DZHE); setlig([ASCII "3"],CYR_.LAT_S);
- setlig([ASCII "J"],CYR_.DJE); setlig([ASCII "j"],CYR_.DJE);
- endligtable;
-
- beginligtable
- labelchar (CYR_.L);
- setlig([ASCII "1"],CYR_.LJE);
- setlig([ASCII "J"],CYR_.LJE); setlig([ASCII "j"],CYR_.LJE);
- endligtable;
-fi
-
-beginligtable
- labelchar (CYR_.Z);
- setlig([ASCII "1"],CYR_.ZH);
- setlig([ASCII "H"],CYR_.ZH); setlig([ASCII "h"],CYR_.ZH);
-endligtable;
-
-beginligtable
- labelchar (CYR_.E);
- setlig([ASCII "0"],CYR_.YO);
- setlig([ASCII "1"],CYR_.EREV); setlig([ASCII "2"],CYR_.UKR_E);
-endligtable;
-
-beginligtable
- labelchar (CYR_.S);
- setlig([ASCII "H"],CYR_.SH); setlig([ASCII "h"],CYR_.SH);
-endligtable;
-
-beginligtable
- labelchar (CYR_.C);
- setlig([ASCII "1"],CYR_.TSHE);
- setlig([ASCII "H"],CYR_.CH); setlig([ASCII "h"],CYR_.CH);
-endligtable;
-
-if not TITLEfont:
-
- if SmallCapsfont:
-
- beginligtable
- labelchar (CYR_.z);
- setlig([ASCII "1"],CYR_.zh); setlig([ASCII "h"],CYR_.zh);
- endligtable;
-
- beginligtable
- labelchar (CYR_.e);
- setlig([ASCII "0"],CYR_.yo); setlig([ASCII "1"],CYR_.erev);
- setlig([ASCII "2"],CYR_.ukr_e);
- endligtable;
-
- beginligtable
- labelchar (CYR_.s);
- setlig([ASCII "h"],CYR_.sh);
- endligtable;
-
- beginligtable
- labelchar (CYR_.c);
- setlig([ASCII "1"],CYR_.tshe); setlig([ASCII "h"],CYR_.ch);
- endligtable;
-
- else:
-
- beginligtable
- labelchar (CYR_.z);
- setlig([ASCII "1"],CYR_.zh); setlig([ASCII "h"],CYR_.zh);
- endligtable;
-
- beginligtable
- labelchar (CYR_.c);
- setlig([ASCII "1"],CYR_.tshe); setlig([ASCII "h"],CYR_.ch);
- endligtable;
-
- if ROMANfont:
-
- beginligtable
- labelchar (CYR_.e);
- setlig([ASCII "0"],CYR_.yo); setlig([ASCII "1"],CYR_.erev);
- setlig([ASCII "2"],CYR_.ukr_e);
- endligtable;
-
- else:
-
- beginligtable
- labelchar (CYR_.k); setlig([ASCII "h"],CYR_.h);
- endligtable;
-
- beginligtable
- labelchar (CYR_.t); setlig([ASCII "s"],CYR_.c);
- endligtable;
-
- fi
-
- fi
-
- if not concrete:
- beginligtable
- labelchar (CYR_.d);
- setlig([ASCII "1"],CYR_.dje); setlig([ASCII "2"],CYR_.dzhe);
- setlig([ASCII "3"],CYR_.lat_s); setlig([ASCII "j"],CYR_.dje);
- endligtable;
-
- if ROMANfont:
- beginligtable
- labelchar (CYR_.l);
- setlig([ASCII "1"],CYR_.lje); setlig([ASCII "j"],CYR_.lje);
- endligtable;
- fi
-
- fi
-
-
- beginligtable
- labelchar (CYR_.i);
- setlig([ASCII "0"],CYR_.i_shrt); setlig([ASCII "1"],CYR_.lat_i);
- endligtable;
-
- beginligtable
- labelchar (CYR_.n);
- setlig([ASCII "1"],CYR_.nje); setlig([ASCII "j"],CYR_.nje);
- endligtable;
-
- beginligtable
- labelchar (CYR_.lat_j);
- setlig([ASCII "1"],CYR_.ya); setlig([ASCII "2"],CYR_.yu);
- endligtable;
-
- beginligtable
- labelchar ([ASCII "p"]);
- setlig([ASCII "1"],CYR_.sftsn); setlig([ASCII "2"],CYR_.hrdsn);
- endligtable;
-
- beginligtable
- labelchar ([ASCII "7"]);
- setlig([ASCII "h"],CYR_.shch);
- endligtable;
-
- beginligtable
- labelchar ([ASCII "x"]);
- setlig([ASCII "q"],CYR_.shch); setlig([ASCII "c"],[ASCII "7"]);
- endligtable;
-
- beginligtable
- labelchar ([ASCII "y"]);
- setlig([ASCII "a"],CYR_.ya); setlig([ASCII "u"],CYR_.yu);
- endligtable;
-
-fi
-
-beginligtable
- labelchar (CYR_.I);
- setlig([ASCII "0"],CYR_.I_shrt); setlig([ASCII "1"],CYR_.LAT_I);
-endligtable;
-
-beginligtable
- labelchar (CYR_.N);
- setlig([ASCII "0"],CYR_.No); setlig([ASCII "1"],CYR_.NJE);
- setlig([ASCII "J"],CYR_.NJE); setlig([ASCII "j"],CYR_.NJE);
-endligtable;
-
-beginligtable
- labelchar (CYR_.LAT_J);
- setlig([ASCII "1"],CYR_.YA); setlig([ASCII "2"],CYR_.YU);
-endligtable;
-
-beginligtable
- labelchar ([ASCII "P"]);
- setlig([ASCII "1"],CYR_.SFTSN); setlig([ASCII "2"],CYR_.HRDSN);
-endligtable;
-
-beginligtable
- labelchar ([ASCII "6"]);
- setlig([ASCII "h"],CYR_.SHCH); setlig([ASCII "H"],CYR_.SHCH);
-endligtable;
-
-beginligtable
- labelchar ([ASCII "X"]);
- setlig([ASCII "Q"],CYR_.SHCH); setlig([ASCII "q"],CYR_.SHCH);
- setlig([ASCII "C"],[ASCII "6"]); setlig([ASCII "c"],[ASCII "6"]);
-endligtable;
-
-beginligtable
- labelchar ([ASCII "Y"]);
- setlig([ASCII "A"],CYR_.YA); setlig([ASCII "a"],CYR_.YA);
- setlig([ASCII "U"],CYR_.YU); setlig([ASCII "u"],CYR_.YU);
-endligtable;
-
-
-
-beginligtable
- labelchar (
- CYR_.HRDSN
- ,CYR_.SFTSN
- ,CYR_.DJE
- ,CYR_.LJE
- ,CYR_.NJE
- ,CYR_.YAT
- );
- setkern [k#] (
- CYR_.ZH
- ,CYR_.H
- );
- labelchar (
- CYR_.A
- if serifs:
- fi
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.FITA
- ,CYR_.S
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.DJE
- ,CYR_.TSHE
- ,CYR_.YAT
- ,CYR_.CH
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- );
- setkern [kkk#] (
- CYR_.IZH
- );
- else:
- setkern [k#] (
- CYR_.U
- );
- setkern [kk#] (
- CYR_.IZH
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- );
- setkern [kk#] (
- CYR_.ch
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.izh
- ,CYR_.k
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.yat
- ,CYR_.lat_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- );
- fi
- fi
- endligtable;
-
-if concrete:
-
- beginligtable
- labelchar ( CYR_.D );
- setlig([ASCII "1"],CYR_.DJE);
- setlig([ASCII "2"],CYR_.DZHE); setlig([ASCII "3"],CYR_.LAT_S);
- setlig([ASCII "J"],CYR_.DJE); setlig([ASCII "j"],CYR_.DJE);
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.FITA
- ,CYR_.S
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.DJE
- ,CYR_.TSHE
- ,CYR_.YAT
- ,CYR_.CH
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- );
- setkern [kkk#] (
- CYR_.IZH
- );
- else:
- setkern [k#] (
- CYR_.U
- );
- setkern [kk#] (
- CYR_.IZH
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.izh
- ,CYR_.k
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.yat
- ,CYR_.lat_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- );
- fi
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.L );
- setlig([ASCII "1"],CYR_.LJE); setlig([ASCII "J"],CYR_.LJE);
- setlig([ASCII "j"],CYR_.LJE);
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.FITA
- ,CYR_.S
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.DJE
- ,CYR_.TSHE
- ,CYR_.YAT
- ,CYR_.CH
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- );
- setkern [kkk#] (
- CYR_.IZH
- );
- else:
- setkern [k#] (
- CYR_.U
- );
- setkern [kk#] (
- CYR_.IZH
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.izh
- ,CYR_.k
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.yat
- ,CYR_.lat_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- );
- fi
- fi
- endligtable;
-
-fi
-
-beginligtable
- labelchar ( CYR_.K );
- setlig([ASCII "H"],CYR_.H); setlig([ASCII "h"],CYR_.H);
- labelchar (
- CYR_.ZH
- ,CYR_.H
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.FITA
- ,CYR_.S
- ,CYR_.UKR_E
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- );
- else:
- setkern [k#] (
- CYR_.ch
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- );
- fi
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.O
- ,CYR_.F
- ,CYR_.FITA
- ,CYR_.YU
- ,CYR_.EREV
- );
- setkern [k#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- ,CYR_.ZH
- ,CYR_.H
- ,CYR_.U
- ,CYR_.IZH
- if serifs:
- ,CYR_.YA
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- fi
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.u
- ,CYR_.izh
- if serifs:
- ,CYR_.ya
- fi
- );
- elseif ROMANfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar ( CYR_.T );
- setlig([ASCII "S"],CYR_.C); setlig([ASCII "s"],CYR_.C);
- labelchar (
- CYR_.G
- );
- setkern [kk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- fi
- );
- if not concrete:
- if serifs:
- setkern [k#] (
- CYR_.L
- ,CYR_.LJE
- );
- else:
- setkern [-u#] (
- CYR_.L
- ,CYR_.LJE
- );
- fi
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- fi
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.u
- ,CYR_.izh
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.fita
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.f
- );
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.izh
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.IZH
- );
- if serifs:
- setkern [kkk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- fi
- ,CYR_.YA
- );
- else:
- setkern [kk#] (
- CYR_.A
- );
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- );
- fi
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.FITA
- ,CYR_.S
- ,CYR_.UKR_E
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [kk#] (
- if concrete:
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- );
- else:
- if serifs:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.fita
- ,CYR_.e
- ,CYR_.yo
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.fita
- ,CYR_.e
- ,CYR_.yo
- );
- fi
- if ROMANfont:
- if serifs:
- setkern [kkk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- fi
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.izh
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.U
- );
- if serifs:
- setkern [kk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- fi
- ,CYR_.YA
- );
- if not concrete:
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- );
- fi
- else:
- setkern [k#] (
- CYR_.A
- );
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- );
- fi
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.FITA
- ,CYR_.S
- ,CYR_.UKR_E
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [kk#] (
- if concrete:
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- );
- else:
- if serifs:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.fita
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.ukr_e
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.fita
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.ukr_e
- );
- fi
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.izh
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.R
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- if serifs:
- ,CYR_.YA
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.fita
- ,CYR_.e
- ,CYR_.yo
- );
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- );
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.LAT_I
- );
- setkern [-k#] (
- CYR_.LAT_I
- );
- endligtable;
-
-if TITLEfont: endinput \\ fi;
-
-if SmallCapsfont:
-
- u#:=lower.u#;
- k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#;
-
-
-
- beginligtable
- labelchar (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- ,CYR_.dje
- fi
- ,CYR_.lje
- ,CYR_.nje
- ,CYR_.yat
- if SmallCapsfont:
- fi
- if SmallCapsfont:
- fi
- if serifs:
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- endligtable;
-
- if concrete:
-
-
- beginligtable
- labelchar ( CYR_.d );
- setlig([ASCII "1"],CYR_.dje); setlig([ASCII "2"],CYR_.dzhe);
- setlig([ASCII "3"],CYR_.lat_s); setlig([ASCII "j"],CYR_.dje);
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setlig([ASCII "1"],CYR_.lje); setlig([ASCII "j"],CYR_.lje);
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.ch
- );
- setkern [kk#] (
- CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar ( CYR_.k );
- setlig([ASCII "h"],CYR_.h);
- labelchar (
- CYR_.zh
- ,CYR_.h
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.erev
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.u
- ,CYR_.izh
- if serifs:
- ,CYR_.ya
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.t );
- setlig([ASCII "s"],CYR_.C);
- labelchar (
- CYR_.g
- ,CYR_.r
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- if serifs:
- ,CYR_.ya
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.izh
- );
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.lat_i
- );
- setkern [-k#] (
- CYR_.lat_i
- );
- endligtable;
-
-else:
-
- if ROMANfont:
-
-
- beginligtable
- labelchar (
- CYR_.a
- );
- setkern [k#] (
- CYR_.ch
- ,CYR_.u
- if serifs:
- ,CYR_.izh
- fi
- );
- endligtable;
-
- if concrete:
-
- beginligtable
- labelchar ( CYR_.d );
- setlig([ASCII "1"],CYR_.dje); setlig([ASCII "2"],CYR_.dzhe);
- setlig([ASCII "3"],CYR_.lat_s); setlig([ASCII "j"],CYR_.dje);
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.ch
- ,CYR_.u
- ,CYR_.izh
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setlig([ASCII "1"],CYR_.lje); setlig([ASCII "j"],CYR_.lje);
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.ch
- ,CYR_.u
- ,CYR_.izh
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- );
- endligtable;
-
- fi
-
- beginligtable
- labelchar ( CYR_.t );
- setlig([ASCII "s"],CYR_.c);
- labelchar (
- CYR_.g
- if kapitel:
- ,CYR_.r
- fi
- );
- if serifs:
- setkern [k#] (
- CYR_.a
- );
- fi
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ya
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.k );
- setlig([ASCII "h"],CYR_.h);
- labelchar (
- CYR_.zh
- ,CYR_.h
- );
- setkern [k#] (
- CYR_.a
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.e
- ,CYR_.yo
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- ,CYR_.izh
- );
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.fita
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.ya
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- );
- setkern [-u#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
- else:
-
-
- beginligtable
- labelchar ( CYR_.e );
- setlig([ASCII "0"],CYR_.yo); setlig([ASCII "1"],CYR_.erev);
-setlig([ASCII "2"],CYR_.ukr_e);
- labelchar (
- CYR_.yo
- );
- setkern [-u#] (
- CYR_.f
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.izh
- );
- setkern [kk#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setlig([ASCII "1"],CYR_.lje); setlig([ASCII "j"],CYR_.lje);
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.izh
- ,CYR_.hrdsn
- );
- setkern [kk#] (
- CYR_.ch
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar (
- CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- ,CYR_.dje
- fi
- ,CYR_.lje
- ,CYR_.nje
- ,CYR_.yat
- if SmallCapsfont:
- fi
- if SmallCapsfont:
- fi
- if kapitel:
- ,CYR_.a
- fi
- );
- if ROMANfont:
- setkern [-u#] (
- CYR_.u
- ,CYR_.izh
- );
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- );
- if concrete:
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- );
- fi
- else:
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.izh
- ,CYR_.hrdsn
- );
- fi
- setkern [kk#] (
- CYR_.ch
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.fita
- ,CYR_.f
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.s );
- setlig([ASCII "h"],CYR_.sh);
- labelchar (
- CYR_.o
- ,CYR_.fita
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.r
- ,CYR_.f
- ,CYR_.erev
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.d
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [-u#] (
- CYR_.f
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- );
- fi
- endligtable;
-
-fi
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnsltl10.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wnsltl10.mf
deleted file mode 100644
index c768eec4a0c..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wnsltl10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wnsltl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-ot2/wntl10.mf b/Master/texmf-dist/fonts/source/lh/lh-ot2/wntl10.mf
deleted file mode 100644
index 37246ec44c9..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-ot2/wntl10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is wntl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/ilalb8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/ilalb8.mf
deleted file mode 100644
index 676f5d84965..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/ilalb8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilalb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/ilali8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/ilali8.mf
deleted file mode 100644
index f74a709c37e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/ilali8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilali8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/ilalo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/ilalo8.mf
deleted file mode 100644
index f0a33eb5d14..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/ilalo8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilalo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/ilalq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/ilalq8.mf
deleted file mode 100644
index e77dbb14d31..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/ilalq8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilalq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/ilaltt8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/ilaltt8.mf
deleted file mode 100644
index 65a7ed7fdcc..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/ilaltt8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilaltt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labbx10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labbx10.mf
deleted file mode 100644
index 38ee6d17ab9..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labbx10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labbx10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo10.mf
deleted file mode 100644
index f518f6ccb19..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labmo10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo17.mf
deleted file mode 100644
index 0250c415437..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labmo17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo8.mf
deleted file mode 100644
index 523404f68d0..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labmo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo9.mf
deleted file mode 100644
index e6ce8b20c85..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmo9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labmo9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr10.mf
deleted file mode 100644
index 08155f26ad9..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labmr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr17.mf
deleted file mode 100644
index 4202b450199..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labmr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr8.mf
deleted file mode 100644
index 8cb0ac9da8f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labmr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr9.mf
deleted file mode 100644
index 67de25168d5..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labmr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labmr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labso10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labso10.mf
deleted file mode 100644
index f18f4d3abd8..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labso10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labso10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labso17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labso17.mf
deleted file mode 100644
index 658a6d2a23f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labso17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labso17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labso8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labso8.mf
deleted file mode 100644
index 109b8584c0c..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labso8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labso8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labso9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labso9.mf
deleted file mode 100644
index bce07add583..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labso9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labso9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr10.mf
deleted file mode 100644
index 8086929b025..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labsr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr17.mf
deleted file mode 100644
index 7221224a068..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labsr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr8.mf
deleted file mode 100644
index bd1362e9b49..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labsr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr9.mf
deleted file mode 100644
index c460b1629bb..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labsr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labsr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labtl10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labtl10.mf
deleted file mode 100644
index 1721459c433..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labtl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labtl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input exbase; def cmbright=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/labto10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/labto10.mf
deleted file mode 100644
index e297aa8ab2e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/labto10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is labto10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input exbase; def cmbright=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/lacodes.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/lacodes.mf
deleted file mode 100644
index 1d1c51aa000..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/lacodes.mf
+++ /dev/null
@@ -1,158 +0,0 @@
-% This is lacodes.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-CYR_.A := hex"c0";
-CYR_.a := hex"e0";
-CYR_.B := hex"c1";
-CYR_.b := hex"e1";
-CYR_.V := hex"c2";
-CYR_.v := hex"e2";
-CYR_.G := hex"c3";
-CYR_.g := hex"e3";
-CYR_.D := hex"c4";
-CYR_.d := hex"e4";
-CYR_.E := hex"c5";
-CYR_.e := hex"e5";
-CYR_.ZH := hex"c6";
-CYR_.zh := hex"e6";
-CYR_.Z := hex"c7";
-CYR_.z := hex"e7";
-CYR_.I := hex"c8";
-CYR_.i := hex"e8";
-CYR_.I_shrt := hex"c9";
-CYR_.i_shrt := hex"e9";
-CYR_.K := hex"ca";
-CYR_.k := hex"ea";
-CYR_.L := hex"cb";
-CYR_.l := hex"eb";
-CYR_.M := hex"cc";
-CYR_.m := hex"ec";
-CYR_.N := hex"cd";
-CYR_.n := hex"ed";
-CYR_.O := hex"ce";
-CYR_.o := hex"ee";
-CYR_.P := hex"cf";
-CYR_.p := hex"ef";
-CYR_.R := hex"d0";
-CYR_.r := hex"f0";
-CYR_.S := hex"d1";
-CYR_.s := hex"f1";
-CYR_.T := hex"d2";
-CYR_.t := hex"f2";
-CYR_.U := hex"d3";
-CYR_.u := hex"f3";
-CYR_.F := hex"d4";
-CYR_.f := hex"f4";
-CYR_.H := hex"d5";
-CYR_.h := hex"f5";
-CYR_.C := hex"d6";
-CYR_.c := hex"f6";
-CYR_.CH := hex"d7";
-CYR_.ch := hex"f7";
-CYR_.SH := hex"d8";
-CYR_.sh := hex"f8";
-CYR_.SHCH := hex"d9";
-CYR_.shch := hex"f9";
-CYR_.HRDSN := hex"da";
-CYR_.hrdsn := hex"fa";
-CYR_.ERY := hex"db";
-CYR_.ery := hex"fb";
-CYR_.SFTSN := hex"dc";
-CYR_.sftsn := hex"fc";
-CYR_.EREV := hex"dd";
-CYR_.erev := hex"fd";
-CYR_.YU := hex"de";
-CYR_.yu := hex"fe";
-CYR_.YA := hex"df";
-CYR_.ya := hex"ff";
-CYR_.YO := hex"9c";
-CYR_.yo := hex"bc";
-CYR_.AE := hex"8c";
-CYR_.ae := hex"ac";
-CYR_.DJE := hex"82";
-CYR_.dje := hex"a2";
-CYR_.TSHE := hex"83";
-CYR_.tshe := hex"a3";
-CYR_.K_vcrs := hex"8b";
-CYR_.k_vcrs := hex"ab";
-CYR_.LJE := hex"87";
-CYR_.lje := hex"a7";
-CYR_.NJE := hex"9b";
-CYR_.nje := hex"bb";
-CYR_.LAT_S := hex"8f";
-CYR_.lat_s := hex"af";
-CYR_.DZHE := hex"96";
-CYR_.dzhe := hex"b6";
-CYR_.CH_vcrs := hex"97";
-CYR_.ch_vcrs := hex"b7";
-CYR_.G_up := hex"80";
-CYR_.g_up := hex"a0";
-CYR_.G_hcrs := hex"81";
-CYR_.g_hcrs := hex"a1";
-CYR_.SHHA := hex"84";
-CYR_.shha := hex"a4";
-CYR_.ZH_dsc := hex"85";
-CYR_.zh_dsc := hex"a5";
-CYR_.Z_dsc := hex"86";
-CYR_.z_dsc := hex"a6";
-CYR_.UKR_I := hex"88";
-CYR_.ukr_i := hex"a8";
-CYR_.K_dsc := hex"89";
-CYR_.k_dsc := hex"a9";
-CYR_.K_beak := hex"8a";
-CYR_.k_beak := hex"aa";
-CYR_.N_dsc := hex"8d";
-CYR_.n_dsc := hex"ad";
-CYR_.NG := hex"8e";
-CYR_.ng := hex"ae";
-CYR_.OTLD := hex"90";
-CYR_.otld := hex"b0";
-CYR_.S_dsc := hex"91";
-CYR_.s_dsc := hex"b1";
-CYR_.U_shrt := hex"92";
-CYR_.u_shrt := hex"b2";
-CYR_.Y := hex"93";
-CYR_.y := hex"b3";
-CYR_.Y_hcrs := hex"94";
-CYR_.y_hcrs := hex"b4";
-CYR_.H_dsc := hex"95";
-CYR_.h_dsc := hex"b5";
-CYR_.CH_rdsc := hex"98";
-CYR_.ch_rdsc := hex"b8";
-CYR_.UKR_E := hex"99";
-CYR_.ukr_e := hex"b9";
-CYR_.SCHWA := hex"9a";
-CYR_.schwa := hex"ba";
-CYR_.Agrave := hex"00";
-CYR_.Aacute := hex"01";
-CYR_.Ahat := hex"02";
-CYR_.Atilde := hex"03";
-CYR_.Aumlaut := hex"04";
-CYR_.Aacute_dbl := hex"05";
-CYR_.Aring := hex"06";
-CYR_.Ahachek := hex"07";
-CYR_.Abreve := hex"08";
-CYR_.Abar := hex"09";
-CYR_.Adot := hex"0a";
-CYR_.Acedilla := hex"0b";
-CYR_.Aogonek := hex"0c";
-CYR_.palochka := hex"0d";
-CYR_.angle_left := hex"0e";
-CYR_.angle_right := hex"0f";
-CYR_.Afrown := hex"12";
-CYR_.Agrave_dbl := hex"13";
-CYR_.Acyrbreve := hex"14";
-CYR_.dash := hex"16";
-CYR_.wordmark := hex"17";
-CYR_.pmzero := hex"18";
-CYR_.i_dotl := hex"19";
-CYR_.j_dotl := hex"1a";
-CYR_.dbl_quotes := hex"22";
-CYR_.No := hex"9d";
-CYR_.currency := hex"9e";
-CYR_.section := hex"9f";
-CYR_.baseqq := hex"bd";
-CYR_.flqq := hex"be";
-CYR_.frqq := hex"bf";
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/lalb8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/lalb8.mf
deleted file mode 100644
index c156bf0cb00..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/lalb8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lalb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/lali8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/lali8.mf
deleted file mode 100644
index 0b56c2dc294..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/lali8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lali8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laliker.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laliker.mf
deleted file mode 100644
index 5f25c8d1103..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laliker.mf
+++ /dev/null
@@ -1,1616 +0,0 @@
-% This is laliker.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-
-beginligtable
- labelchar (
- CYR_.HRDSN
- ,CYR_.SFTSN
- ,CYR_.DJE
- ,CYR_.LJE
- ,CYR_.NJE
- ,CYR_.SHHA
- );
- setkern [k#] (
- CYR_.ZH
- ,CYR_.ZH_dsc
- ,CYR_.H
- ,CYR_.H_dsc
- );
- labelchar (
- CYR_.A
- if serifs:
- fi
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.DJE
- ,CYR_.TSHE
- ,CYR_.K_beak
- ,CYR_.CH
- ,CYR_.CH_rdsc
- ,CYR_.CH_vcrs
- ,CYR_.Y
- ,CYR_.Y_hcrs
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.k_vcrs
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.n_dsc
- ,CYR_.ng
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.ukr_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-if concrete:
-
- beginligtable
- labelchar ( CYR_.D );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.DJE
- ,CYR_.TSHE
- ,CYR_.K_beak
- ,CYR_.CH
- ,CYR_.CH_rdsc
- ,CYR_.CH_vcrs
- ,CYR_.Y
- ,CYR_.Y_hcrs
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.k_vcrs
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.n_dsc
- ,CYR_.ng
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.ukr_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.L );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.DJE
- ,CYR_.TSHE
- ,CYR_.K_beak
- ,CYR_.CH
- ,CYR_.CH_rdsc
- ,CYR_.CH_vcrs
- ,CYR_.Y
- ,CYR_.Y_hcrs
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.k_vcrs
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.n_dsc
- ,CYR_.ng
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.ukr_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-fi
-
-beginligtable
- labelchar ( CYR_.K );
- labelchar (
- CYR_.K_dsc
- ,CYR_.K_vcrs
- ,CYR_.K_beak
- ,CYR_.ZH
- ,CYR_.ZH_dsc
- ,CYR_.H
- ,CYR_.H_dsc
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- );
- else:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- );
- fi
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.YU
- ,CYR_.EREV
- ,CYR_.SCHWA
- );
- setkern [k#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- ,CYR_.ZH
- ,CYR_.ZH_dsc
- ,CYR_.H
- ,CYR_.H_dsc
- ,CYR_.Y
- ,CYR_.Y_hcrs
- ,CYR_.U
- ,CYR_.U_shrt
- if serifs:
- ,CYR_.YA
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- if serifs:
- ,CYR_.ya
- fi
- );
- elseif ROMANfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar ( CYR_.T );
- labelchar (
- CYR_.G
- ,CYR_.G_hcrs
- ,CYR_.NG
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- fi
- );
- if not concrete:
- if serifs:
- setkern [k#] (
- CYR_.L
- ,CYR_.LJE
- );
- else:
- setkern [-u#] (
- CYR_.L
- ,CYR_.LJE
- );
- fi
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.f
- );
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [kk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.G_up
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- fi
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- );
- if not concrete:
- if serifs:
- setkern [k#] (
- CYR_.L
- ,CYR_.LJE
- );
- else:
- setkern [-u#] (
- CYR_.L
- ,CYR_.LJE
- );
- fi
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.f
- );
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.Y
- ,CYR_.Y_hcrs
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- fi
- );
- if not concrete:
- setkern [-u#] (
- CYR_.L
- ,CYR_.LJE
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- );
- if ROMANfont:
- if serifs:
- setkern [kkk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- fi
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.U
- ,CYR_.U_shrt
- );
- if serifs:
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- fi
- ,CYR_.YA
- );
- if not concrete:
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- );
- fi
- else:
- setkern [k#] (
- CYR_.A
- ,CYR_.AE
- );
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- );
- fi
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [kk#] (
- if concrete:
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- );
- else:
- if serifs:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- );
- fi
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.R
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- ,CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- if serifs:
- ,CYR_.YA
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- );
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- );
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.UKR_I
- );
- setkern [-k#] (
- CYR_.UKR_I
- );
- endligtable;
-
-if TITLEfont: endinput \\ fi;
-
-if SmallCapsfont:
-
- u#:=lower.u#;
- k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#;
-
-
-
- beginligtable
- labelchar (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- ,CYR_.dje
- fi
- ,CYR_.lje
- ,CYR_.nje
- if SmallCapsfont:
- ,CYR_.shha
- fi
- if SmallCapsfont:
- fi
- if serifs:
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- endligtable;
-
- if concrete:
-
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.k_dsc
- ,CYR_.k_vcrs
- ,CYR_.k_beak
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.erev
- ,CYR_.schwa
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- if serifs:
- ,CYR_.ya
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.g
- ,CYR_.g_up
- ,CYR_.g_hcrs
- ,CYR_.ng
- ,CYR_.r
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- if serifs:
- ,CYR_.ya
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.ukr_i
- );
- setkern [-k#] (
- CYR_.ukr_i
- );
- endligtable;
-
-else:
-
- if ROMANfont:
-
-
- beginligtable
- labelchar (
- CYR_.a
- );
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- if serifs:
- fi
- );
- endligtable;
-
- if concrete:
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- endligtable;
-
- fi
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.g
- ,CYR_.g_up
- ,CYR_.g_hcrs
- ,CYR_.ng
- if kapitel:
- ,CYR_.r
- fi
- );
- if serifs:
- setkern [k#] (
- CYR_.a
- );
- fi
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.ya
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.k_dsc
- ,CYR_.k_vcrs
- ,CYR_.k_beak
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- );
- setkern [k#] (
- CYR_.a
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.e
- ,CYR_.yo
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.ukr_i
- );
- setkern [-kk#] (
- CYR_.ukr_i
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.ya
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- );
- setkern [-u#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
- else:
-
-
- beginligtable
- labelchar ( CYR_.e );
- labelchar (
- CYR_.yo
- );
- setkern [-u#] (
- CYR_.f
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.g_up
- );
- setkern [kkk#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.y
- ,CYR_.y_hcrs
- );
- setkern [kk#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.ukr_i
- );
- setkern [-k#] (
- CYR_.dje
- ,CYR_.tshe
- );
- setkern [-k#] (
- CYR_.ukr_i
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.hrdsn
- ,CYR_.k_beak
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar (
- CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- ,CYR_.dje
- fi
- ,CYR_.lje
- ,CYR_.nje
- if SmallCapsfont:
- ,CYR_.shha
- fi
- if SmallCapsfont:
- fi
- if kapitel:
- ,CYR_.a
- fi
- );
- if ROMANfont:
- setkern [-u#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.k_beak
- );
- if concrete:
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- );
- fi
- else:
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.hrdsn
- ,CYR_.k_beak
- );
- fi
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.s );
- labelchar (
- CYR_.o
- ,CYR_.otld
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.r
- ,CYR_.f
- ,CYR_.erev
- ,CYR_.schwa
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.d
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [-u#] (
- CYR_.f
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- );
- fi
- endligtable;
-
-fi
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/lalo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/lalo8.mf
deleted file mode 100644
index 13707f618c7..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/lalo8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lalo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/lalq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/lalq8.mf
deleted file mode 100644
index 7bf55dbd983..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/lalq8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lalq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laltt8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laltt8.mf
deleted file mode 100644
index dae607c70ad..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laltt8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is laltt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laocc10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laocc10.mf
deleted file mode 100644
index db3c8473622..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laocc10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laocc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm10.mf
deleted file mode 100644
index bb385a8f86d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laorm10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm5.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm5.mf
deleted file mode 100644
index 6286ab88cd5..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laorm5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm6.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm6.mf
deleted file mode 100644
index fd46f35f176..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laorm6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm7.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm7.mf
deleted file mode 100644
index 6d52cd3443f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laorm7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm8.mf
deleted file mode 100644
index e1e6c87bbdf..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laorm8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm9.mf
deleted file mode 100644
index e5317c4a2b8..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laorm9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laorm9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl10.mf
deleted file mode 100644
index a47e2b1e713..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laosl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl5.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl5.mf
deleted file mode 100644
index 23f08722727..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laosl5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl6.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl6.mf
deleted file mode 100644
index 20c358dfc34..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laosl6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl7.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl7.mf
deleted file mode 100644
index c14dfe9d591..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laosl7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl8.mf
deleted file mode 100644
index 519a569598e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laosl8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl9.mf
deleted file mode 100644
index 535786bbf43..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laosl9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laosl9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laoti10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laoti10.mf
deleted file mode 100644
index afb67644de2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laoti10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is laoti10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/laqi8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/laqi8.mf
deleted file mode 100644
index 0af5309ff89..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/laqi8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is laqi8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/lasq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/lasq8.mf
deleted file mode 100644
index 92addce05a7..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/lasq8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lasq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2a/lassdc10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2a/lassdc10.mf
deleted file mode 100644
index 119328dc6cb..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2a/lassdc10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lassdc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/ilblb8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/ilblb8.mf
deleted file mode 100644
index da4b4fbcdca..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/ilblb8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilblb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/ilbli8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/ilbli8.mf
deleted file mode 100644
index 57f7648bfb2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/ilbli8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilbli8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/ilblo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/ilblo8.mf
deleted file mode 100644
index 0ed44ba97fb..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/ilblo8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilblo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/ilblq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/ilblq8.mf
deleted file mode 100644
index 0951fe56119..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/ilblq8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilblq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/ilbltt8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/ilbltt8.mf
deleted file mode 100644
index 559f31b8250..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/ilbltt8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilbltt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbbx10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbbx10.mf
deleted file mode 100644
index e63fd32a245..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbbx10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbbx10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo10.mf
deleted file mode 100644
index f60ad1e8678..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbmo10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo17.mf
deleted file mode 100644
index b9ce7efbc6f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbmo17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo8.mf
deleted file mode 100644
index 01979cb6454..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbmo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo9.mf
deleted file mode 100644
index 8baed6acd8d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmo9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbmo9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr10.mf
deleted file mode 100644
index 7d6029cffc5..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbmr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr17.mf
deleted file mode 100644
index aab3bc5437d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbmr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr8.mf
deleted file mode 100644
index 6d7ddcccd06..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbmr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr9.mf
deleted file mode 100644
index cb476351cf7..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbmr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbmr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso10.mf
deleted file mode 100644
index b65b27bd7e3..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbso10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso17.mf
deleted file mode 100644
index 7bfc0c7dba8..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbso17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso8.mf
deleted file mode 100644
index 7014fdc6639..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbso8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso9.mf
deleted file mode 100644
index 5cc76798375..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbso9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbso9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr10.mf
deleted file mode 100644
index eded8b2eb2b..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbsr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr17.mf
deleted file mode 100644
index 5e17bd8098b..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbsr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr8.mf
deleted file mode 100644
index 3586001a309..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbsr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr9.mf
deleted file mode 100644
index 455f3d2ee32..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbsr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbsr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbtl10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbtl10.mf
deleted file mode 100644
index 281f455b9f4..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbtl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbtl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input exbase; def cmbright=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbto10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbto10.mf
deleted file mode 100644
index 008c328d7c5..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbbto10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbbto10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input exbase; def cmbright=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbcodes.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbcodes.mf
deleted file mode 100644
index 97a5025df75..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbcodes.mf
+++ /dev/null
@@ -1,158 +0,0 @@
-% This is lbcodes.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-CYR_.A := hex"c0";
-CYR_.a := hex"e0";
-CYR_.B := hex"c1";
-CYR_.b := hex"e1";
-CYR_.V := hex"c2";
-CYR_.v := hex"e2";
-CYR_.G := hex"c3";
-CYR_.g := hex"e3";
-CYR_.D := hex"c4";
-CYR_.d := hex"e4";
-CYR_.E := hex"c5";
-CYR_.e := hex"e5";
-CYR_.ZH := hex"c6";
-CYR_.zh := hex"e6";
-CYR_.Z := hex"c7";
-CYR_.z := hex"e7";
-CYR_.I := hex"c8";
-CYR_.i := hex"e8";
-CYR_.I_shrt := hex"c9";
-CYR_.i_shrt := hex"e9";
-CYR_.K := hex"ca";
-CYR_.k := hex"ea";
-CYR_.L := hex"cb";
-CYR_.l := hex"eb";
-CYR_.M := hex"cc";
-CYR_.m := hex"ec";
-CYR_.N := hex"cd";
-CYR_.n := hex"ed";
-CYR_.O := hex"ce";
-CYR_.o := hex"ee";
-CYR_.P := hex"cf";
-CYR_.p := hex"ef";
-CYR_.R := hex"d0";
-CYR_.r := hex"f0";
-CYR_.S := hex"d1";
-CYR_.s := hex"f1";
-CYR_.T := hex"d2";
-CYR_.t := hex"f2";
-CYR_.U := hex"d3";
-CYR_.u := hex"f3";
-CYR_.F := hex"d4";
-CYR_.f := hex"f4";
-CYR_.H := hex"d5";
-CYR_.h := hex"f5";
-CYR_.C := hex"d6";
-CYR_.c := hex"f6";
-CYR_.CH := hex"d7";
-CYR_.ch := hex"f7";
-CYR_.SH := hex"d8";
-CYR_.sh := hex"f8";
-CYR_.SHCH := hex"d9";
-CYR_.shch := hex"f9";
-CYR_.HRDSN := hex"da";
-CYR_.hrdsn := hex"fa";
-CYR_.ERY := hex"db";
-CYR_.ery := hex"fb";
-CYR_.SFTSN := hex"dc";
-CYR_.sftsn := hex"fc";
-CYR_.EREV := hex"dd";
-CYR_.erev := hex"fd";
-CYR_.YU := hex"de";
-CYR_.yu := hex"fe";
-CYR_.YA := hex"df";
-CYR_.ya := hex"ff";
-CYR_.YO := hex"9c";
-CYR_.yo := hex"bc";
-CYR_.L_dsc := hex"8a";
-CYR_.l_dsc := hex"aa";
-CYR_.LJE := hex"88";
-CYR_.lje := hex"a8";
-CYR_.NJE := hex"99";
-CYR_.nje := hex"b9";
-CYR_.DELTA := hex"86";
-CYR_.delta := hex"a6";
-CYR_.S_acrs := hex"91";
-CYR_.s_acrs := hex"b1";
-CYR_.G_crsdsc := hex"80";
-CYR_.g_crsdsc := hex"a0";
-CYR_.H_hcrs := hex"94";
-CYR_.h_hcrs := hex"b4";
-CYR_.G_hcrs := hex"81";
-CYR_.g_hcrs := hex"a1";
-CYR_.G_dsc := hex"82";
-CYR_.g_dsc := hex"a2";
-CYR_.G_tl := hex"83";
-CYR_.g_tl := hex"a3";
-CYR_.SHHA := hex"84";
-CYR_.shha := hex"a4";
-CYR_.ZH_dsc := hex"85";
-CYR_.zh_dsc := hex"a5";
-CYR_.ABH_DZE := hex"87";
-CYR_.abh_dze := hex"a7";
-CYR_.K_dsc := hex"89";
-CYR_.k_dsc := hex"a9";
-CYR_.K_tl := hex"8b";
-CYR_.k_tl := hex"ab";
-CYR_.L_tl := hex"8c";
-CYR_.l_tl := hex"ac";
-CYR_.N_dsc := hex"8d";
-CYR_.n_dsc := hex"ad";
-CYR_.NG := hex"8e";
-CYR_.ng := hex"ae";
-CYR_.N_tl := hex"8f";
-CYR_.n_tl := hex"af";
-CYR_.OTLD := hex"90";
-CYR_.otld := hex"b0";
-CYR_.U_shrt := hex"92";
-CYR_.u_shrt := hex"b2";
-CYR_.Y := hex"93";
-CYR_.y := hex"b3";
-CYR_.H_dsc := hex"95";
-CYR_.h_dsc := hex"b5";
-CYR_.H_tl := hex"96";
-CYR_.h_tl := hex"b6";
-CYR_.CH_ldsc := hex"97";
-CYR_.ch_ldsc := hex"b7";
-CYR_.CH_rdsc := hex"98";
-CYR_.ch_rdsc := hex"b8";
-CYR_.SCHWA := hex"9a";
-CYR_.schwa := hex"ba";
-CYR_.EPS := hex"9b";
-CYR_.eps := hex"bb";
-CYR_.Agrave := hex"00";
-CYR_.Aacute := hex"01";
-CYR_.Ahat := hex"02";
-CYR_.Atilde := hex"03";
-CYR_.Aumlaut := hex"04";
-CYR_.Aacute_dbl := hex"05";
-CYR_.Aring := hex"06";
-CYR_.Ahachek := hex"07";
-CYR_.Abreve := hex"08";
-CYR_.Abar := hex"09";
-CYR_.Adot := hex"0a";
-CYR_.Acedilla := hex"0b";
-CYR_.Aogonek := hex"0c";
-CYR_.palochka := hex"0d";
-CYR_.angle_left := hex"0e";
-CYR_.angle_right := hex"0f";
-CYR_.Afrown := hex"12";
-CYR_.Agrave_dbl := hex"13";
-CYR_.Acyrbreve := hex"14";
-CYR_.dash := hex"16";
-CYR_.wordmark := hex"17";
-CYR_.pmzero := hex"18";
-CYR_.i_dotl := hex"19";
-CYR_.j_dotl := hex"1a";
-CYR_.dbl_quotes := hex"22";
-CYR_.No := hex"9d";
-CYR_.currency := hex"9e";
-CYR_.section := hex"9f";
-CYR_.baseqq := hex"bd";
-CYR_.flqq := hex"be";
-CYR_.frqq := hex"bf";
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lblb8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lblb8.mf
deleted file mode 100644
index 5cf4d34c44e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lblb8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lblb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbli8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbli8.mf
deleted file mode 100644
index ff992e8b4ec..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbli8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lbli8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbliker.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbliker.mf
deleted file mode 100644
index 47b1e9c82a7..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbliker.mf
+++ /dev/null
@@ -1,1359 +0,0 @@
-% This is lbliker.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-
-beginligtable
- labelchar (
- CYR_.HRDSN
- ,CYR_.SFTSN
- ,CYR_.LJE
- ,CYR_.NJE
- ,CYR_.SHHA
- );
- setkern [k#] (
- CYR_.ZH
- ,CYR_.ZH_dsc
- ,CYR_.H
- ,CYR_.H_dsc
- ,CYR_.H_hcrs
- ,CYR_.H_tl
- );
- labelchar (
- CYR_.A
- if serifs:
- fi
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.CH
- ,CYR_.CH_ldsc
- ,CYR_.CH_rdsc
- ,CYR_.Y
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.y
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.k_tl
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.n_dsc
- ,CYR_.n_tl
- ,CYR_.ng
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-if concrete:
-
- beginligtable
- labelchar ( CYR_.D );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.CH
- ,CYR_.CH_ldsc
- ,CYR_.CH_rdsc
- ,CYR_.Y
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.t
- ,CYR_.hrdsn
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.y
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.k_tl
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.n_dsc
- ,CYR_.n_tl
- ,CYR_.ng
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.L );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.CH
- ,CYR_.CH_ldsc
- ,CYR_.CH_rdsc
- ,CYR_.Y
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.t
- ,CYR_.hrdsn
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.y
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.k_tl
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.n_dsc
- ,CYR_.n_tl
- ,CYR_.ng
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-fi
-
-beginligtable
- labelchar ( CYR_.K );
- labelchar (
- CYR_.K_dsc
- ,CYR_.ZH
- ,CYR_.ZH_dsc
- ,CYR_.H
- ,CYR_.H_dsc
- ,CYR_.H_hcrs
- ,CYR_.H_tl
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- );
- else:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- );
- fi
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.YU
- ,CYR_.EREV
- ,CYR_.SCHWA
- );
- setkern [k#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- ,CYR_.ZH
- ,CYR_.ZH_dsc
- ,CYR_.H
- ,CYR_.H_dsc
- ,CYR_.H_hcrs
- ,CYR_.H_tl
- ,CYR_.Y
- ,CYR_.U
- ,CYR_.U_shrt
- if serifs:
- ,CYR_.YA
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_hcrs
- ,CYR_.h_tl
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- if serifs:
- ,CYR_.ya
- fi
- );
- elseif ROMANfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar ( CYR_.T );
- labelchar (
- CYR_.G
- ,CYR_.G_hcrs
- ,CYR_.NG
- ,CYR_.G_dsc
- ,CYR_.G_crsdsc
- );
- setkern [kk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- fi
- );
- if not concrete:
- if serifs:
- setkern [k#] (
- CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- else:
- setkern [-u#] (
- CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_hcrs
- ,CYR_.h_tl
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.f
- );
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.l_dsc
- ,CYR_.l_tl
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.Y
- );
- setkern [kk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- fi
- );
- if not concrete:
- setkern [-u#] (
- CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_hcrs
- ,CYR_.h_tl
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- );
- if ROMANfont:
- if serifs:
- setkern [kkk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- fi
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.l_dsc
- ,CYR_.l_tl
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.U
- ,CYR_.U_shrt
- );
- if serifs:
- setkern [kk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- fi
- ,CYR_.YA
- );
- if not concrete:
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- else:
- setkern [k#] (
- CYR_.A
- );
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.S
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [kk#] (
- if concrete:
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- );
- else:
- if serifs:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- );
- fi
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.l_dsc
- ,CYR_.l_tl
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.R
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- if serifs:
- ,CYR_.YA
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.e
- ,CYR_.yo
- );
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- );
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-if TITLEfont: endinput \\ fi;
-
-if SmallCapsfont:
-
- u#:=lower.u#;
- k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#;
-
-
-
- beginligtable
- labelchar (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- fi
- ,CYR_.lje
- ,CYR_.nje
- if SmallCapsfont:
- ,CYR_.shha
- fi
- if SmallCapsfont:
- fi
- if serifs:
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- );
- endligtable;
-
- if concrete:
-
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.k_dsc
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_hcrs
- ,CYR_.h_tl
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.erev
- ,CYR_.schwa
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_hcrs
- ,CYR_.h_tl
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- if serifs:
- ,CYR_.ya
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.g
- ,CYR_.g_hcrs
- ,CYR_.ng
- ,CYR_.g_dsc
- ,CYR_.g_crsdsc
- ,CYR_.r
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- if serifs:
- ,CYR_.ya
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- ,CYR_.s
- );
- endligtable;
-
-else:
-
- if ROMANfont:
-
-
- beginligtable
- labelchar (
- CYR_.a
- );
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- if serifs:
- fi
- );
- endligtable;
-
- if concrete:
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.s
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.s
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- endligtable;
-
- fi
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.g
- ,CYR_.g_hcrs
- ,CYR_.ng
- ,CYR_.g_dsc
- ,CYR_.g_crsdsc
- if kapitel:
- ,CYR_.r
- fi
- );
- if serifs:
- setkern [k#] (
- CYR_.a
- );
- fi
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ya
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.k_dsc
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_hcrs
- ,CYR_.h_tl
- );
- setkern [k#] (
- CYR_.a
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.s
- ,CYR_.e
- ,CYR_.yo
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- );
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.s
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.ya
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- );
- setkern [-u#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
- else:
-
-
- beginligtable
- labelchar ( CYR_.e );
- labelchar (
- CYR_.yo
- );
- setkern [-u#] (
- CYR_.f
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.l_dsc
- ,CYR_.l_tl
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.y
- );
- setkern [kk#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.l_dsc
- ,CYR_.l_tl
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.y
- ,CYR_.hrdsn
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar (
- CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- fi
- ,CYR_.lje
- ,CYR_.nje
- if SmallCapsfont:
- ,CYR_.shha
- fi
- if SmallCapsfont:
- fi
- if kapitel:
- ,CYR_.a
- fi
- );
- if ROMANfont:
- setkern [-u#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- );
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- );
- if concrete:
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- );
- fi
- else:
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.y
- ,CYR_.hrdsn
- );
- fi
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.f
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.s );
- labelchar (
- CYR_.o
- ,CYR_.otld
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.r
- ,CYR_.f
- ,CYR_.erev
- ,CYR_.schwa
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.d
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_hcrs
- ,CYR_.h_tl
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [-u#] (
- CYR_.f
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.l_dsc
- ,CYR_.l_tl
- );
- fi
- endligtable;
-
-fi
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lblo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lblo8.mf
deleted file mode 100644
index 707ccbf19e6..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lblo8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lblo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lblq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lblq8.mf
deleted file mode 100644
index 1ceacee8d89..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lblq8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lblq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbltt8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbltt8.mf
deleted file mode 100644
index ebf7ac9d957..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbltt8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lbltt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbocc10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbocc10.mf
deleted file mode 100644
index ded219a64e9..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbocc10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbocc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm10.mf
deleted file mode 100644
index bd0a6ac8e7a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lborm10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm5.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm5.mf
deleted file mode 100644
index 93b1a452531..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lborm5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm6.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm6.mf
deleted file mode 100644
index 4ba1b86d6b8..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lborm6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm7.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm7.mf
deleted file mode 100644
index baf7901be18..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lborm7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm8.mf
deleted file mode 100644
index f31ce23c4b3..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lborm8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm9.mf
deleted file mode 100644
index 25e724e4d36..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lborm9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lborm9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl10.mf
deleted file mode 100644
index c1cb39c2187..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbosl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl5.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl5.mf
deleted file mode 100644
index 2edda93f141..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbosl5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl6.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl6.mf
deleted file mode 100644
index 4f56320a64a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbosl6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl7.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl7.mf
deleted file mode 100644
index 85e9f38edc2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbosl7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl8.mf
deleted file mode 100644
index 4aac6bb6211..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbosl8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl9.mf
deleted file mode 100644
index b52fd290c58..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbosl9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lbosl9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lboti10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lboti10.mf
deleted file mode 100644
index 1aaf47d2dc9..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lboti10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lboti10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbqi8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbqi8.mf
deleted file mode 100644
index 9a6d85a3663..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbqi8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lbqi8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbsq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbsq8.mf
deleted file mode 100644
index 04b9d48a243..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbsq8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lbsq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbssdc10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2b/lbssdc10.mf
deleted file mode 100644
index fe7a7c967a2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2b/lbssdc10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lbssdc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/ilclb8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/ilclb8.mf
deleted file mode 100644
index 3b3b65bd6d6..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/ilclb8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilclb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/ilcli8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/ilcli8.mf
deleted file mode 100644
index 43b99d090ec..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/ilcli8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilcli8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/ilclo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/ilclo8.mf
deleted file mode 100644
index 06971e8be0d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/ilclo8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilclo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/ilclq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/ilclq8.mf
deleted file mode 100644
index f98f2a15cab..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/ilclq8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilclq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/ilcltt8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/ilcltt8.mf
deleted file mode 100644
index 2059ade24ae..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/ilcltt8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ilcltt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbbx10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbbx10.mf
deleted file mode 100644
index c2686cc6252..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbbx10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbbx10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo10.mf
deleted file mode 100644
index c20aa5af744..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbmo10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo17.mf
deleted file mode 100644
index b230059346f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbmo17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo8.mf
deleted file mode 100644
index d63735866f4..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbmo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo9.mf
deleted file mode 100644
index d238c9c04ca..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmo9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbmo9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr10.mf
deleted file mode 100644
index 318194ffeff..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbmr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr17.mf
deleted file mode 100644
index 6ccfec36bd1..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbmr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr8.mf
deleted file mode 100644
index 5e0466c317f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbmr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr9.mf
deleted file mode 100644
index e2c95f357fe..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbmr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbmr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso10.mf
deleted file mode 100644
index 71ee414b7f2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbso10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso17.mf
deleted file mode 100644
index 571097529b0..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbso17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso8.mf
deleted file mode 100644
index 3f5e05e0240..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbso8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso9.mf
deleted file mode 100644
index ae8dc5502dc..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbso9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbso9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr10.mf
deleted file mode 100644
index 1c57584d4ba..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbsr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr17.mf
deleted file mode 100644
index 6b10983d85a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbsr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr8.mf
deleted file mode 100644
index 3c05248549e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbsr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr9.mf
deleted file mode 100644
index 994d2d08e3f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbsr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbsr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbtl10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbtl10.mf
deleted file mode 100644
index 2837342d7e5..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbtl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbtl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input exbase; def cmbright=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbto10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbto10.mf
deleted file mode 100644
index 5570d7ae44c..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcbto10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcbto10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input exbase; def cmbright=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lccodes.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lccodes.mf
deleted file mode 100644
index 9203717da9c..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lccodes.mf
+++ /dev/null
@@ -1,158 +0,0 @@
-% This is lccodes.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-CYR_.A := hex"c0";
-CYR_.a := hex"e0";
-CYR_.B := hex"c1";
-CYR_.b := hex"e1";
-CYR_.V := hex"c2";
-CYR_.v := hex"e2";
-CYR_.G := hex"c3";
-CYR_.g := hex"e3";
-CYR_.D := hex"c4";
-CYR_.d := hex"e4";
-CYR_.E := hex"c5";
-CYR_.e := hex"e5";
-CYR_.ZH := hex"c6";
-CYR_.zh := hex"e6";
-CYR_.Z := hex"c7";
-CYR_.z := hex"e7";
-CYR_.I := hex"c8";
-CYR_.i := hex"e8";
-CYR_.I_shrt := hex"c9";
-CYR_.i_shrt := hex"e9";
-CYR_.K := hex"ca";
-CYR_.k := hex"ea";
-CYR_.L := hex"cb";
-CYR_.l := hex"eb";
-CYR_.M := hex"cc";
-CYR_.m := hex"ec";
-CYR_.N := hex"cd";
-CYR_.n := hex"ed";
-CYR_.O := hex"ce";
-CYR_.o := hex"ee";
-CYR_.P := hex"cf";
-CYR_.p := hex"ef";
-CYR_.R := hex"d0";
-CYR_.r := hex"f0";
-CYR_.S := hex"d1";
-CYR_.s := hex"f1";
-CYR_.T := hex"d2";
-CYR_.t := hex"f2";
-CYR_.U := hex"d3";
-CYR_.u := hex"f3";
-CYR_.F := hex"d4";
-CYR_.f := hex"f4";
-CYR_.H := hex"d5";
-CYR_.h := hex"f5";
-CYR_.C := hex"d6";
-CYR_.c := hex"f6";
-CYR_.CH := hex"d7";
-CYR_.ch := hex"f7";
-CYR_.SH := hex"d8";
-CYR_.sh := hex"f8";
-CYR_.SHCH := hex"d9";
-CYR_.shch := hex"f9";
-CYR_.HRDSN := hex"da";
-CYR_.hrdsn := hex"fa";
-CYR_.ERY := hex"db";
-CYR_.ery := hex"fb";
-CYR_.SFTSN := hex"dc";
-CYR_.sftsn := hex"fc";
-CYR_.EREV := hex"dd";
-CYR_.erev := hex"fd";
-CYR_.YU := hex"de";
-CYR_.yu := hex"fe";
-CYR_.YA := hex"df";
-CYR_.ya := hex"ff";
-CYR_.YO := hex"9c";
-CYR_.yo := hex"bc";
-CYR_.ABH_CH := hex"91";
-CYR_.abh_ch := hex"b1";
-CYR_.ABH_CH_dsc := hex"92";
-CYR_.abh_ch_dsc := hex"b2";
-CYR_.K_hcrs := hex"8b";
-CYR_.k_hcrs := hex"ab";
-CYR_.L_dsc := hex"8a";
-CYR_.l_dsc := hex"aa";
-CYR_.M_dsc := hex"88";
-CYR_.m_dsc := hex"a8";
-CYR_.ABH_HA := hex"97";
-CYR_.abh_ha := hex"b7";
-CYR_.P_tl := hex"80";
-CYR_.p_tl := hex"a0";
-CYR_.R_dsc := hex"85";
-CYR_.r_dsc := hex"a5";
-CYR_.T_dsc := hex"82";
-CYR_.t_dsc := hex"a2";
-CYR_.TETSE := hex"81";
-CYR_.tetse := hex"a1";
-CYR_.DZHE := hex"96";
-CYR_.dzhe := hex"b6";
-CYR_.SEMISN := hex"93";
-CYR_.semisn := hex"b3";
-CYR_.I_shdsc := hex"94";
-CYR_.i_shdsc := hex"b4";
-CYR_.R_tl := hex"9b";
-CYR_.r_tl := hex"bb";
-CYR_.N_ltl := hex"99";
-CYR_.n_ltl := hex"b9";
-CYR_.R_gcrs := hex"86";
-CYR_.r_gcrs := hex"a6";
-CYR_.M_tl := hex"8e";
-CYR_.m_tl := hex"ae";
-CYR_.G_tl := hex"83";
-CYR_.g_tl := hex"a3";
-CYR_.SHHA := hex"84";
-CYR_.shha := hex"a4";
-CYR_.ABH_DZE := hex"87";
-CYR_.abh_dze := hex"a7";
-CYR_.K_dsc := hex"89";
-CYR_.k_dsc := hex"a9";
-CYR_.L_tl := hex"8c";
-CYR_.l_tl := hex"ac";
-CYR_.N_dsc := hex"8d";
-CYR_.n_dsc := hex"ad";
-CYR_.N_tl := hex"8f";
-CYR_.n_tl := hex"af";
-CYR_.OTLD := hex"90";
-CYR_.otld := hex"b0";
-CYR_.H_dsc := hex"95";
-CYR_.h_dsc := hex"b5";
-CYR_.CH_rdsc := hex"98";
-CYR_.ch_rdsc := hex"b8";
-CYR_.SCHWA := hex"9a";
-CYR_.schwa := hex"ba";
-CYR_.Agrave := hex"00";
-CYR_.Aacute := hex"01";
-CYR_.Ahat := hex"02";
-CYR_.Atilde := hex"03";
-CYR_.Aumlaut := hex"04";
-CYR_.Aacute_dbl := hex"05";
-CYR_.Aring := hex"06";
-CYR_.Ahachek := hex"07";
-CYR_.Abreve := hex"08";
-CYR_.Abar := hex"09";
-CYR_.Adot := hex"0a";
-CYR_.Acedilla := hex"0b";
-CYR_.Aogonek := hex"0c";
-CYR_.palochka := hex"0d";
-CYR_.angle_left := hex"0e";
-CYR_.angle_right := hex"0f";
-CYR_.Afrown := hex"12";
-CYR_.Agrave_dbl := hex"13";
-CYR_.Acyrbreve := hex"14";
-CYR_.dash := hex"16";
-CYR_.wordmark := hex"17";
-CYR_.pmzero := hex"18";
-CYR_.i_dotl := hex"19";
-CYR_.j_dotl := hex"1a";
-CYR_.dbl_quotes := hex"22";
-CYR_.No := hex"9d";
-CYR_.currency := hex"9e";
-CYR_.section := hex"9f";
-CYR_.baseqq := hex"bd";
-CYR_.flqq := hex"be";
-CYR_.frqq := hex"bf";
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lclb8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lclb8.mf
deleted file mode 100644
index 8d8e7c89568..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lclb8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lclb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcli8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcli8.mf
deleted file mode 100644
index 073c9d7e802..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcli8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lcli8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcliker.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcliker.mf
deleted file mode 100644
index d4687ccfb3f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcliker.mf
+++ /dev/null
@@ -1,1243 +0,0 @@
-% This is lcliker.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-
-beginligtable
- labelchar (
- CYR_.HRDSN
- ,CYR_.SFTSN
- ,CYR_.SEMISN
- ,CYR_.P_tl
- ,CYR_.SHHA
- );
- setkern [k#] (
- CYR_.ZH
- ,CYR_.H
- ,CYR_.H_dsc
- );
- labelchar (
- CYR_.A
- if serifs:
- fi
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.S
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.T_dsc
- ,CYR_.HRDSN
- ,CYR_.SEMISN
- ,CYR_.TETSE
- ,CYR_.CH
- ,CYR_.CH_rdsc
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- );
- else:
- setkern [k#] (
- CYR_.U
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ch
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- ,CYR_.u
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.tetse
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.n
- ,CYR_.n_dsc
- ,CYR_.n_tl
- ,CYR_.p
- ,CYR_.p_tl
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.yu
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- );
- fi
- fi
- endligtable;
-
-if concrete:
-
- beginligtable
- labelchar ( CYR_.D );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.S
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.T_dsc
- ,CYR_.HRDSN
- ,CYR_.SEMISN
- ,CYR_.TETSE
- ,CYR_.CH
- ,CYR_.CH_rdsc
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- );
- else:
- setkern [k#] (
- CYR_.U
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ch
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- ,CYR_.u
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.tetse
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.n
- ,CYR_.n_dsc
- ,CYR_.n_tl
- ,CYR_.p
- ,CYR_.p_tl
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.yu
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- );
- fi
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.L );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.S
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.T_dsc
- ,CYR_.HRDSN
- ,CYR_.SEMISN
- ,CYR_.TETSE
- ,CYR_.CH
- ,CYR_.CH_rdsc
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- );
- else:
- setkern [k#] (
- CYR_.U
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.s
- ,CYR_.ch
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- ,CYR_.u
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.tetse
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.n
- ,CYR_.n_dsc
- ,CYR_.n_tl
- ,CYR_.p
- ,CYR_.p_tl
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.yu
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- );
- fi
- fi
- endligtable;
-
-fi
-
-beginligtable
- labelchar ( CYR_.K );
- labelchar (
- CYR_.K_dsc
- ,CYR_.K_hcrs
- ,CYR_.ZH
- ,CYR_.H
- ,CYR_.H_dsc
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.S
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.s
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- else:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- );
- fi
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.YU
- ,CYR_.EREV
- ,CYR_.SCHWA
- );
- setkern [k#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- ,CYR_.ZH
- ,CYR_.H
- ,CYR_.H_dsc
- ,CYR_.U
- if serifs:
- ,CYR_.YA
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.u
- if serifs:
- ,CYR_.ya
- fi
- );
- elseif ROMANfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar ( CYR_.T );
- labelchar (
- CYR_.T_dsc
- ,CYR_.G
- );
- setkern [kk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- fi
- );
- if not concrete:
- if serifs:
- setkern [k#] (
- CYR_.L
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- else:
- setkern [-u#] (
- CYR_.L
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.u
- if serifs:
- ,CYR_.ya
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.f
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.hrdsn
- ,CYR_.tetse
- ,CYR_.l
- ,CYR_.m
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- ,CYR_.m_tl
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.U
- );
- if serifs:
- setkern [kk#] (
- CYR_.A
- if concrete:
- ,CYR_.D
- ,CYR_.L
- fi
- ,CYR_.YA
- );
- if not concrete:
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- else:
- setkern [k#] (
- CYR_.A
- );
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.S
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [kk#] (
- if concrete:
- CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.s
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- else:
- if serifs:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- fi
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.hrdsn
- ,CYR_.tetse
- ,CYR_.l
- ,CYR_.m
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- ,CYR_.m_tl
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.R
- ,CYR_.R_dsc
- ,CYR_.R_gcrs
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.D
- ,CYR_.L
- ,CYR_.L_tl
- ,CYR_.L_dsc
- if serifs:
- ,CYR_.YA
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- fi
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [k#] (
- CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- );
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-if TITLEfont: endinput \\ fi;
-
-if SmallCapsfont:
-
- u#:=lower.u#;
- k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#;
-
-
-
- beginligtable
- labelchar (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- fi
- ,CYR_.semisn
- ,CYR_.p_tl
- if SmallCapsfont:
- ,CYR_.shha
- fi
- if SmallCapsfont:
- fi
- if serifs:
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.s
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- ,CYR_.ch
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.u
- );
- endligtable;
-
- if concrete:
-
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.s
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- ,CYR_.ch
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.u
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.s
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- ,CYR_.ch
- ,CYR_.ch_rdsc
- );
- setkern [kk#] (
- CYR_.u
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.k_dsc
- ,CYR_.k_hcrs
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.h_dsc
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.s
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.erev
- ,CYR_.schwa
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.u
- if serifs:
- ,CYR_.ya
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.t_dsc
- ,CYR_.g
- ,CYR_.r
- ,CYR_.r_dsc
- ,CYR_.r_gcrs
- ,CYR_.r_tl
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- if serifs:
- ,CYR_.ya
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- if serifs:
- ,CYR_.ya
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.s
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
-else:
-
- if ROMANfont:
-
-
- beginligtable
- labelchar (
- CYR_.a
- );
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.u
- if serifs:
- fi
- );
- endligtable;
-
- if concrete:
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.s
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- ,CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.u
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.s
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- ,CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.u
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
- fi
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.t_dsc
- ,CYR_.g
- if kapitel:
- ,CYR_.r
- fi
- );
- if serifs:
- setkern [k#] (
- CYR_.a
- );
- fi
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ya
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.k_dsc
- ,CYR_.k_hcrs
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.h_dsc
- );
- setkern [k#] (
- CYR_.a
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.s
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- );
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.s
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- ,CYR_.ya
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- );
- setkern [-u#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.l_tl
- ,CYR_.l_dsc
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
- else:
-
-
- beginligtable
- labelchar ( CYR_.e );
- labelchar (
- CYR_.yo
- );
- setkern [-u#] (
- CYR_.f
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- ,CYR_.m_tl
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- ,CYR_.m_tl
- ,CYR_.hrdsn
- ,CYR_.tetse
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar (
- CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- fi
- ,CYR_.semisn
- ,CYR_.p_tl
- if SmallCapsfont:
- ,CYR_.shha
- fi
- if SmallCapsfont:
- fi
- if kapitel:
- ,CYR_.a
- fi
- );
- if ROMANfont:
- setkern [-u#] (
- CYR_.u
- );
- setkern [k#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.semisn
- ,CYR_.tetse
- );
- if concrete:
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- );
- fi
- else:
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- ,CYR_.m_tl
- ,CYR_.hrdsn
- ,CYR_.tetse
- );
- fi
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_rdsc
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.s );
- labelchar (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.r
- ,CYR_.f
- ,CYR_.erev
- ,CYR_.schwa
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.d
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.ya
- if kapitel:
- ,CYR_.a
- fi
- );
- else:
- setkern [-u#] (
- CYR_.f
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- ,CYR_.m_tl
- );
- fi
- endligtable;
-
-fi
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lclo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lclo8.mf
deleted file mode 100644
index 12f7d9ba899..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lclo8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lclo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lclq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lclq8.mf
deleted file mode 100644
index 71d19510129..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lclq8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lclq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcltt8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcltt8.mf
deleted file mode 100644
index 74329c602d2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcltt8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lcltt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcocc10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcocc10.mf
deleted file mode 100644
index b72c6d8b991..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcocc10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcocc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm10.mf
deleted file mode 100644
index 9e2598b9fbf..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcorm10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm5.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm5.mf
deleted file mode 100644
index a61300a2885..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcorm5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm6.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm6.mf
deleted file mode 100644
index baab2be1e75..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcorm6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm7.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm7.mf
deleted file mode 100644
index fe5f1e5f308..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcorm7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm8.mf
deleted file mode 100644
index 86af34226b6..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcorm8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm9.mf
deleted file mode 100644
index f0a2ba0bf71..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcorm9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcorm9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl10.mf
deleted file mode 100644
index 3bb86f957b5..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcosl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl5.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl5.mf
deleted file mode 100644
index 0b724740208..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcosl5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl6.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl6.mf
deleted file mode 100644
index 7c38e647447..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcosl6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl7.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl7.mf
deleted file mode 100644
index e3b29e6fc5c..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcosl7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl8.mf
deleted file mode 100644
index a343fb0ef46..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcosl8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl9.mf
deleted file mode 100644
index 911d79b9e7a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcosl9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcosl9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcoti10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcoti10.mf
deleted file mode 100644
index 0aca48eb5ed..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcoti10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is lcoti10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcqi8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcqi8.mf
deleted file mode 100644
index 8cfebc2bd28..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcqi8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lcqi8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcsq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcsq8.mf
deleted file mode 100644
index 6981ef60dd3..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcsq8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lcsq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcssdc10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2c/lcssdc10.mf
deleted file mode 100644
index 17925242895..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2c/lcssdc10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is lcssdc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ildlb8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ildlb8.mf
deleted file mode 100644
index a3444753916..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ildlb8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ildlb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ildli8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ildli8.mf
deleted file mode 100644
index c858cdbbd91..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ildli8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ildli8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ildlo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ildlo8.mf
deleted file mode 100644
index df13f58439a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ildlo8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ildlo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ildlq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ildlq8.mf
deleted file mode 100644
index 220ffc265fe..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ildlq8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ildlq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ildltt8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ildltt8.mf
deleted file mode 100644
index a64dc5d90e5..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ildltt8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ildltt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbbx10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbbx10.mf
deleted file mode 100644
index 9bd60bfc6fb..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbbx10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbbx10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo10.mf
deleted file mode 100644
index 3edadb2d648..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbmo10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo17.mf
deleted file mode 100644
index 66ff6853ff8..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbmo17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo8.mf
deleted file mode 100644
index 19c496b060e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbmo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo9.mf
deleted file mode 100644
index 45c2fad3f14..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmo9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbmo9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr10.mf
deleted file mode 100644
index c41199764ae..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbmr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr17.mf
deleted file mode 100644
index 0ddfc9095fc..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbmr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr8.mf
deleted file mode 100644
index a25097c38be..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbmr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr9.mf
deleted file mode 100644
index 273bbb6c56e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbmr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbmr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso10.mf
deleted file mode 100644
index c1101079457..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbso10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso17.mf
deleted file mode 100644
index aa903bc4884..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbso17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso8.mf
deleted file mode 100644
index f9e14f934ad..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbso8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso9.mf
deleted file mode 100644
index 6dfae194d4c..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbso9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbso9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr10.mf
deleted file mode 100644
index 3081c813ede..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbsr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr17.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr17.mf
deleted file mode 100644
index c9878bd9d7a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbsr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr8.mf
deleted file mode 100644
index 5c860f386c2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbsr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr9.mf
deleted file mode 100644
index 37eed888243..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbsr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbsr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbtl10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbtl10.mf
deleted file mode 100644
index 0d5677e0023..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbtl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbtl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input exbase; def cmbright=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbto10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbto10.mf
deleted file mode 100644
index c08b8d1899c..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldbto10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldbto10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input exbase; def cmbright=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldcodes.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldcodes.mf
deleted file mode 100644
index 73eb8410f0a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldcodes.mf
+++ /dev/null
@@ -1,163 +0,0 @@
-% This is ldcodes.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-CYR_.A := hex"c0";
-CYR_.a := hex"e0";
-CYR_.B := hex"c1";
-CYR_.b := hex"e1";
-CYR_.V := hex"c2";
-CYR_.v := hex"e2";
-CYR_.G := hex"c3";
-CYR_.g := hex"e3";
-CYR_.D := hex"c4";
-CYR_.d := hex"e4";
-CYR_.E := hex"c5";
-CYR_.e := hex"e5";
-CYR_.ZH := hex"c6";
-CYR_.zh := hex"e6";
-CYR_.Z := hex"c7";
-CYR_.z := hex"e7";
-CYR_.I := hex"c8";
-CYR_.i := hex"e8";
-CYR_.I_shrt := hex"c9";
-CYR_.i_shrt := hex"e9";
-CYR_.K := hex"ca";
-CYR_.k := hex"ea";
-CYR_.L := hex"cb";
-CYR_.l := hex"eb";
-CYR_.M := hex"cc";
-CYR_.m := hex"ec";
-CYR_.N := hex"cd";
-CYR_.n := hex"ed";
-CYR_.O := hex"ce";
-CYR_.o := hex"ee";
-CYR_.P := hex"cf";
-CYR_.p := hex"ef";
-CYR_.R := hex"d0";
-CYR_.r := hex"f0";
-CYR_.S := hex"d1";
-CYR_.s := hex"f1";
-CYR_.T := hex"d2";
-CYR_.t := hex"f2";
-CYR_.U := hex"d3";
-CYR_.u := hex"f3";
-CYR_.F := hex"d4";
-CYR_.f := hex"f4";
-CYR_.H := hex"d5";
-CYR_.h := hex"f5";
-CYR_.C := hex"d6";
-CYR_.c := hex"f6";
-CYR_.CH := hex"d7";
-CYR_.ch := hex"f7";
-CYR_.SH := hex"d8";
-CYR_.sh := hex"f8";
-CYR_.SHCH := hex"d9";
-CYR_.shch := hex"f9";
-CYR_.HRDSN := hex"da";
-CYR_.hrdsn := hex"fa";
-CYR_.ERY := hex"db";
-CYR_.ery := hex"fb";
-CYR_.SFTSN := hex"dc";
-CYR_.sftsn := hex"fc";
-CYR_.EREV := hex"dd";
-CYR_.erev := hex"fd";
-CYR_.YU := hex"de";
-CYR_.yu := hex"fe";
-CYR_.YA := hex"df";
-CYR_.ya := hex"ff";
-CYR_.YO := hex"9c";
-CYR_.yo := hex"bc";
-CYR_.LAT_S := hex"8f";
-CYR_.lat_s := hex"af";
-CYR_.YAT := hex"93";
-CYR_.yat := hex"b3";
-CYR_.B_YUS := hex"97";
-CYR_.b_yus := hex"b7";
-CYR_.IZH := hex"8a";
-CYR_.izh := hex"aa";
-CYR_.UKR_E := hex"99";
-CYR_.ukr_e := hex"b9";
-CYR_.EPS := hex"9b";
-CYR_.eps := hex"bb";
-CYR_.Agrave := hex"00";
-CYR_.Aacute := hex"01";
-CYR_.Ahat := hex"02";
-CYR_.Atilde := hex"03";
-CYR_.Aumlaut := hex"04";
-CYR_.Aacute_dbl := hex"05";
-CYR_.Aring := hex"06";
-CYR_.Ahachek := hex"07";
-CYR_.Abreve := hex"08";
-CYR_.Abar := hex"09";
-CYR_.Adot := hex"0a";
-CYR_.angle_left := hex"0e";
-CYR_.angle_right := hex"0f";
-CYR_.Afrown := hex"12";
-CYR_.Agrave_dbl := hex"13";
-CYR_.Acyrbreve := hex"14";
-CYR_.dash := hex"16";
-CYR_.pmzero := hex"18";
-CYR_.i_dotl := hex"19";
-CYR_.j_dotl := hex"1a";
-CYR_.dbl_quotes := hex"22";
-CYR_.No := hex"9d";
-CYR_.section := hex"9f";
-CYR_.baseqq := hex"bd";
-CYR_.flqq := hex"be";
-CYR_.frqq := hex"bf";
-CYR_.titlo := hex"0b";
-CYR_.palatal := hex"0c";
-CYR_.paerok := hex"0d";
-CYR_.kamora := hex"17";
-CYR_.psili := hex"1b";
-CYR_.dasia := hex"1c";
-CYR_.zvat := hex"1d";
-CYR_.pneuac := hex"1e";
-CYR_.pneugr := hex"1f";
-CYR_.thousands := hex"9e";
-CYR_.AZ := hex"80";
-CYR_.az := hex"a0";
-CYR_.I_AZ := hex"81";
-CYR_.i_az := hex"a1";
-CYR_.L_YUS := hex"82";
-CYR_.l_yus := hex"a2";
-CYR_.IL_YUS := hex"83";
-CYR_.il_yus := hex"a3";
-CYR_.GERV := hex"84";
-CYR_.gerv := hex"a4";
-CYR_.NASH := hex"85";
-CYR_.nash := hex"a5";
-CYR_.ZEMLA := hex"86";
-CYR_.zemla := hex"a6";
-CYR_.KSI := hex"87";
-CYR_.ksi := hex"a7";
-CYR_.VIZHE := hex"88";
-CYR_.vizhe := hex"a8";
-CYR_.IZHE := hex"89";
-CYR_.izhe := hex"a9";
-CYR_.OMGA := hex"8b";
-CYR_.omga := hex"ab";
-CYR_.OMGA_rnd := hex"8c";
-CYR_.omga_rnd := hex"ac";
-CYR_.OT := hex"8d";
-CYR_.ot := hex"ad";
-CYR_.OMGA_tlo := hex"8e";
-CYR_.omga_tlo := hex"ae";
-CYR_.FITA := hex"90";
-CYR_.fita := hex"b0";
-CYR_.KOPPA := hex"91";
-CYR_.koppa := hex"b1";
-CYR_.UK := hex"92";
-CYR_.uk := hex"b2";
-CYR_.CHERV := hex"94";
-CYR_.cherv := hex"b4";
-CYR_.PSI := hex"95";
-CYR_.psi := hex"b5";
-CYR_.SHTA := hex"96";
-CYR_.shta := hex"b6";
-CYR_.IB_YUS := hex"98";
-CYR_.ib_yus := hex"b8";
-CYR_.I_EST := hex"9a";
-CYR_.i_est := hex"ba";
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldlb8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldlb8.mf
deleted file mode 100644
index 8142c5b560d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldlb8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is ldlb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldli8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldli8.mf
deleted file mode 100644
index 78e34cbc215..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldli8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is ldli8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldliker.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldliker.mf
deleted file mode 100644
index cefe39cefa1..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldliker.mf
+++ /dev/null
@@ -1,1572 +0,0 @@
-% This is ldliker.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-
-beginligtable
- labelchar (
- CYR_.HRDSN
- ,CYR_.SFTSN
- ,CYR_.YAT
- );
- setkern [k#] (
- CYR_.ZH
- ,CYR_.H
- );
- labelchar (
- CYR_.A
- ,CYR_.L_YUS
- ,CYR_.IL_YUS
- if serifs:
- ,CYR_.B_YUS
- ,CYR_.IB_YUS
- fi
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OMGA
- ,CYR_.OMGA_tlo
- ,CYR_.OT
- ,CYR_.PSI
- ,CYR_.FITA
- ,CYR_.OMGA_rnd
- ,CYR_.S
- ,CYR_.UKR_E
- ,CYR_.KOPPA
- ,CYR_.AZ
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.YAT
- ,CYR_.CH
- ,CYR_.CHERV
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- );
- setkern [kkk#] (
- CYR_.IZH
- );
- else:
- setkern [k#] (
- CYR_.U
- );
- setkern [kk#] (
- CYR_.IZH
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.ch
- ,CYR_.cherv
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.cherv
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.izh
- ,CYR_.k
- ,CYR_.n
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.yat
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- );
- fi
- fi
- endligtable;
-
-if concrete:
-
- beginligtable
- labelchar ( CYR_.D );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OMGA
- ,CYR_.OMGA_tlo
- ,CYR_.OT
- ,CYR_.PSI
- ,CYR_.FITA
- ,CYR_.OMGA_rnd
- ,CYR_.S
- ,CYR_.UKR_E
- ,CYR_.KOPPA
- ,CYR_.AZ
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.YAT
- ,CYR_.CH
- ,CYR_.CHERV
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- );
- setkern [kkk#] (
- CYR_.IZH
- );
- else:
- setkern [k#] (
- CYR_.U
- );
- setkern [kk#] (
- CYR_.IZH
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.ch
- ,CYR_.cherv
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.cherv
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.izh
- ,CYR_.k
- ,CYR_.n
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.yat
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- );
- fi
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.L );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OMGA
- ,CYR_.OMGA_tlo
- ,CYR_.OT
- ,CYR_.PSI
- ,CYR_.FITA
- ,CYR_.OMGA_rnd
- ,CYR_.S
- ,CYR_.UKR_E
- ,CYR_.KOPPA
- ,CYR_.AZ
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.HRDSN
- ,CYR_.YAT
- ,CYR_.CH
- ,CYR_.CHERV
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- );
- setkern [kkk#] (
- CYR_.IZH
- );
- else:
- setkern [k#] (
- CYR_.U
- );
- setkern [kk#] (
- CYR_.IZH
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.ch
- ,CYR_.cherv
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.cherv
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.izh
- ,CYR_.k
- ,CYR_.n
- ,CYR_.p
- ,CYR_.t
- ,CYR_.yu
- ,CYR_.yat
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- );
- fi
- fi
- endligtable;
-
-fi
-
-beginligtable
- labelchar ( CYR_.K );
- labelchar (
- CYR_.ZH
- ,CYR_.H
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OMGA
- ,CYR_.OMGA_tlo
- ,CYR_.OT
- ,CYR_.PSI
- ,CYR_.FITA
- ,CYR_.OMGA_rnd
- ,CYR_.S
- ,CYR_.UKR_E
- ,CYR_.KOPPA
- ,CYR_.AZ
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- );
- else:
- setkern [k#] (
- CYR_.ch
- ,CYR_.cherv
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- );
- fi
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.O
- ,CYR_.F
- ,CYR_.OMGA
- ,CYR_.OMGA_tlo
- ,CYR_.OT
- ,CYR_.PSI
- ,CYR_.FITA
- ,CYR_.OMGA_rnd
- ,CYR_.YU
- ,CYR_.EREV
- );
- setkern [k#] (
- CYR_.A
- ,CYR_.L_YUS
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- ,CYR_.ZH
- ,CYR_.H
- ,CYR_.U
- ,CYR_.IZH
- if serifs:
- ,CYR_.YA
- ,CYR_.B_YUS
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- fi
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.u
- ,CYR_.izh
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- elseif ROMANfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar ( CYR_.T );
- labelchar (
- CYR_.G
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.L_YUS
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- ,CYR_.B_YUS
- fi
- );
- if not concrete:
- if serifs:
- setkern [k#] (
- CYR_.L
- );
- else:
- setkern [-u#] (
- CYR_.L
- );
- fi
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- fi
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.u
- ,CYR_.izh
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.f
- ,CYR_.psi
- );
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.l_yus
- );
- else:
- setkern [kk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.izh
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.IZH
- );
- if serifs:
- setkern [kkk#] (
- CYR_.A
- ,CYR_.L_YUS
- if concrete:
- ,CYR_.D
- ,CYR_.L
- fi
- ,CYR_.YA
- ,CYR_.B_YUS
- );
- else:
- setkern [kk#] (
- CYR_.A
- ,CYR_.L_YUS
- );
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- );
- fi
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OMGA
- ,CYR_.OMGA_tlo
- ,CYR_.OT
- ,CYR_.PSI
- ,CYR_.FITA
- ,CYR_.OMGA_rnd
- ,CYR_.S
- ,CYR_.UKR_E
- ,CYR_.KOPPA
- ,CYR_.AZ
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- fi
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- setkern [kk#] (
- if concrete:
- CYR_.d
- ,CYR_.l
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- );
- else:
- if serifs:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.e
- ,CYR_.yo
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.e
- ,CYR_.yo
- );
- fi
- if ROMANfont:
- if serifs:
- setkern [kkk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.l_yus
- );
- else:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.l_yus
- );
- fi
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.izh
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.U
- );
- if serifs:
- setkern [kk#] (
- CYR_.A
- ,CYR_.L_YUS
- if concrete:
- ,CYR_.D
- ,CYR_.L
- fi
- ,CYR_.YA
- ,CYR_.B_YUS
- );
- if not concrete:
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- );
- fi
- else:
- setkern [k#] (
- CYR_.A
- ,CYR_.L_YUS
- );
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- );
- fi
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OMGA
- ,CYR_.OMGA_tlo
- ,CYR_.OT
- ,CYR_.PSI
- ,CYR_.FITA
- ,CYR_.OMGA_rnd
- ,CYR_.S
- ,CYR_.UKR_E
- ,CYR_.KOPPA
- ,CYR_.AZ
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- fi
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- setkern [kk#] (
- if concrete:
- CYR_.d
- ,CYR_.l
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- );
- else:
- if serifs:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- );
- fi
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.l_yus
- );
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.izh
- ,CYR_.hrdsn
- ,CYR_.l
- ,CYR_.m
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.R
- ,CYR_.CHERV
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.L_YUS
- ,CYR_.D
- ,CYR_.L
- if serifs:
- ,CYR_.YA
- ,CYR_.B_YUS
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- fi
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.e
- ,CYR_.yo
- );
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- );
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.VIZHE
- );
- setkern [-k#] (
- CYR_.VIZHE
- );
- endligtable;
-
-if TITLEfont: endinput \\ fi;
-
-if SmallCapsfont:
-
- u#:=lower.u#;
- k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#;
-
-
-
- beginligtable
- labelchar (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.il_yus
- ,CYR_.a
- ,CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- fi
- ,CYR_.yat
- if SmallCapsfont:
- fi
- if SmallCapsfont:
- fi
- if serifs:
- ,CYR_.b_yus
- ,CYR_.ib_yus
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.ch
- ,CYR_.cherv
- );
- setkern [kk#] (
- CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- endligtable;
-
- if concrete:
-
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.ch
- ,CYR_.cherv
- );
- setkern [kk#] (
- CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.ch
- ,CYR_.cherv
- );
- setkern [kk#] (
- CYR_.u
- );
- setkern [kkk#] (
- CYR_.izh
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.zh
- ,CYR_.h
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.erev
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.u
- ,CYR_.izh
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.g
- ,CYR_.r
- ,CYR_.cherv
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.izh
- );
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.a
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.izhe
- );
- setkern [-k#] (
- CYR_.izhe
- );
- endligtable;
-
-else:
-
- if ROMANfont:
-
-
- beginligtable
- labelchar (
- CYR_.a
- );
- setkern [k#] (
- CYR_.ch
- ,CYR_.cherv
- ,CYR_.u
- if serifs:
- ,CYR_.izh
- fi
- );
- endligtable;
-
- if concrete:
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.ch
- ,CYR_.cherv
- ,CYR_.u
- ,CYR_.izh
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.cherv
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.ch
- ,CYR_.cherv
- ,CYR_.u
- ,CYR_.izh
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.cherv
- );
- endligtable;
-
- fi
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.g
- if kapitel:
- ,CYR_.r
- fi
- );
- if serifs:
- setkern [k#] (
- CYR_.a
- );
- fi
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.ya
- ,CYR_.b_yus
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.zh
- ,CYR_.h
- );
- setkern [k#] (
- CYR_.a
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.e
- ,CYR_.yo
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- ,CYR_.izh
- );
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.ya
- ,CYR_.b_yus
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.l_yus
- );
- setkern [-u#] (
- CYR_.d
- ,CYR_.l
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
- else:
-
-
- beginligtable
- labelchar ( CYR_.e );
- labelchar (
- CYR_.yo
- );
- setkern [-u#] (
- CYR_.f
- ,CYR_.psi
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.izh
- );
- setkern [kk#] (
- CYR_.l
- ,CYR_.m
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.izh
- ,CYR_.hrdsn
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.cherv
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar (
- CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- fi
- ,CYR_.yat
- if SmallCapsfont:
- fi
- if SmallCapsfont:
- fi
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.l_yus
- ,CYR_.il_yus
- );
- if ROMANfont:
- setkern [-u#] (
- CYR_.u
- ,CYR_.izh
- );
- setkern [k#] (
- CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- );
- if concrete:
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- );
- fi
- else:
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.izh
- ,CYR_.hrdsn
- );
- fi
- setkern [kk#] (
- CYR_.ch
- ,CYR_.cherv
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.s );
- labelchar (
- CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.r
- ,CYR_.f
- ,CYR_.psi
- ,CYR_.erev
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.d
- ,CYR_.zh
- ,CYR_.h
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.l_yus
- );
- else:
- setkern [-u#] (
- CYR_.f
- ,CYR_.psi
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- );
- fi
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.b_yus
- ,CYR_.ib_yus
- );
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.omga
- ,CYR_.omga_tlo
- ,CYR_.ot
- ,CYR_.fita
- ,CYR_.omga_rnd
- ,CYR_.s
- ,CYR_.ukr_e
- ,CYR_.koppa
- ,CYR_.az
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.t
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.izh
- ,CYR_.u
- );
- endligtable;
-
-fi
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldlo8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldlo8.mf
deleted file mode 100644
index db1e812e299..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldlo8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is ldlo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldlq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldlq8.mf
deleted file mode 100644
index 9110a0d417a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldlq8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is ldlq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldltt8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldltt8.mf
deleted file mode 100644
index 587d48cd2c5..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldltt8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is ldltt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldocc10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldocc10.mf
deleted file mode 100644
index c72fda9deb2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldocc10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldocc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm10.mf
deleted file mode 100644
index 9bc194e3409..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldorm10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm5.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm5.mf
deleted file mode 100644
index d3ab721f8de..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldorm5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm6.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm6.mf
deleted file mode 100644
index 0bc57eeb728..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldorm6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm7.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm7.mf
deleted file mode 100644
index 242eb841dcc..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldorm7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm8.mf
deleted file mode 100644
index e7241ff700e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldorm8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm9.mf
deleted file mode 100644
index af978073dc9..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldorm9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldorm9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl10.mf
deleted file mode 100644
index 6dc90ca8efe..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldosl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl5.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl5.mf
deleted file mode 100644
index 7125b6627c1..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldosl5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl6.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl6.mf
deleted file mode 100644
index 6621a5b6932..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldosl6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl7.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl7.mf
deleted file mode 100644
index c546f051018..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldosl7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl8.mf
deleted file mode 100644
index e974badac9f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldosl8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl9.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl9.mf
deleted file mode 100644
index 04a20ff266a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldosl9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldosl9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldoti10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldoti10.mf
deleted file mode 100644
index 1a68d8aad15..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldoti10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is ldoti10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldqi8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldqi8.mf
deleted file mode 100644
index 1d9c535dbd7..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldqi8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is ldqi8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldsq8.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldsq8.mf
deleted file mode 100644
index 4f7538bdeb9..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldsq8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is ldsq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldssdc10.mf b/Master/texmf-dist/fonts/source/lh/lh-t2d/ldssdc10.mf
deleted file mode 100644
index a75cfa2e97f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-t2d/ldssdc10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is ldssdc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/irxlb8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/irxlb8.mf
deleted file mode 100644
index e69e562c057..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/irxlb8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is irxlb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/irxli8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/irxli8.mf
deleted file mode 100644
index 70bcfd03956..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/irxli8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is irxli8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/irxlo8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/irxlo8.mf
deleted file mode 100644
index 0a50610e1de..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/irxlo8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is irxlo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/irxlq8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/irxlq8.mf
deleted file mode 100644
index 4f1404d7fbb..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/irxlq8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is irxlq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/irxltt8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/irxltt8.mf
deleted file mode 100644
index 4251414333e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/irxltt8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is irxltt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def fonteq=3 enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbbx10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbbx10.mf
deleted file mode 100644
index 772e270055b..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbbx10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbbx10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo10.mf
deleted file mode 100644
index 48f9ec97b0b..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbmo10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo17.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo17.mf
deleted file mode 100644
index 277a2881e6d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbmo17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo8.mf
deleted file mode 100644
index 25fcb2f7a95..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbmo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo9.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo9.mf
deleted file mode 100644
index 8a8adf41898..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmo9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbmo9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr10.mf
deleted file mode 100644
index a6eac164776..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbmr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr17.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr17.mf
deleted file mode 100644
index c60c3fd0359..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbmr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr8.mf
deleted file mode 100644
index c157e46e754..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbmr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr9.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr9.mf
deleted file mode 100644
index d935e0373bf..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbmr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbmr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso10.mf
deleted file mode 100644
index bf32a243bc4..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbso10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso17.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso17.mf
deleted file mode 100644
index c71763746fc..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbso17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso8.mf
deleted file mode 100644
index d975a2995a8..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbso8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso9.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso9.mf
deleted file mode 100644
index 10cbadfe7b9..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbso9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbso9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr10.mf
deleted file mode 100644
index 29ac9067b75..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbsr10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr17.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr17.mf
deleted file mode 100644
index e6e019d58ff..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr17.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbsr17.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr8.mf
deleted file mode 100644
index c03a2dd2221..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbsr8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr9.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr9.mf
deleted file mode 100644
index f1d5e38100d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbsr9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbsr9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input ebbase;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbtl10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbtl10.mf
deleted file mode 100644
index bfd9607559b..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbtl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbtl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input exbase; def cmbright=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbto10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxbto10.mf
deleted file mode 100644
index c4d76d304bb..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxbto10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxbto10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input exbase; def cmbright=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxcodes.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxcodes.mf
deleted file mode 100644
index ae0f7648d8f..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxcodes.mf
+++ /dev/null
@@ -1,215 +0,0 @@
-% This is rxcodes.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-CYR_.A := hex"c0";
-CYR_.a := hex"e0";
-CYR_.B := hex"c1";
-CYR_.b := hex"e1";
-CYR_.V := hex"c2";
-CYR_.v := hex"e2";
-CYR_.G := hex"c3";
-CYR_.g := hex"e3";
-CYR_.D := hex"c4";
-CYR_.d := hex"e4";
-CYR_.E := hex"c5";
-CYR_.e := hex"e5";
-CYR_.ZH := hex"c6";
-CYR_.zh := hex"e6";
-CYR_.Z := hex"c7";
-CYR_.z := hex"e7";
-CYR_.I := hex"c8";
-CYR_.i := hex"e8";
-CYR_.I_shrt := hex"c9";
-CYR_.i_shrt := hex"e9";
-CYR_.K := hex"ca";
-CYR_.k := hex"ea";
-CYR_.L := hex"cb";
-CYR_.l := hex"eb";
-CYR_.M := hex"cc";
-CYR_.m := hex"ec";
-CYR_.N := hex"cd";
-CYR_.n := hex"ed";
-CYR_.O := hex"ce";
-CYR_.o := hex"ee";
-CYR_.P := hex"cf";
-CYR_.p := hex"ef";
-CYR_.R := hex"d0";
-CYR_.r := hex"f0";
-CYR_.S := hex"d1";
-CYR_.s := hex"f1";
-CYR_.T := hex"d2";
-CYR_.t := hex"f2";
-CYR_.U := hex"d3";
-CYR_.u := hex"f3";
-CYR_.F := hex"d4";
-CYR_.f := hex"f4";
-CYR_.H := hex"d5";
-CYR_.h := hex"f5";
-CYR_.C := hex"d6";
-CYR_.c := hex"f6";
-CYR_.CH := hex"d7";
-CYR_.ch := hex"f7";
-CYR_.SH := hex"d8";
-CYR_.sh := hex"f8";
-CYR_.SHCH := hex"d9";
-CYR_.shch := hex"f9";
-CYR_.HRDSN := hex"da";
-CYR_.hrdsn := hex"fa";
-CYR_.ERY := hex"db";
-CYR_.ery := hex"fb";
-CYR_.SFTSN := hex"dc";
-CYR_.sftsn := hex"fc";
-CYR_.EREV := hex"dd";
-CYR_.erev := hex"fd";
-CYR_.YU := hex"de";
-CYR_.yu := hex"fe";
-CYR_.YA := hex"df";
-CYR_.ya := hex"ff";
-CYR_.YO := hex"9c";
-CYR_.yo := hex"bc";
-CYR_.AE := hex"41";
-CYR_.ae := hex"61";
-CYR_.DJE := hex"42";
-CYR_.dje := hex"62";
-CYR_.TSHE := hex"43";
-CYR_.tshe := hex"63";
-CYR_.ABH_CH := hex"44";
-CYR_.abh_ch := hex"64";
-CYR_.ABH_CH_dsc := hex"45";
-CYR_.abh_ch_dsc := hex"65";
-CYR_.K_vcrs := hex"46";
-CYR_.k_vcrs := hex"66";
-CYR_.K_hcrs := hex"47";
-CYR_.k_hcrs := hex"67";
-CYR_.L_dsc := hex"48";
-CYR_.l_dsc := hex"68";
-CYR_.LAT_I := hex"49";
-CYR_.lat_i := hex"69";
-CYR_.LAT_J := hex"4a";
-CYR_.lat_j := hex"6a";
-CYR_.LJE := hex"4b";
-CYR_.lje := hex"6b";
-CYR_.M_dsc := hex"4c";
-CYR_.m_dsc := hex"6c";
-CYR_.NJE := hex"4d";
-CYR_.nje := hex"6d";
-CYR_.ABH_HA := hex"4e";
-CYR_.abh_ha := hex"6e";
-CYR_.P_tl := hex"4f";
-CYR_.p_tl := hex"6f";
-CYR_.R_dsc := hex"50";
-CYR_.r_dsc := hex"70";
-CYR_.LAT_Q := hex"51";
-CYR_.lat_q := hex"71";
-CYR_.T_dsc := hex"52";
-CYR_.t_dsc := hex"72";
-CYR_.LAT_S := hex"53";
-CYR_.lat_s := hex"73";
-CYR_.TETSE := hex"54";
-CYR_.tetse := hex"74";
-CYR_.DZHE := hex"55";
-CYR_.dzhe := hex"75";
-CYR_.CH_vcrs := hex"56";
-CYR_.ch_vcrs := hex"76";
-CYR_.LAT_W := hex"57";
-CYR_.lat_w := hex"77";
-CYR_.YAT := hex"58";
-CYR_.yat := hex"78";
-CYR_.B_YUS := hex"59";
-CYR_.b_yus := hex"79";
-CYR_.IZH := hex"5a";
-CYR_.izh := hex"7a";
-CYR_.N_ltl := hex"1c";
-CYR_.n_ltl := hex"1d";
-CYR_.DELTA := hex"1e";
-CYR_.delta := hex"1f";
-CYR_.G_up := hex"80";
-CYR_.g_up := hex"a0";
-CYR_.G_hcrs := hex"81";
-CYR_.g_hcrs := hex"a1";
-CYR_.G_dsc := hex"82";
-CYR_.g_dsc := hex"a2";
-CYR_.G_tl := hex"83";
-CYR_.g_tl := hex"a3";
-CYR_.SHHA := hex"84";
-CYR_.shha := hex"a4";
-CYR_.ZH_dsc := hex"85";
-CYR_.zh_dsc := hex"a5";
-CYR_.Z_dsc := hex"86";
-CYR_.z_dsc := hex"a6";
-CYR_.ABH_DZE := hex"87";
-CYR_.abh_dze := hex"a7";
-CYR_.UKR_I := hex"88";
-CYR_.ukr_i := hex"a8";
-CYR_.K_dsc := hex"89";
-CYR_.k_dsc := hex"a9";
-CYR_.K_beak := hex"8a";
-CYR_.k_beak := hex"aa";
-CYR_.K_tl := hex"8b";
-CYR_.k_tl := hex"ab";
-CYR_.L_tl := hex"8c";
-CYR_.l_tl := hex"ac";
-CYR_.N_dsc := hex"8d";
-CYR_.n_dsc := hex"ad";
-CYR_.NG := hex"8e";
-CYR_.ng := hex"ae";
-CYR_.N_tl := hex"8f";
-CYR_.n_tl := hex"af";
-CYR_.OTLD := hex"90";
-CYR_.otld := hex"b0";
-CYR_.S_dsc := hex"91";
-CYR_.s_dsc := hex"b1";
-CYR_.U_shrt := hex"92";
-CYR_.u_shrt := hex"b2";
-CYR_.Y := hex"93";
-CYR_.y := hex"b3";
-CYR_.Y_hcrs := hex"94";
-CYR_.y_hcrs := hex"b4";
-CYR_.H_dsc := hex"95";
-CYR_.h_dsc := hex"b5";
-CYR_.H_tl := hex"96";
-CYR_.h_tl := hex"b6";
-CYR_.CH_ldsc := hex"97";
-CYR_.ch_ldsc := hex"b7";
-CYR_.CH_rdsc := hex"98";
-CYR_.ch_rdsc := hex"b8";
-CYR_.UKR_E := hex"99";
-CYR_.ukr_e := hex"b9";
-CYR_.SCHWA := hex"9a";
-CYR_.schwa := hex"ba";
-CYR_.EPS := hex"9b";
-CYR_.eps := hex"bb";
-CYR_.Agrave := hex"00";
-CYR_.Aacute := hex"01";
-CYR_.Ahat := hex"02";
-CYR_.Atilde := hex"03";
-CYR_.Aumlaut := hex"04";
-CYR_.Aacute_dbl := hex"05";
-CYR_.Aring := hex"06";
-CYR_.Ahachek := hex"07";
-CYR_.Abreve := hex"08";
-CYR_.Abar := hex"09";
-CYR_.Adot := hex"0a";
-CYR_.Acedilla := hex"0b";
-CYR_.Aogonek := hex"0c";
-CYR_.palochka := hex"0d";
-CYR_.angle_left := hex"0e";
-CYR_.angle_right := hex"0f";
-CYR_.Afrown := hex"12";
-CYR_.Agrave_dbl := hex"13";
-CYR_.Acyrbreve := hex"14";
-CYR_.dash := hex"16";
-CYR_.wordmark := hex"17";
-CYR_.pmzero := hex"18";
-CYR_.Agrave_cross := hex"19";
-CYR_.Aacute_cross := hex"1a";
-CYR_.Ahcross := hex"1b";
-CYR_.dbl_quotes := hex"22";
-CYR_.No := hex"9d";
-CYR_.currency := hex"9e";
-CYR_.section := hex"9f";
-CYR_.baseqq := hex"bd";
-CYR_.flqq := hex"be";
-CYR_.frqq := hex"bf";
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxlb8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxlb8.mf
deleted file mode 100644
index 19480bdd82e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxlb8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is rxlb8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxli8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxli8.mf
deleted file mode 100644
index 95edddeeca4..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxli8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is rxli8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxliker.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxliker.mf
deleted file mode 100644
index 195d361ee03..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxliker.mf
+++ /dev/null
@@ -1,2304 +0,0 @@
-% This is rxliker.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-
-beginligtable
- labelchar (
- CYR_.HRDSN
- ,CYR_.SFTSN
- ,CYR_.DJE
- ,CYR_.LJE
- ,CYR_.NJE
- ,CYR_.YAT
- ,CYR_.P_tl
- ,CYR_.SHHA
- );
- setkern [k#] (
- CYR_.ZH
- ,CYR_.ZH_dsc
- ,CYR_.H
- ,CYR_.H_dsc
- ,CYR_.H_tl
- );
- labelchar (
- CYR_.A
- if serifs:
- ,CYR_.B_YUS
- fi
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.LAT_Q
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.T_dsc
- ,CYR_.HRDSN
- ,CYR_.DJE
- ,CYR_.TSHE
- ,CYR_.YAT
- ,CYR_.K_beak
- ,CYR_.TETSE
- ,CYR_.CH
- ,CYR_.CH_ldsc
- ,CYR_.CH_rdsc
- ,CYR_.CH_vcrs
- ,CYR_.Y
- ,CYR_.Y_hcrs
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- setkern [kkk#] (
- CYR_.IZH
- ,CYR_.LAT_W
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- setkern [kk#] (
- CYR_.IZH
- ,CYR_.LAT_W
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- setkern [kkk#] (
- CYR_.izh
- ,CYR_.lat_w
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.k_vcrs
- ,CYR_.k_tl
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.n_dsc
- ,CYR_.n_tl
- ,CYR_.ng
- ,CYR_.p
- ,CYR_.p_tl
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.yu
- ,CYR_.yat
- ,CYR_.ukr_i
- ,CYR_.lat_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-if concrete:
-
- beginligtable
- labelchar ( CYR_.D );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.LAT_Q
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.T_dsc
- ,CYR_.HRDSN
- ,CYR_.DJE
- ,CYR_.TSHE
- ,CYR_.YAT
- ,CYR_.K_beak
- ,CYR_.TETSE
- ,CYR_.CH
- ,CYR_.CH_ldsc
- ,CYR_.CH_rdsc
- ,CYR_.CH_vcrs
- ,CYR_.Y
- ,CYR_.Y_hcrs
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- setkern [kkk#] (
- CYR_.IZH
- ,CYR_.LAT_W
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- setkern [kk#] (
- CYR_.IZH
- ,CYR_.LAT_W
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- setkern [kkk#] (
- CYR_.izh
- ,CYR_.lat_w
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.k_vcrs
- ,CYR_.k_tl
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.n_dsc
- ,CYR_.n_tl
- ,CYR_.ng
- ,CYR_.p
- ,CYR_.p_tl
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.yu
- ,CYR_.yat
- ,CYR_.ukr_i
- ,CYR_.lat_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.L );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.LAT_Q
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- );
- setkern [kk#] (
- CYR_.T
- ,CYR_.T_dsc
- ,CYR_.HRDSN
- ,CYR_.DJE
- ,CYR_.TSHE
- ,CYR_.YAT
- ,CYR_.K_beak
- ,CYR_.TETSE
- ,CYR_.CH
- ,CYR_.CH_ldsc
- ,CYR_.CH_rdsc
- ,CYR_.CH_vcrs
- ,CYR_.Y
- ,CYR_.Y_hcrs
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if serifs:
- setkern [kk#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- setkern [kkk#] (
- CYR_.IZH
- ,CYR_.LAT_W
- );
- else:
- setkern [k#] (
- CYR_.U
- ,CYR_.U_shrt
- );
- setkern [kk#] (
- CYR_.IZH
- ,CYR_.LAT_W
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- setkern [kkk#] (
- CYR_.izh
- ,CYR_.lat_w
- );
- elseif ROMANfont:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- );
- else:
- setkern [k#] (
- CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.k
- ,CYR_.k_dsc
- ,CYR_.k_vcrs
- ,CYR_.k_tl
- ,CYR_.n
- ,CYR_.nje
- ,CYR_.n_dsc
- ,CYR_.n_tl
- ,CYR_.ng
- ,CYR_.p
- ,CYR_.p_tl
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.yu
- ,CYR_.yat
- ,CYR_.ukr_i
- ,CYR_.lat_i
- ,CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- );
- fi
- fi
- endligtable;
-
-fi
-
-beginligtable
- labelchar ( CYR_.K );
- labelchar (
- CYR_.K_dsc
- ,CYR_.K_vcrs
- ,CYR_.K_hcrs
- ,CYR_.K_beak
- ,CYR_.ZH
- ,CYR_.ZH_dsc
- ,CYR_.H
- ,CYR_.H_dsc
- ,CYR_.H_tl
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.LAT_Q
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- else:
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- );
- fi
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.LAT_Q
- ,CYR_.YU
- ,CYR_.EREV
- ,CYR_.SCHWA
- );
- setkern [k#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- ,CYR_.ZH
- ,CYR_.ZH_dsc
- ,CYR_.H
- ,CYR_.H_dsc
- ,CYR_.H_tl
- ,CYR_.Y
- ,CYR_.Y_hcrs
- ,CYR_.U
- ,CYR_.U_shrt
- ,CYR_.IZH
- ,CYR_.LAT_W
- if serifs:
- ,CYR_.YA
- ,CYR_.B_YUS
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_tl
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- elseif ROMANfont:
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar ( CYR_.T );
- labelchar (
- CYR_.T_dsc
- ,CYR_.G
- ,CYR_.G_hcrs
- ,CYR_.NG
- ,CYR_.G_dsc
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- ,CYR_.B_YUS
- fi
- );
- if not concrete:
- if serifs:
- setkern [k#] (
- CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- else:
- setkern [-u#] (
- CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_tl
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [kk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.G_up
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- ,CYR_.B_YUS
- fi
- );
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.LAT_Q
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- );
- if not concrete:
- if serifs:
- setkern [k#] (
- CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- else:
- setkern [-u#] (
- CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_tl
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.Y
- ,CYR_.Y_hcrs
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- else:
- ,CYR_.D
- fi
- if serifs:
- ,CYR_.YA
- ,CYR_.B_YUS
- fi
- );
- if not concrete:
- setkern [-u#] (
- CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_tl
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- else:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- if ROMANfont:
- if serifs:
- setkern [kkk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- fi
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.IZH
- ,CYR_.LAT_W
- );
- if serifs:
- setkern [kkk#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- fi
- ,CYR_.YA
- ,CYR_.B_YUS
- );
- else:
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- );
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.LAT_Q
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- fi
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- setkern [kk#] (
- if concrete:
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- else:
- if serifs:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- fi
- if ROMANfont:
- if serifs:
- setkern [kkk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- fi
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.U
- ,CYR_.U_shrt
- );
- if serifs:
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- if concrete:
- ,CYR_.D
- ,CYR_.L
- fi
- ,CYR_.YA
- ,CYR_.B_YUS
- );
- if not concrete:
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- else:
- setkern [k#] (
- CYR_.A
- ,CYR_.AE
- );
- setkern [-u#] (
- CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- );
- fi
- setkern [k#] (
- CYR_.O
- ,CYR_.F
- ,CYR_.OTLD
- ,CYR_.ABH_HA
- ,CYR_.LAT_Q
- ,CYR_.S
- ,CYR_.S_dsc
- ,CYR_.UKR_E
- ,CYR_.ABH_CH
- ,CYR_.ABH_CH_dsc
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- fi
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- setkern [kk#] (
- if concrete:
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- else:
- if serifs:
- setkern [kk#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- fi
- if ROMANfont:
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [kkk#] (
- CYR_.i
- ,CYR_.i_shrt
- ,CYR_.c
- ,CYR_.sh
- ,CYR_.shch
- ,CYR_.sftsn
- ,CYR_.ery
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- );
- fi
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.R
- ,CYR_.R_dsc
- );
- setkern [kk#] (
- CYR_.A
- ,CYR_.AE
- ,CYR_.D
- ,CYR_.L
- ,CYR_.LJE
- ,CYR_.L_tl
- ,CYR_.L_dsc
- if serifs:
- ,CYR_.YA
- ,CYR_.B_YUS
- fi
- );
- if not TITLEfont:
- if SmallCapsfont:
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if concrete:
- ,CYR_.d
- ,CYR_.l
- else:
- ,CYR_.d
- fi
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- setkern [k#] (
- CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- else:
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- );
- fi
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- ,[ASCII ";"]
- ,[ASCII ":"]
- );
- fi
- fi
- endligtable;
-
-
-beginligtable
- labelchar (
- CYR_.LAT_I
- ,CYR_.UKR_I
- );
- setkern [-k#] (
- CYR_.LAT_I
- ,CYR_.UKR_I
- );
- endligtable;
-
-if TITLEfont: endinput \\ fi;
-
-if SmallCapsfont:
-
- u#:=lower.u#;
- k#:=-.5u#; kk#:=-1.5u#; kkk#:=-2u#;
-
-
-
- beginligtable
- labelchar (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.a
- ,CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- ,CYR_.dje
- fi
- ,CYR_.lje
- ,CYR_.nje
- ,CYR_.yat
- ,CYR_.p_tl
- if SmallCapsfont:
- ,CYR_.shha
- fi
- if SmallCapsfont:
- fi
- if serifs:
- ,CYR_.b_yus
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- setkern [kkk#] (
- CYR_.izh
- ,CYR_.lat_w
- );
- endligtable;
-
- if concrete:
-
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- setkern [kkk#] (
- CYR_.izh
- ,CYR_.lat_w
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.dje
- ,CYR_.tshe
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- );
- setkern [kk#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- setkern [kkk#] (
- CYR_.izh
- ,CYR_.lat_w
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.k_dsc
- ,CYR_.k_vcrs
- ,CYR_.k_hcrs
- ,CYR_.k_beak
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_tl
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.erev
- ,CYR_.schwa
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_tl
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.t_dsc
- ,CYR_.g
- ,CYR_.g_up
- ,CYR_.g_hcrs
- ,CYR_.ng
- ,CYR_.g_dsc
- ,CYR_.r
- ,CYR_.r_dsc
- );
- setkern [k#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- ,CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.izh
- ,CYR_.lat_w
- );
- setkern [kkk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.a
- if serifs:
- ,CYR_.ya
- ,CYR_.b_yus
- fi
- );
- setkern [kk#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.lat_i
- ,CYR_.ukr_i
- );
- setkern [-k#] (
- CYR_.lat_i
- ,CYR_.ukr_i
- );
- endligtable;
-
-else:
-
- if ROMANfont:
-
-
- beginligtable
- labelchar (
- CYR_.a
- );
- setkern [k#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- if serifs:
- ,CYR_.izh
- ,CYR_.lat_w
- fi
- );
- endligtable;
-
- if concrete:
-
- beginligtable
- labelchar ( CYR_.d );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.l
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
- fi
-
- beginligtable
- labelchar ( CYR_.t );
- labelchar (
- CYR_.t_dsc
- ,CYR_.g
- ,CYR_.g_up
- ,CYR_.g_hcrs
- ,CYR_.ng
- ,CYR_.g_dsc
- if kapitel:
- ,CYR_.r
- fi
- );
- if serifs:
- setkern [k#] (
- CYR_.a
- );
- fi
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- ,CYR_.ya
- ,CYR_.b_yus
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.k );
- labelchar (
- CYR_.k_dsc
- ,CYR_.k_vcrs
- ,CYR_.k_hcrs
- ,CYR_.k_beak
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_tl
- );
- setkern [k#] (
- CYR_.a
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.lat_i
- );
- setkern [-k#] (
- CYR_.ukr_i
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.ukr_i
- );
- setkern [-k#] (
- CYR_.lat_i
- );
- setkern [-kk#] (
- CYR_.ukr_i
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- );
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- ,CYR_.ya
- ,CYR_.b_yus
- );
- setkern [kk#] (
- if kapitel:
- CYR_.a
- fi
- ,CYR_.ae
- );
- setkern [-u#] (
- CYR_.d
- ,CYR_.l
- ,CYR_.lje
- ,CYR_.l_tl
- ,CYR_.l_dsc
- );
- if altcoding:
- setkern [kk#] (
- [ASCII "."]
- ,[ASCII ","]
- );
- fi
- endligtable;
-
- else:
-
-
- beginligtable
- labelchar ( CYR_.e );
- labelchar (
- CYR_.yo
- );
- setkern [-u#] (
- CYR_.f
- ,CYR_.lat_q
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.g_up
- );
- setkern [kkk#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- );
- setkern [kk#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- );
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.ukr_i
- );
- setkern [-k#] (
- CYR_.dje
- ,CYR_.tshe
- );
- labelchar (
- CYR_.lat_i
- );
- setkern [-k#] (
- CYR_.ukr_i
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.l );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.tetse
- );
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- endligtable;
-
- fi
-
-
- beginligtable
- labelchar (
- CYR_.hrdsn
- ,CYR_.sftsn
- if SmallCapsfont:
- ,CYR_.dje
- fi
- ,CYR_.lje
- ,CYR_.nje
- ,CYR_.yat
- ,CYR_.p_tl
- if SmallCapsfont:
- ,CYR_.shha
- fi
- if SmallCapsfont:
- fi
- if kapitel:
- ,CYR_.a
- fi
- );
- if ROMANfont:
- setkern [-u#] (
- CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- );
- setkern [k#] (
- CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- );
- if concrete:
- setkern [k#] (
- CYR_.d
- ,CYR_.l
- );
- fi
- else:
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- ,CYR_.y
- ,CYR_.y_hcrs
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.hrdsn
- ,CYR_.k_beak
- ,CYR_.tetse
- );
- fi
- setkern [kk#] (
- CYR_.ch
- ,CYR_.ch_ldsc
- ,CYR_.ch_rdsc
- ,CYR_.ch_vcrs
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- );
- setkern [k#] (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.f
- ,CYR_.lat_q
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- );
- endligtable;
-
-
- beginligtable
- labelchar ( CYR_.s );
- labelchar (
- CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.b
- ,CYR_.yu
- ,CYR_.r
- ,CYR_.f
- ,CYR_.erev
- ,CYR_.schwa
- );
- if ROMANfont:
- setkern [k#] (
- CYR_.d
- ,CYR_.zh
- ,CYR_.zh_dsc
- ,CYR_.h
- ,CYR_.h_dsc
- ,CYR_.h_tl
- ,CYR_.ya
- ,CYR_.b_yus
- if kapitel:
- ,CYR_.a
- fi
- ,CYR_.ae
- );
- else:
- setkern [-u#] (
- CYR_.f
- ,CYR_.lat_q
- ,CYR_.a
- );
- setkern [k#] (
- CYR_.l
- ,CYR_.m
- ,CYR_.lje
- ,CYR_.g_up
- ,CYR_.l_dsc
- ,CYR_.l_tl
- ,CYR_.m_dsc
- );
- fi
- endligtable;
-
-
- beginligtable
- labelchar (
- CYR_.b_yus
- );
- setkern [k#] (
- CYR_.a
- ,CYR_.o
- ,CYR_.otld
- ,CYR_.abh_ha
- ,CYR_.s
- ,CYR_.s_dsc
- ,CYR_.ukr_e
- ,CYR_.e
- ,CYR_.yo
- ,CYR_.abh_ch
- ,CYR_.abh_ch_dsc
- ,CYR_.t
- ,CYR_.t_dsc
- ,CYR_.hrdsn
- ,CYR_.yat
- ,CYR_.k_beak
- ,CYR_.tetse
- ,CYR_.izh
- ,CYR_.lat_w
- ,CYR_.u
- ,CYR_.u_shrt
- ,CYR_.y
- ,CYR_.y_hcrs
- );
- endligtable;
-
-fi
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxlo8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxlo8.mf
deleted file mode 100644
index aedee7e1a54..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxlo8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is rxlo8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxlq8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxlq8.mf
deleted file mode 100644
index 151a6e12723..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxlq8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is rxlq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxltt8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxltt8.mf
deleted file mode 100644
index 2631b925f4d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxltt8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is rxltt8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxocc10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxocc10.mf
deleted file mode 100644
index 291d9c808be..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxocc10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxocc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm10.mf
deleted file mode 100644
index a1ca76db1cd..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxorm10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm5.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm5.mf
deleted file mode 100644
index be322a01eb2..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxorm5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm6.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm6.mf
deleted file mode 100644
index cde680e3285..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxorm6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm7.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm7.mf
deleted file mode 100644
index 217aadeac53..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxorm7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm8.mf
deleted file mode 100644
index 75a03c24886..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxorm8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm9.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm9.mf
deleted file mode 100644
index 9590ed2b63e..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxorm9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxorm9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl10.mf
deleted file mode 100644
index 84212ea4dad..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxosl10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl5.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl5.mf
deleted file mode 100644
index ce33b699e2d..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl5.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxosl5.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl6.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl6.mf
deleted file mode 100644
index a210624af41..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl6.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxosl6.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl7.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl7.mf
deleted file mode 100644
index 8e3ecfe2ee9..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl7.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxosl7.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl8.mf
deleted file mode 100644
index fede2f6f0aa..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl8.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxosl8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl9.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl9.mf
deleted file mode 100644
index e8de2186038..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxosl9.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxosl9.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxoti10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxoti10.mf
deleted file mode 100644
index ff03e8ad7b6..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxoti10.mf
+++ /dev/null
@@ -1,7 +0,0 @@
-% This is rxoti10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-def concrete=true enddef;
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxqi8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxqi8.mf
deleted file mode 100644
index a48eb1d19ca..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxqi8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is rxqi8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxsq8.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxsq8.mf
deleted file mode 100644
index 0895f6fed0a..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxsq8.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is rxsq8.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/lh-x2/rxssdc10.mf b/Master/texmf-dist/fonts/source/lh/lh-x2/rxssdc10.mf
deleted file mode 100644
index 0ba39c9dd98..00000000000
--- a/Master/texmf-dist/fonts/source/lh/lh-x2/rxssdc10.mf
+++ /dev/null
@@ -1,6 +0,0 @@
-% This is rxssdc10.mf in text format as of 2004/6/6
-% created by LHfonts (TeX4MF) version 3.4
-%
-%
-
-input fikparm;
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgbersta.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgbersta.mf
index e2f8174d73a..e957b9754a3 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgbersta.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgbersta.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -44,7 +44,7 @@
% Lk_lcom
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Special letter Lb_bar";
cyrchar(Lb_bar,10u#+serif_fit#,asc_height#,0);
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgberstb.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgberstb.mf
index a111de37a5e..7505bd53a55 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgberstb.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgberstb.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -46,7 +46,7 @@
% Lz_lcom
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Special letter Llpol";
cyrchar(Lpoll,5u#,asc_height#,0); l_width#:=5u#+2serif_fit#;
@@ -808,7 +808,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
rt x[_four]l=max(x[_zero]l-bulb_diam,
floor x[_zero]-2.5u if monospace: / expansion_factor fi);
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgberstc.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgberstc.mf
index 3ab8f5338e7..4085508bafe 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgberstc.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgberstc.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -52,7 +52,7 @@
% Csh_lngst
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Special letter Lflap";
numeric r_flare#; r_flare#=.75[if serifs: stem# else: vair# fi,flare#];
@@ -515,7 +515,7 @@ if serifs:
pos[_two](vair',-90); pos[_three](hair,-180);
pos[_four](bulb_diam,-180);
x[_two]=.5[x[_one],x[_three]r];
- bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=-.85d;
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
z[_three]r=z[_four]r;
rt x[_four]l=max(x[_zero]l-bulb_diam,
floor x[_zero]-2.5u if monospace: / expansion_factor fi);
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgcacci.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgcacci.mf
index ac33585cf81..7c564bd8489 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgcacci.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgcacci.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -28,7 +28,6 @@
% u_gr
% u_com
% ery_bar
-% erev_uml
% erev_dot
% erev_bar
% yu_bar
@@ -50,7 +49,7 @@
% Vt - Serbian italic variant
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Italic Cyrillic letter a_bar";
cyrchar(a_bar,9u#,lc_trema_height#,0);
@@ -130,11 +129,12 @@ filldraw stroke pulled_arc.e(1,2) & pulled_arc.e(2,3)
y[_four]+.5bulb_diam=-d+y_move+height;
pos[_four](bulb_diam,90);
pos[_one](vair,90); pos[_two](vair,0); pos[_three](vair,-45);
- z[_one]r=z[_four]r; rt x[_two]r=hround(x[_four]+.5bulb_diam
+ z[_one]r=z[_four]r;
+ rt x[_two]r=hround max(rt x[_one]+eps,x[_four]+.5bulb_diam
+if monospace:.28u / expansion_factor else:.25u fi)+2eps;
x[_three]=x[_four]-.5u if monospace: /expansion_factor fi;
- y[_two]=1/3[y[_one],y[_three]];
- bot y[_three]r=vround(y[_four]-(height-.5bulb_diam));
+ y[_two]=1/3[y[_one],y[_three]]+eps;
+ bot y[_three]r=vround min(bot y[_four]-.5,y[_four]-(height-.5bulb_diam))-eps;
y_:=ypart((z[_one]{right}...z[_two]{down}...z[_three])
intersectiontimes (z[_four]l{right}..{left}z[_four]r));
if y_<0: y_:=1; fi
@@ -265,11 +265,12 @@ h:=full_h;
y[_four]+.5bulb_diam=h+y_move;
pos[_four](bulb_diam,90);
pos[_one](vair,90); pos[_two](vair,0); pos[_three](vair,-45);
- z[_one]r=z[_four]r; rt x[_two]r=hround(x[_four]+.5bulb_diam
+ z[_one]r=z[_four]r;
+ rt x[_two]r=hround max(rt x[_one]+eps,x[_four]+.5bulb_diam
+if monospace:.28u / expansion_factor else:.25u fi)+2eps;
x[_three]=x[_four]-.5u if monospace: /expansion_factor fi;
- y[_two]=1/3[y[_one],y[_three]];
- bot y[_three]r=vround(y[_four]-(height-.5bulb_diam));
+ y[_two]=1/3[y[_one],y[_three]]+eps;
+ bot y[_three]r=vround min(bot y[_four]-.5,y[_four]-(height-.5bulb_diam))-eps;
y_:=ypart((z[_one]{right}...z[_two]{down}...z[_three])
intersectiontimes (z[_four]l{right}..{left}z[_four]r));
if y_<0: y_:=1; fi
@@ -324,30 +325,6 @@ else:
filldraw stroke z[_one]e--z[_two]e; fi % bar
penlabels(0,1,1',2,3,4,5,6,7,8,9,10, 11,12); endchar;
-lhchar "Italic Cyrillic letter erev_uml - reverse e umlaut";
-cyrchar(erev_uml,8u#,lc_trema_height#,0);
-italcorr .7x_height#*slant+.5curve#-u# if math_fitting:-.5u# fi; %o
-adjust_fit(0,if monospace:0 else:-.35u# fi); %o
-h:=x_height;
-% ital_erev;
-pickup fine.nib;
-pos0(flare,180); pos1(hair,-180); pos2(vair,-90);
-pos3(curve,0); pos4(vair,90); pos5(hair,140);
-x2+.5u=x4=.5(w-u); lft x1r=min(lft x2,hround(.25u))-eps;
-rt x3r=w-hround(1.5u-.5curve); lft x5r=good.x (lft x1r-eps); x6=x5;
-y1-.5flare=.1h; bot y2r=-oo; bulb(2,1,0); % bulb
-top y4r=h+oo; y3=.5[y2,y4]; top y5r=vround .5[bar_height,h];
-y6=bar_height; path p; p=z4{left}....z5..z6;
-filldraw stroke pulled_arc.e(2,3)
- & pulled_arc.e(3,4)...{direction 1 of p}z5e; % arc
-x7=x3; y7=bar_height; y8=y7; lft x8=hround min(lft x2-1-eps,rt x0l+eps);
-pos7(vair,90); pos8(vair,90);
-filldraw stroke z7e--z8e;
-%%%
-% the accent
-h:=full_h; lowercase_umlaut(0,0, 9,10,11,12);
-penlabels(0,1,2,3,4,5,6,7,8, 9,10,11,12); endchar;
-
lhchar "Italic Cyrillic letter erev_dot - reverse e dot";
cyrchar_twice(erev_dot,8u#,x_height#,0);
italcorr x_height#*slant-beak_jut#-.25u#; %o
@@ -801,11 +778,12 @@ filldraw stroke z7e{down}..{-u,-x_height}z8e; % right stem
y[_four]+.5bulb_diam=-d+y_move+height;
pos[_four](bulb_diam,90);
pos[_one](vair,90); pos[_two](vair,0); pos[_three](vair,-45);
- z[_one]r=z[_four]r; rt x[_two]r=hround(x[_four]+.5bulb_diam
+ z[_one]r=z[_four]r;
+ rt x[_two]r=hround max(rt x[_one]+eps,x[_four]+.5bulb_diam
+if monospace:.28u / expansion_factor else:.25u fi)+2eps;
x[_three]=x[_four]-.5u if monospace: /expansion_factor fi;
- y[_two]=1/3[y[_one],y[_three]];
- bot y[_three]r=vround(y[_four]-(height-.5bulb_diam));
+ y[_two]=1/3[y[_one],y[_three]]+eps;
+ bot y[_three]r=vround min(bot y[_four]-.5,y[_four]-(height-.5bulb_diam))-eps;
y_:=ypart((z[_one]{right}...z[_two]{down}...z[_three])
intersectiontimes (z[_four]l{right}..{left}z[_four]r));
if y_<0: y_:=1; fi
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgcaccl.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgcaccl.mf
index c565dd8f05b..d914f4c8b7b 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgcaccl.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgcaccl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -28,7 +28,6 @@
% u_gr
% u_com
% ery_bar
-% erev_uml
% erev_dot
% erev_bar
% yu_bar
@@ -44,7 +43,7 @@
% ch_ldot
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Cyrillic letter a_bar";
cyrchar(a_bar,9u#,lc_trema_height#,0);
@@ -159,11 +158,12 @@ penstroke pulled_arc.e(1,2) & pulled_arc.e(2,3)
y[_four]+.5bulb_diam=-d+y_move+height;
pos[_four](bulb_diam,90);
pos[_one](vair,90); pos[_two](vair,0); pos[_three](vair,-45);
- z[_one]r=z[_four]r; rt x[_two]r=hround(x[_four]+.5bulb_diam
+ z[_one]r=z[_four]r;
+ rt x[_two]r=hround max(rt x[_one]+eps,x[_four]+.5bulb_diam
+if monospace:.28u / expansion_factor else:.25u fi)+2eps;
x[_three]=x[_four]-.5u if monospace: /expansion_factor fi;
- y[_two]=1/3[y[_one],y[_three]];
- bot y[_three]r=vround(y[_four]-(height-.5bulb_diam));
+ y[_two]=1/3[y[_one],y[_three]]+eps;
+ bot y[_three]r=vround min(bot y[_four]-.5,y[_four]-(height-.5bulb_diam))-eps;
y_:=ypart((z[_one]{right}...z[_two]{down}...z[_three])
intersectiontimes (z[_four]l{right}..{left}z[_four]r));
if y_<0: y_:=1; fi
@@ -412,11 +412,12 @@ h:=full_h;
y[_four]+.5bulb_diam=h+y_move;
pos[_four](bulb_diam,90);
pos[_one](vair,90); pos[_two](vair,0); pos[_three](vair,-45);
- z[_one]r=z[_four]r; rt x[_two]r=hround(x[_four]+.5bulb_diam
+ z[_one]r=z[_four]r;
+ rt x[_two]r=hround max(rt x[_one]+eps,x[_four]+.5bulb_diam
+if monospace:.28u / expansion_factor else:.25u fi)+2eps;
x[_three]=x[_four]-.5u if monospace: /expansion_factor fi;
- y[_two]=1/3[y[_one],y[_three]];
- bot y[_three]r=vround(y[_four]-(height-.5bulb_diam));
+ y[_two]=1/3[y[_one],y[_three]]+eps;
+ bot y[_three]r=vround min(bot y[_four]-.5,y[_four]-(height-.5bulb_diam))-eps;
y_:=ypart((z[_one]{right}...z[_two]{down}...z[_three])
intersectiontimes (z[_four]l{right}..{left}z[_four]r));
if y_<0: y_:=1; fi
@@ -492,59 +493,6 @@ else:
filldraw stroke z[_one]e--z[_two]e; fi % bar
penlabels(1,2,3,4,5,6,7,8,9, 10,11); endchar;
-lhchar "Lowercase Cyrillic letter erev_uml - reverse e umlaut";
-cyrchar(erev_uml,8u#,lc_trema_height#,0); % eng
-italcorr x_height#*slant-.2u#;
-adjust_fit(if monospace: .5u#,.5u# else: 0,0 fi);
-full_h:=h; h:=x_height;
-% lower_erev;
-set_bar_axis;
-pickup fine.nib; pos2(vair',90); pos3(curve,0); pos4(vair',-90);
-x2=x4=w-.5(w+u); top y2r=vround(h+1.5oo); bot y4r=-oo;
-rt x3r=w-hround max(.6u,1.35u-.5curve); y3=.5h; % eng
-if serifs:
- pos1(hair,180); pos5(hair,-180);
- y1=min(y2.bh+.75flare-.25vair+eps,.9[bar_height,h]-.75flare);
- lft x1r=lft x5r=hround.5u;
- y5=max(good.y(.5bar_height-.9),y4l+vair');
- (x,y4l)=whatever[z4r,z5l]; x4l:=max(x,x4l-.5u);
- filldraw stroke z1e{x2-x1,5(y2-y1)}...pulled_super_arc.e(2,3)(.7superpull)
- & pulled_super_arc.e(3,4)(.5superpull)
- ..tension .9 and 1..{x5-x4,5(y5-y4)}z5e; % arc and lower terminal
- pos6(.3[fine.breadth,hair],180); x6r=x1r; top y6=h+oo;
- x1'-x1r=1.5curve; y1'=y1;
- path upper_arc; upper_arc=z1{x2-x1,5(y2-y1)}..z2{right};
- numeric t; t=xpart(upper_arc intersectiontimes (z6l--z1'));
- filldraw z1r--z6r--z6l--subpath(t,0) of upper_arc--cycle; % barb
-else:
- pos1(4/7[vair',flare],100); pos5(.6[vair',flare],-95);
- lft x1r=good.x .6u; top y1r=vround .82[bar_height,top y2r];
- filldraw stroke term.e(2,1,left,.8,4); % upper terminal
- lft x5r=good.x .5u;
- y5r=good.y(y5r+1/3bar_height-y5); y5l:=good.y y5l; x5l:=good.x x5l;
- forsuffixes e=l,r: path p.e; p.e=z4e{left}..tension .9 and 1..z5e;
- if angle direction 1 of p.e<105:
- p.e:=z4e{left}..tension atleast.9 and 1..{dir 105}z5e; fi
- endfor
- filldraw stroke pulled_super_arc.e(2,3)(.7superpull)
- & pulled_super_arc.e(3,4)(.5superpull) & p.e; fi % arc and lower terminal
-%%%
-% lerev_bar;
-if (serifs=true) and (bar#<=.5curve#):
- x7r=max(rt x1l+.5hair,0.85[x3l,x1l]); x8r=x3l;
- y7l=y8l=y1.bh; y7r=y8r=y2.bh; x7l=x7r; x8l=x8r;
- numeric bar[];
- bar2=7/8[bar,fudged.stem-2stem_corr];
- penpos9(bar2,45); z9=.475[z7l,z8l];
- fill circ_stroke z7e{2,1}..{2,-1}z9e..{2,1}z8e; % curve /\/
-else:
- bar_stroke(max(rt x1l+.5hair,0.85[x3l,x1l]),x3l); % bar --
-fi
-%%%%%
-% the accent
-h:=full_h; lowercase_umlaut(0,0, 10,11,12,13);
-penlabels(1,1',2,3,4,5,6,7,8,9, 10,11,12,13); endchar;
-
lhchar "Lowercase Cyrillic letter erev_dot - reverse e dot";
cyrchar_twice(erev_dot,8u#,x_height#,0); % eng
italcorr x_height#*slant-.2u#;
@@ -1063,11 +1011,12 @@ if serifs:
y[_four]+.5bulb_diam=-d+y_move+height;
pos[_four](bulb_diam,90);
pos[_one](vair,90); pos[_two](vair,0); pos[_three](vair,-45);
- z[_one]r=z[_four]r; rt x[_two]r=hround(x[_four]+.5bulb_diam
+ z[_one]r=z[_four]r;
+ rt x[_two]r=hround max(rt x[_one]+eps,x[_four]+.5bulb_diam
+if monospace:.28u / expansion_factor else:.25u fi)+2eps;
x[_three]=x[_four]-.5u if monospace: /expansion_factor fi;
- y[_two]=1/3[y[_one],y[_three]];
- bot y[_three]r=vround(y[_four]-(height-.5bulb_diam));
+ y[_two]=1/3[y[_one],y[_three]]+eps;
+ bot y[_three]r=vround min(bot y[_four]-.5,y[_four]-(height-.5bulb_diam))-eps;
y_:=ypart((z[_one]{right}...z[_two]{down}...z[_three])
intersectiontimes (z[_four]l{right}..{left}z[_four]r));
if y_<0: y_:=1; fi
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgcaccu.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgcaccu.mf
index 73a226d11d5..317a8a6640a 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgcaccu.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgcaccu.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -29,7 +29,6 @@
% U_gr
% U_com
% ERY_bar
-% EREV_uml
% EREV_dot
% EREV_bar
% YU_bar
@@ -45,7 +44,7 @@
% CH_ldot
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Uppercase Cyrillic letter A_bar";
cyrchar(A_bar,13u#,cap_height#+acc_height#,0);
@@ -184,11 +183,12 @@ penstroke pulled_super_arc.e(1,2)(.5superpull)
y[_four]+.5bulb_diam=-d+y_move+height;
pos[_four](bulb_diam,90);
pos[_one](vair,90); pos[_two](vair,0); pos[_three](vair,-45);
- z[_one]r=z[_four]r; rt x[_two]r=hround(x[_four]+.5bulb_diam
+ z[_one]r=z[_four]r;
+ rt x[_two]r=hround max(rt x[_one]+eps,x[_four]+.5bulb_diam
+if monospace:.28u / expansion_factor else:.25u fi)+2eps;
x[_three]=x[_four]-.5u if monospace: /expansion_factor fi;
- y[_two]=1/3[y[_one],y[_three]];
- bot y[_three]r=vround(y[_four]-(height-.5bulb_diam));
+ y[_two]=1/3[y[_one],y[_three]]+eps;
+ bot y[_three]r=vround min(bot y[_four]-.5,y[_four]-(height-.5bulb_diam))-eps;
y_:=ypart((z[_one]{right}...z[_two]{down}...z[_three])
intersectiontimes (z[_four]l{right}..{left}z[_four]r));
if y_<0: y_:=1; fi
@@ -469,11 +469,12 @@ h:=full_h;
y[_four]+.5bulb_diam=h+y_move;
pos[_four](bulb_diam,90);
pos[_one](vair,90); pos[_two](vair,0); pos[_three](vair,-45);
- z[_one]r=z[_four]r; rt x[_two]r=hround(x[_four]+.5bulb_diam
+ z[_one]r=z[_four]r;
+ rt x[_two]r=hround max(rt x[_one]+eps,x[_four]+.5bulb_diam
+if monospace:.28u / expansion_factor else:.25u fi)+2eps;
x[_three]=x[_four]-.5u if monospace: /expansion_factor fi;
- y[_two]=1/3[y[_one],y[_three]];
- bot y[_three]r=vround(y[_four]-(height-.5bulb_diam));
+ y[_two]=1/3[y[_one],y[_three]]+eps;
+ bot y[_three]r=vround min(bot y[_four]-.5,y[_four]-(height-.5bulb_diam))-eps;
y_:=ypart((z[_one]{right}...z[_two]{down}...z[_three])
intersectiontimes (z[_four]l{right}..{left}z[_four]r));
if y_<0: y_:=1; fi
@@ -552,75 +553,6 @@ else:
penlabels(1,2,3,4,5,6,7,8,9, 10,11); endchar;
iff serifs:%
-lhchar "Uppercase Cyrillic letter EREV_uml - Reverse E umlaut";
-cyrchar(EREV_uml,13u#,cap_height#+acc_height#,0);
-if is_small_cap: getcharcode(erev_uml); fi
-italcorr cap_height#*slant-.5u#;
-adjust_fit(0,0); full_h:=h; h:=cap_height;
-% upper_erev;
- pickup fine.nib; pos1(cap_hair,180); pos2(cap_band,90);
- pos3(cap_curve,0); pos4(cap_band,-90); pos5(hair,-180);
- lft x1r=lft x5r=hround u;
- rt x3r=hround(w-u); x2=x4=.55[x3,x1];
- top y2r=h+o; bot y4r=-o; y3=.5h-vair_corr; y3l:=.52h;
- bot y1=min(vround.675h,bot y2l-eps); y5=max(good.y .95(h-y1),y4l+eps);
- (x2l',y2l)=whatever[z2r,z1l]; x2l:=max(x2l',x2l-.5u);
- (x4l',y4l)=whatever[z4r,z5l]; x4l:=max(x4l',x4l-.5u);
- filldraw stroke z1e{x2-x1,10(y2-y1)}...pulled_super_arc.e(2,3)(.5superpull)
- & pulled_super_arc.e(3,4)(.5superpull)...{up}z5e; % arc
- pos6(.3[fine.breadth,cap_hair],180); x6r=x1r; top y6=h+o;
- x1'-x1r=2cap_curve-fine; y1'=y1;
- path upper_arc; upper_arc=z1{x2-x1,10(y2-y1)}..z2{right};
- numeric t; t=xpart(upper_arc intersectiontimes (z6l--z1'));
- filldraw z1r--z6r--z6l--subpath(t,0) of upper_arc--cycle; % barb
-%%%
-%%% uerev_bar;
-numeric bar[]; y8=y7=y3;
-x8=x3l; x7=max(rt x1l+.5hair,0.85[x3l,x1l]);
-if (bar#<=.5curve#):
- penpos7(cap_bar,90); penpos8(cap_bar,90);
- bar2=7/8[cap_bar,fudged.cap_stem-3stem_corr];
- penpos9(bar2,45); z9=.475[z7l,z8l];
- fill circ_stroke z7e{2,1}..{2,-1}z9e..{2,1}z8e; % curve /\/
-else:
- pickup fine.nib; pos7(cap_bar,90); pos8(cap_bar,90);
- filldraw stroke z7e--z8e; % bar --
-fi
-%%%
-% the accent
-h:=full_h; uppercase_umlaut(x2-.5w,0, 10,11,12,13);
-penlabels(1,1',2,3,4,5,6,7,8,9, 10,11,12,13); endchar;
-
-iff not serifs:%
-lhchar "Uppercase Cyrillic letter EREV_uml - Reverse E umlaut";
-cyrchar(EREV_uml,11.5u#,cap_height#+acc_height#,0);
-if is_small_cap: getcharcode(erev_uml); fi
-italcorr cap_height#*slant-.5u#;
-adjust_fit(0,0); full_h:=h; h:=cap_height;
-% uppers_erev;
- pickup fine.nib; pos1(1.2flare,100); pos2(slab,90);
- pos3(cap_curve,0); pos4(slab,-90); pos5(flare,-95);
- lft x1r=hround1.1u; x2=x4=w-(.5w+1.25u);
- rt x3r=w-hround max(u,2u-.5cap_curve);
- lft x5r=hround.9u;
- top y1r=vround .95h+o; top y2r=h+o; y3=.5h;
- bot y4r=-o; bot y5r=vround .08h-o; y5l:=good.y y5l; x5l:=good.x x5l;
- filldraw stroke rterm.e(2,1,left,.9,4) & super_arc.e(2,3)
- & super_arc.e(3,4) & term.e(4,5,left,.8,4);
-%%%
-% urevs_bar;
-pickup fine.nib; numeric bar[];
-bar1=if is_small_cap: max(fine.breadth+eps,.6[thin_join,vair])
- else: cap_bar fi;
-pos6(bar1,90); pos7(bar1,90);
-y7=y6=y3; x7=x3l; x6=max(rt x1l+.5hair,0.85[x3l,x1l]);
-filldraw stroke z6e--z7e; % bar --
-%%%%%
-% the accent
-h:=full_h; uppercase_umlaut(x2-.5w,0, 8,9,10,11);
-penlabels(1,1',2,3,4,5,6,7, 8,9,10,11); endchar;
-
-iff serifs:%
lhchar "Uppercase Cyrillic letter EREV_dot - Reverse E dot";
cyrchar_twice(EREV_dot,13u#,cap_height#+acc_height#,0);
if is_small_cap: getcharcode(erev_dot); fi
@@ -1180,11 +1112,12 @@ if serifs: dish_serif(2,1,c,1/3,1.414cap_jut,d,1/3,1.414cap_jut); % lower serif
y[_four]+.5bulb_diam=-d+y_move+height;
pos[_four](bulb_diam,90);
pos[_one](vair,90); pos[_two](vair,0); pos[_three](vair,-45);
- z[_one]r=z[_four]r; rt x[_two]r=hround(x[_four]+.5bulb_diam
+ z[_one]r=z[_four]r;
+ rt x[_two]r=hround max(rt x[_one]+eps,x[_four]+.5bulb_diam
+if monospace:.28u / expansion_factor else:.25u fi)+2eps;
x[_three]=x[_four]-.5u if monospace: /expansion_factor fi;
- y[_two]=1/3[y[_one],y[_three]];
- bot y[_three]r=vround(y[_four]-(height-.5bulb_diam));
+ y[_two]=1/3[y[_one],y[_three]]+eps;
+ bot y[_three]r=vround min(bot y[_four]-.5,y[_four]-(height-.5bulb_diam))-eps;
y_:=ypart((z[_one]{right}...z[_two]{down}...z[_three])
intersectiontimes (z[_four]l{right}..{left}z[_four]r));
if y_<0: y_:=1; fi
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgcmodi.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgcmodi.mf
index 1161b6feab0..00d0392c2e6 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgcmodi.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgcmodi.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -27,7 +27,7 @@
% Vdzhe
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Italic Cyrillic letter Vg_hcrs - Variant ghe hcrossed"; % not italic shape
cyrchar(Vg_hcrs,8u#-.5width_adj#,x_height#,0);
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.mf
index dc04fb84654..dc70e66b5e8 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgcmodl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -27,7 +27,7 @@
% Vdzhe
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Cyrillic letter Vg_hcrs - Variant ghe hcrossed";
cyrchar(Vg_hcrs,8u#-.5width_adj#,x_height#,0);
@@ -115,7 +115,7 @@ if serifs:
w:=w+1.7u;
% tail_part(2);
_zero:=2;
-_one:=6; _two:=7; _three:=8; _four:=9; _five:=10;
+_one:=6; _two:=7; _three:=8; _five:=10;
_six:=11; _seven:=12; _eight:=13; _nine:=14;
%
pickup tiny.nib;
@@ -124,8 +124,10 @@ bulb_diam=max(currentbreadth+eps,min(.82d-1-eps,hround 7/8[hair,flare]));
set_bar_axis; y[_one]r=y[_two]r=y2.bh; y[_one]l=y[_two]l=y1.bh;
penpos[_three](max(currentbreadth+eps,curve if hefty:-3stem_corr fi),0);
y[_three]=.5[y[_one]r,-d];
-x[_two]l=x[_two]r=w-4.75u; x[_one]l=x[_one]r=x[_zero];
-x[_three]r=hround(w-u); x[_two]l:=x[_four]l:=x[_two]r-.25curve;
+x[_two]l=x[_two]r=max(x[_zero]+.25curve,w-4.75u)+eps;
+x[_one]l=x[_one]r=x[_zero]-eps;
+x[_three]r=hround(w-u); x[_two]l:=x[_two]r-.25curve+eps;
+if x[_three]l<tiny.rt x[_zero]r: x[_three]l:=tiny.rt x[_zero]r+eps; fi
{{interim superness:=more_super;
fill stroke super_arc.e([_three],[_two])..z[_one]e}}; % lobe
if serifs: z[_five]=z[_three]; pos[_five](curve if hefty:-3stem_corr fi,0);
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgcmodu.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgcmodu.mf
index 05cdccb4399..31f55ae2c58 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgcmodu.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgcmodu.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -27,7 +27,7 @@
% VDZHE
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Uppercase Cyrillic letter VG_hcrs - Variant GHE hcrossed";
cyrchar(VG_hcrs,if monospace: 9u# else: 11u# fi-width_adj#, %G_width
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgcvaci.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgcvaci.mf
index 7d24b549cae..5eb553bbd3a 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgcvaci.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgcvaci.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -48,7 +48,7 @@
% dje_ac
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Italic Cyrillic letter a_ac - a acute";
cyrchar_twice(a_ac,9u#,x_height#,0);
@@ -479,10 +479,10 @@ filldraw stroke z10e--z7e; % tie
filldraw stroke pulled_arc.e(4,3) & super_arc.e(3,1)
& super_arc.e(1,1'); % right stem
% stem&bar
-y11=y12=bar_height; pos11(vair,90); pos12(vair,90);
- z11=((l,y11)..(w,y11)) intersectionpoint
+pos11(vair,90); pos12(vair,90);
+ z11=((l,bar_height)..(w,bar_height)) intersectionpoint
(pulled_arc.r(4,3) & super_arc.r(3,1));
- z12=((0,y12)..(w-u,y12)) intersectionpoint (z10l..z7l);
+ z12=((0,bar_height)..(w,bar_height)) intersectionpoint (z10l..z7l);
filldraw stroke z11e--z12e; % bar
numeric stem[]; stem1=max(fine.breadth+eps,.7[thin_join,stem]);
pos13(stem1,0); pos14(stem1,0);
@@ -502,10 +502,12 @@ adjust_fit(if monospace: 3.5u#+else: 4.5u#+fi.5u#,
pickup fine.nib; pos1(vair,-90); pos2(hair,0); pos3(hair,0); pos4(vair,-90);
pos5(hair,-180); pos6(flare,-180);
pos1'(stem,180); pos10(stem,0);
-top y1l=h+oo; x1=.5[x3,x1']; x2=x3=3u; y3=.35h; y2=.75h;
-bot y4r=-oo; x4=lft x6r+flare; y6-.5flare=.1h; lft x6r=-.25u; z5r=z6r;
-y1'=.8h; x1'=x7; z10=z1';
-rt x7r=hround(w-2.5u+.5stem);
+top y1l=h+oo; x1=.5[x3,x1']; x2=x3=3u-eps; y3=.35h; y2=.75h;
+bot y4r=-oo; lft x6r=-.25u;
+x4=min(lft x6r+flare,lft x3l-eps); y6-.5flare=.1h; z5r=z6r;
+y1'=min(.8h,bot y1l)-eps; z10=z1';
+rt x7r=hround (w-2.5u+.5stem)+eps;
+x1'=x7;
bulb(4,5,6); % bulb
% right_stem;
_one:=7; _two:=8; _three:=9;
@@ -514,13 +516,14 @@ if monospace: pos[_three](vair,90); pos[_one](stem,0);
filldraw stroke z[_one]e{down}...{right}z[_three]e; % terminal
else: x[_three]=w; hook_out([_one],[_two],[_three]); fi % opening hook
filldraw stroke z10e--z7e; % tie
-filldraw stroke pulled_arc.e(4,3) & super_arc.e(3,1)
- & super_arc.e(1,1'); % right stem
+if lft x1'r<x1: lft x1'r:=x1+eps; fi
+filldraw stroke pulled_arc.e(4,3) &
+ super_arc.e(3,1) & super_arc.e(1,1'); % right stem
% stem&bar
-y11=y12=bar_height; pos11(vair,90); pos12(vair,90);
- z11=((l,y11)..(w,y11)) intersectionpoint
+pos11(vair,90); pos12(vair,90);
+z11=((l,bar_height)..(w,bar_height)) intersectionpoint
(pulled_arc.r(4,3) & super_arc.r(3,1));
- z12=((0,y12)..(w-u,y12)) intersectionpoint (z10l..z7l);
+z12=((0,bar_height)..(w,bar_height)) intersectionpoint (z10l--z7l);
filldraw stroke z11e--z12e; % bar
numeric stem[]; stem1=max(fine.breadth+eps,.7[thin_join,stem]);
pos13(stem1,0); pos14(stem1,0);
@@ -645,7 +648,7 @@ adjust_fit(if hefty:0,0 else:-.6u#,-.6u#fi);
numeric top_thickness,mid_thickness,bot_thickness,upper_side,lower_side,theta;
top_thickness=max(fine.breadth,vround(slab-2vair_corr));
bot_thickness=max(fine.breadth,vround(slab-vair_corr));
-x0=.5w; y0=if monospace:bar_height else:.7x_height fi; %h;%%%%%%%%%%%%%%
+x0=.5w; y0=if hefty:bar_height else:.7x_height fi; %h;%%%%%%%%%%%%%%
pickup fine.nib; theta=90-angle(20u,h); slope:=-h/20u;
upper_side=max(fine.breadth+eps,hround(.5[hair,stem]-stem_corr));
lower_side=hround(.5[hair,stem]+stem_corr);
@@ -653,11 +656,11 @@ if lower_side>1.2upper_side: upper_side:=lower_side; fi
pos1(top_thickness,-90); pos6(bot_thickness,-90);
x1=x6=.5w; top y1l=h+o; bot y6r=-o; pos0(cap_stem,theta);
lft x2l=w-rt x8l=hround 1.25u; lft x7r=w-rt x5r=hround 1.75u;
- x2r-x2l=fudged.stem-fine; x5r-x5l=lower_side-fine;%%%%%%%%%%%
+ x2r-x2l=stem-fine; x5r-x5l=lower_side-fine;%%%%%%%%%%%
ellipse_set(1l,2l,3l,0l); ellipse_set(1r,2r,3r,0r);
ellipse_set(6l,5l,4l,0l); ellipse_set(6r,5r,4r,0r);
numeric tau; tau=max(.8,.20710678/(superness-.5));
-y2r:=y2l+serif_drop;
+y2r:=vround(y2l+max(1,serif_drop)+eps);
filldraw stroke z2e{down}
..z3e---z4e..z5e{down}..tension atleast tau..z6e{left}; % S stroke
pos7(lower_side,180); pos8(upper_side,180);
@@ -673,10 +676,12 @@ numeric theta; theta=angle(4(x8'-x1'),y8'-y1'); pos1'(curve,theta+90);
filldraw z1'l{dir theta}..tension atleast 1 and 1..{down}z8'l
--z8'r{up}...{-dir theta}z1'r..cycle; % bulb
% from sloped serif
-pos12(slab,90); lft x12=x2l-.5jut; y12r=y2r-serif_drop; z14=z2l;
-filldraw z2r--z12r--z12l{right}
- ...1/3[(x14,y12l),.5[z12l,z14] ]{z14-z12l}
- ...{down}z14--(x2r,y14)--cycle; % sloped serif
+if serif_drop>0:
+ pos12(slab,90); lft x12=x2l-.5jut-eps; y12r=y2r-serif_drop; z14=z2l;
+ filldraw z2r--z12r--z12l{right}
+ ...1/3[(x14,y12l),.5[z12l,z14] ]{z14-z12l}
+ ...{down}z14--(x2r,y14)--cycle; % sloped serif
+fi
%%%%%
% the accent
hpos_corr=-u; put_accent(cyrcaph); repeat_once;
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgcvacl.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgcvacl.mf
index 6b769826afb..33e6a697135 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgcvacl.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgcvacl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -48,7 +48,7 @@
% dje_ac
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Cyrillic letter a_ac - a acute";
cyrchar_twice(a_ac,9u#,x_height#,0); % eng
@@ -585,6 +585,7 @@ endgroup;
hpos_corr=-u; put_accent; repeat_once;
penlabels(1,2,3,4,5,6,7,8); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Lowercase Cyrillic letter ya_ac - ya acute (`roman')";
cyrchar_twice(ya_ac,if serifs: 9.75u# else: 10u# fi-.5width_adj#,x_height#,0); %ya (~n_width:10u)
@@ -675,7 +676,7 @@ filldraw stroke z8e--z9e; % cross bar
%%%%%
endgroup;
% the accent
-hpos_corr=-u; put_accent; repeat_once;
+put_accent(cyrcaph); repeat_once; % cyrcaph for asc_height
penlabels(0,1,2,3,4,5,6,7,8,9,10); endchar;
lhchar "Lowercase Cyrillic letter izh_ac - izhitsa acute";
@@ -1064,22 +1065,23 @@ else:
bot_thickness=vair';
upper_side=max(fine.breadth,hround(.3[vair',stem]-stem_corr));
lower_side=hround(.3[vair',stem]+stem_corr); fi
- x0=.5w; y0=if serifs:.7x_height else:bar_height fi; %h;%%%%%%%%%%%%%%
+ x0=.5w; y0=if hefty:bar_height else:.7x_height fi; %h;%%%%%%%%%%%%%%
pickup fine.nib; theta=90-angle(20u,h); slope:=-h/20u;
if lower_side>1.2upper_side: upper_side:=lower_side; fi
pos1(top_thickness,-90); pos6(bot_thickness,-90);
-x1=x6=.5w; top y1l=h+o; bot y6r=-o; pos0(fudged.stem-2stem_corr,theta);
+x1=x6=.5w; top y1l=h+o; bot y6r=-o;
+pos0(max(fine.breadth,fudged.stem-2stem_corr),theta);
lft x2l=w-rt x8l=hround 1.25u; lft x7r=w-rt x5r=hround 1.75u if not serifs:+.5u fi;
x2r-x2l=if serifs:fudged.stem else:upper_side fi-fine;
x5r-x5l=lower_side-fine;
ellipse_set(1l,2l,3l,0l); ellipse_set(1r,2r,3r,0r);
ellipse_set(6l,5l,4l,0l); ellipse_set(6r,5r,4r,0r);
numeric tau; tau=max(.8,.20710678/(superness-.5));
-y2r:=y2l+serif_drop;
+y2r:=vround(y2l+max(1,serif_drop)+eps);
filldraw stroke z2e{down}
..z3e---z4e..z5e{down}..tension atleast tau..z6e{left}; % S stroke
pos7(lower_side,180); pos8(upper_side,180);
-y7=.5[y5l,y5r]; y8=.5[y2l,y2r]; pos9(vair,90); z9=z0;
+y7=.5[y5l,y5r]; y8=.5[y2l,y2r]; pos9(vair,90); z9=(x0,min(y0,y8-eps));
filldraw stroke z8e{down}
..tension atleast tau and atleast 1..{-18u,-.618h}z9e; % upper right stroke
filldraw stroke z6e{left}..tension atleast tau..z7e{up}
@@ -1092,15 +1094,18 @@ if serifs:
filldraw z1'l{dir theta}..tension atleast 1 and 1..{down}z8'l
--z8'r{up}...{-dir theta}z1'r..cycle; % bulb
% from sloped serif
- pos12(slab,90); lft x12=x2l-.5jut; y12r=y2r-serif_drop; z14=z2l;
- filldraw z2r--z12r--z12l{right}
- ...1/3[(x14,y12l),.5[z12l,z14] ]{z14-z12l}
- ...{down}z14--(x2r,y14)--cycle; % sloped serif
+ if serif_drop>0:
+ pos12(slab,90); lft x12=hround(x2l-max(1,.5jut)-.5-eps);
+ top y12r=vround(y2r-max(0,serif_drop)-eps); z14=(x2l,min(y2l-.5,y12)-eps);
+ filldraw z2r--z12r--z12l{right}
+ ...1/3[(x14,y12l),.5[z12l,z14] ]{z14-z12l}
+ ...{down}z14--(x2r,y14)--cycle; % sloped serif
+ fi
else: pos10(flare,225); x10r=x1; y10l=h+oo;
filldraw stroke z8e{up}...z10e; fi
%%%%%
% the accent
-put_accent(cyrcaph); repeat_once; % cyrcaph for acs_height
+put_accent(cyrcaph); repeat_once; % cyrcaph for asc_height
penlabels(0,1,2,3,4,5,6,7,8,9,10,11,12); endchar;
lhchar "Lowercase Cyrillic letter y_ac - straight u acute";
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgcvacu.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgcvacu.mf
index e9c8a8ad99c..a598b06bc45 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgcvacu.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgcvacu.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -48,7 +48,7 @@
% DJE_ac
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Uppercase Cyrillic letter A_ac - A acute";
cyrchar_twice(A_ac,13u#,cap_height#,0);
@@ -604,6 +604,7 @@ if serifs: dish_serif([_one],[_two],s,1/3,cap_jut,t,1/3,cap_jut);
put_accent(cyrcaph); repeat_once;
penlabels(1,2,3,4,10,11,12,13); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Uppercase Cyrillic letter YA_ac - YA acute (`roman')";
cyrchar_twice(YA_ac,if serifs:13.5u# else:12.5u#-.5width_adj# fi %N_width; upss R
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2slxi.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgt2slxi.mf
index 63940e75808..bb9cfe58556 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2slxi.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgt2slxi.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -37,7 +37,7 @@
% zelo_m
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Italic Cyrillic letter vnarrow_e";
cyrcharmoving(vnarrow_e);
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2slxl.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgt2slxl.mf
index 9960031cc3f..db95574ad13 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2slxl.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgt2slxl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -37,7 +37,7 @@
% zelo_m
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Cyrillic letter variant narrow_e";
cyrchar(vnarrow_e,7u#,x_height#,0); % eng
@@ -520,8 +520,8 @@ penstroke pulled_arc.e(1,2)
& pulled_arc.e(2,3) & pulled_arc.e(3,4) & pulled_arc.e(4,1) & cycle; % bowl
% dot
pickup tiny.nib;
-dot_diam:=min((lft x4l-rt x2l)-1,
- max(tiny.breadth,hround(max(dot_size,cap_curve)-2stem_corr)));
+dot_diam:=max(tiny.breadth,min((lft x4l-rt x2l)-1,
+ hround(max(dot_size,cap_curve)-2stem_corr)));
pos5(dot_diam,0); pos5'(dot_diam,90);
z5=z5'; x5=x1; y5=.5[y1,y3]; dot(5,5'); % dot
penlabels(1,2,3,4); endchar;
@@ -540,8 +540,8 @@ penstroke pulled_arc.e(1,2)
& pulled_arc.e(2,3) & pulled_arc.e(3,4) & pulled_arc.e(4,1) & cycle; % bowl
% dots
_one:=5; _two:=6; _three:=7; _four:=8;
-dot_diam:=min(.5(lft x4l-rt x2l)-1,
- max(tiny.breadth,hround(max(dot_size,cap_curve)-2stem_corr)));
+dot_diam:=max(tiny.breadth,min(.5(lft x4l-rt x2l)-1,
+ hround(max(dot_size,cap_curve)-2stem_corr)));
pickup tiny.nib;
pos[_one](dot_diam,0); pos[_two](dot_diam,90);
x[_one]=x[_two]=.5w-1.375u; y[_one]=y[_two]=.5[y1,y3];
@@ -773,7 +773,7 @@ penlabels(0,1,1',2,3,3',4,5,6);endchar;
lhchar "Lowercase Cyrillic letter mo";
cyrchar(mo,12u# if not serifs:+width_adj# fi,x_height#,0);
italcorr x_height#*slant-serif_fit#+jut#-2u#+.5stem#; %d->x_height+jut
-adjust_fit(if monospace: 0,.5u# else: serif_fit#,9u# fi); %wlett_adj
+adjust_fit(if monospace: 0,7.5u# else: serif_fit#,9u# fi); %wlett_adj
% lower_m;
numeric stem[]; % thicknesses of the four strokes
stem1=hround(fudged.hair+stem_corr);
@@ -792,7 +792,8 @@ if hefty:
y6=if monospace: vround 1/3h else: oo fi;
numeric upper_notch,lower_notch;
upper_notch=h-notch_cut+eps; lower_notch=y5+notch_cut-eps;
- x1'=rt x1r; z1'=whatever[z5l,z6l]; x3'=lft x3l; z3'=whatever[z7r,z8r];
+ x1'=max(rt x1r,x5l)+eps; z1'=whatever[z5l,z6l];
+ x3'=min(lft x3l,x8r)-eps; z3'=whatever[z7r,z8r];
z0=whatever[z5r,z6r]=whatever[z7l,z8l];
fill z5l..
if y1'<upper_notch: {right}(x1'+1,upper_notch){down}... fi
@@ -831,7 +832,8 @@ y[_one]r=h+vround 1.5oo; y[_three]r=-oo;
y[_two]=y[_four]=.5h-vair_corr; y[_two]l:=y[_four]l:=.52h;
%shift
forsuffixes $ = [_one]l,[_one],[_one]r,[_two]l,[_two],[_two]r,
- [_three]l,[_three],[_three]r,[_four]l,[_four],[_four]r: x$:=x$+w; endfor;
+ [_three]l,[_three],[_three]r,[_four]l,[_four],[_four]r:
+ x$:=x$+w if monospace:-1.25u fi; endfor;
penstroke pulled_arc.e([_one],[_two]) & pulled_arc.e([_two],[_three])
& pulled_arc.e([_three],[_four]) & pulled_arc.e([_four],[_one]) & cycle; % bowl
%%%
diff --git a/Master/texmf-dist/fonts/source/lh/base/lgt2slxu.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgt2slxu.mf
index bb3f5d3544f..525703a4899 100644
--- a/Master/texmf-dist/fonts/source/lh/base/lgt2slxu.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgt2slxu.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=1
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -37,7 +37,7 @@
% ZELO_m
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
iff serifs:%
lhchar "Uppercase Cyrillic letter variant NARROW_E - like Ukrainian E";
@@ -794,10 +794,10 @@ filldraw stroke z[_five]e--z[_six]e; % bar
penlabels(0,1,2,3,3,4,5,6); endchar;
lhchar "Uppercase Cyrillic letter MO";
-cyrchar(MO,16u#+width_adj#,cap_height#,0);
+cyrchar(MO,16u# if monospace: -2.5u# else:+width_adj# fi,cap_height#,0);
if is_small_cap: getcharcode(mo); fi
italcorr cap_height#*slant-cap_serif_fit#+cap_jut#-2.5u#+min(.5cap_stem#,u#);
-adjust_fit(cap_serif_fit#,13.5u#);
+adjust_fit(cap_serif_fit#,if monospace: 6.5u# else: 13.5u# fi);
% upper_m;
numeric stem[]; % thicknesses of the four strokes
stem1=hround(fudged.hair+stem_corr);
@@ -807,7 +807,7 @@ stem4=hround(fudged.cap_stem-3stem_corr);
if stem4<stem1: stem4:=stem1; fi
pickup tiny.nib; pos1(stem1,0); pos2(stem1,0);
pos3(stem4,0); pos4(stem4,0);
-x1=x2; x3=x4; x1l=w-x3r; rt x3r=hround min(w-2u,w-3u+.5stem4);
+x1=x2; x3=x4; x1l=w-x3r; rt x3r=hround min(w-2u,w-3u+.5stem4)+eps;
top y1=top y3=h; bot y2=bot y4=0;
filldraw stroke z1e--z2e; % left stem
filldraw stroke z3e--z4e; % right stem
@@ -817,7 +817,8 @@ if hefty:
y6=if monospace: vround 1/3h else: o fi;
numeric upper_notch,lower_notch;
upper_notch=h-cap_notch_cut; lower_notch=y6+cap_notch_cut;
- x1'=rt x1r; z1'=whatever[z5l,z6l]; x3'=lft x3l; z3'=whatever[z7r,z8r];
+ z1'=whatever[z5l,z6l]; x1'=hround max(rt x1r,x5l)-eps;
+ z3'=whatever[z7r,z8r]; x3'=hround min(lft x3l,x8r)+eps;
z0=whatever[z5r,z6r]=whatever[z7l,z8l];
fill z5l..
if y1'<upper_notch: {right}(x1'+1,upper_notch){down}... fi
@@ -840,17 +841,20 @@ if serifs:
dish_serif(4,3,e,1/3,cap_jut,f,1/3,cap_jut); fi % lower right serif
%%%
%O_part
-full_w:=13.5u;
+full_w:=if monospace: 10u else: 13.5u fi;
_zero:=4;
_one:=9; _two:=10; _three:=11; _four:=12; _five:=13; _six:=14;
penpos[_one](vair',90); penpos[_three](vround(vair+1.5vair_corr),-90);
penpos[_two](cap_curve,180); penpos[_four](cap_curve,0);
-x[_two]r=hround u;
+if monospace: x[_two]r=hround 1.5u;
+ interim superness:=sqrt superness; % make |"O"|, not |"0"|
+else: x[_two]r=hround u; fi
x[_four]r=full_w-x[_two]r; x[_one]=x[_three]=.5full_w; y[_one]r=h+o; y[_three]r=-o;
y[_two]=y[_four]=.5h-vair_corr; y[_two]l:=y[_two]l:=.52h;
%shift
forsuffixes $ = [_one]l,[_one],[_one]r,[_two]l,[_two],[_two]r,
- [_three]l,[_three],[_three]r,[_four]l,[_four],[_four]r: x$:=x$+w; endfor;
+ [_three]l,[_three],[_three]r,[_four]l,[_four],[_four]r:
+ x$:=x$+w if monospace:-2.25u fi; endfor;
penstroke pulled_super_arc.e([_one],[_two])(.5superpull)
& pulled_super_arc.e([_two],[_three])(.5superpull)
& pulled_super_arc.e([_three],[_four])(.5superpull)
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgunici.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgunici.mf
index 21fc1ffe47d..0fdbaca8d63 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgunici.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgunici.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -20,6 +20,8 @@
% List of letternames and their codes in Unicode
%
+% e_grv "50 E with grave
+% i_grv "5d I with grave
% gje "53 Ghe with acute
% kje "5c Ka with acute
% zh_brv "c2 Zhe with breve
@@ -33,6 +35,8 @@
% i_uml "e5 I with umlaut
% o_uml "e7 O with umlaut
% otld_uml "e9 O tilded with umlaut
+% ukre_uml -- Ukrainian E with umlaut
+% erev_uml "ed Erev with umlaut
% u_bar "ef U with macron (bar)
% u_uml "f1 U with umlaut
% u_dac "f3 U with double acute
@@ -40,7 +44,48 @@
% ery_uml "f9 Ery with umlaut
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
+
+lhchar "Italic Cyrillic letter e_grv - e grave";
+cyrchar_twice(e_grv,8u#,x_height#,0);
+italcorr max(1/3x_height#*slant,x_height#*slant+.5(.2[hair#,stem#])-u#); %e
+adjust_fit(if monospace:0 else:-.35u#fi,0);
+% ital_e;
+pickup fine.nib; %numeric heavy_hair; heavy_hair=hround .2[hair,stem];%defined in lxpseudo
+pos0(vair,-90); pos1(heavy_hair,0); pos2(vair,90);
+pos3(curve,180); pos4(vair,270); pos5(hair,320);
+x0=rt x3l; rt x1r=hround(w-1.5u+.5heavy_hair); x2=x4=.5(w+u);
+lft x3r=hround(1.5u-.5curve); x5r=good.x(w-eps); x6=x5;
+y0=y3=y6=bar_height; y1=.5[y0,y2]; top y2r=h+oo; bot y4r=-oo;
+top y5l=vround .5bar_height; path p; p=z4{right}..z5..z6;
+filldraw stroke z0e{right}...z1e{up}...pulled_arc.e(2,3)
+ & pulled_arc.e(3,4)...{direction 1 of p}z5e; % arc
+% the accent
+put_gravis; repeat_once;
+penlabels(0,1,2,3,4,5,6); endchar;
+
+lhchar "Italic Cyrillic letter i_grv - i grave";
+cyrchar_twice(i_grv,10u#,x_height#,0);
+italcorr 1/3x_height#*slant+.5hair#+.5u#;
+adjust_fit(0,0);
+% ital_i;
+pickup fine.nib; interim superness:=more_super;
+x2=x3+.25u; pos3(stem,-180); lft x3r=hround(2.5u-.5stem);
+% left skewstem;
+if monospace: pos0(vair,90); x0=good.x .5[0,x2]; top y0l=h; y2=2/3h;
+ pos2(stem,0); filldraw stroke z2e{u,x_height}...{left}z0e; % terminal
+else: x0=0; hook_in(0,1,2)(skewed); fi % opening hook
+pos2'(stem,-180); z2'=z2;
+pos4(vair,-90); pos5(hair,0); x4=.5[x3,x5];
+pos6(stem,0); rt x6r=hround(w-2.5u+.5stem);
+x5=x6=x7; x9=w; hook_out(7,8,9); % closing hook
+y3=.7[y4,y5]; bot y4r=-oo; y5=.57h; y6+.5stem=h;
+filldraw stroke z2'e{-u,-x_height}
+ ...super_arc.e(3,4)...{up}z5e; % left stem and arc
+filldraw circ_stroke z6e--z7e; % right stem
+% the accent
+put_gravis; repeat_once;
+penlabels(0,1,2,3,4,5,6,7,8,9); endchar;
lhchar "Italic Cyrillic letter kje (k acute)";
cyrchar_twice(kje,9u#,x_height#,0); %+acc_height#
@@ -361,6 +406,53 @@ fi
h:=full_h; lowercase_umlaut(0,0, 8,9,10,11);
penlabels(1,2,3,4,5,6,7, 8,9,10,11); endchar;
+lhchar "Italic Cyrillic letter ukre_uml - Ukrainian e (c with mid-line)";
+cyrchar(ukre_uml,8u#,lc_trema_height#,0);
+italcorr if math_fitting:1/3x_height#*slant else:x_height#*slant-.5u# fi; %c+.5u
+adjust_fit(if monospace:0 else:-.35u#fi,0); %c
+ full_h:=h; h:=x_height;
+% ital_ukre;
+pickup fine.nib; pos0(flare,0); pos1(hair,0); pos2(vair,90);
+pos3(curve,180); pos4(vair,270); pos5(hair,320);
+x2=x4=.5(w+u); rt x1r=max(rt x2,hround(w-.5u))+eps;
+lft x3r=hround(1.5u-.5curve); x5r=good.x(w-eps); x6=x5;
+y1=.5[bar_height,h]; top y2r=h+oo; bulb(2,1,0); % bulb
+bot y4r=-oo; y3=.5[y2,y4]; top y5l=vround .5bar_height; y6=bar_height;
+path p; p=z4{right}..z5..z6;
+filldraw stroke pulled_arc.e(2,3)
+ & pulled_arc.e(3,4)...{direction 1 of p}z5e; % arc
+pos7(vair,90); pos8(vair,90);
+y7=bar_height; rt x7=hround max(rt x2+1+eps,lft x0l-eps); x8=x3; y7=y8;
+filldraw stroke z7e--z8e;
+%%%%%
+% the accent
+h:=full_h; lowercase_umlaut(0,0, 9,10,11,12);
+penlabels(1,2,3,4,5,6,7,8); endchar;
+
+lhchar "Italic Cyrillic letter erev_uml - reverse e umlaut";
+cyrchar(erev_uml,8u#,lc_trema_height#,0);
+italcorr .7x_height#*slant+.5curve#-u# if math_fitting:-.5u# fi; %o
+adjust_fit(0,if monospace:0 else:-.35u# fi); %o
+h:=x_height;
+% ital_erev;
+pickup fine.nib;
+pos0(flare,180); pos1(hair,-180); pos2(vair,-90);
+pos3(curve,0); pos4(vair,90); pos5(hair,140);
+x2+.5u=x4=.5(w-u); lft x1r=min(lft x2,hround(.25u))-eps;
+rt x3r=w-hround(1.5u-.5curve); lft x5r=good.x (lft x1r-eps); x6=x5;
+y1-.5flare=.1h; bot y2r=-oo; bulb(2,1,0); % bulb
+top y4r=h+oo; y3=.5[y2,y4]; top y5r=vround .5[bar_height,h];
+y6=bar_height; path p; p=z4{left}....z5..z6;
+filldraw stroke pulled_arc.e(2,3)
+ & pulled_arc.e(3,4)...{direction 1 of p}z5e; % arc
+x7=x3; y7=bar_height; y8=y7; lft x8=hround min(lft x2-1-eps,rt x0l+eps);
+pos7(vair,90); pos8(vair,90);
+filldraw stroke z7e--z8e;
+%%%
+% the accent
+h:=full_h; lowercase_umlaut(0,0, 9,10,11,12);
+penlabels(0,1,2,3,4,5,6,7,8, 9,10,11,12); endchar;
+
lhchar "Italic Cyrillic letter u_bar - u bar (macron)";
cyrchar(u_bar,if monospace:8.5u# else:9u#fi,lc_trema_height#,desc_depth#);
italcorr x_height#*slant+.5stem#-u#;
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgunicl.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgunicl.mf
index 608af0c5109..4c9a6a83f5a 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgunicl.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgunicl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -20,6 +20,8 @@
% List of letternames and their codes in Unicode
%
+% e_grv "50 E with grave
+% i_grv "5d I with grave
% gje "53 Ghe with acute
% kje "5c Ka with acute
% zh_brv "c2 Zhe with breve
@@ -33,6 +35,8 @@
% i_uml "e5 I with umlaut
% o_uml "e7 O with umlaut
% otld_uml "e8 O tilded with umlaut
+% ukre_uml -- Ukrainian E with umlaut
+% erev_uml "ed Erev with umlaut
% u_bar "ef U with macron (bar)
% u_uml "f1 U with umlaut
% u_dac "f3 U with double acute
@@ -40,7 +44,108 @@
% ery_uml "f9 Ery with umlaut
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
+
+if concrete: input lgnoncl; fi % Cyrillic concrete letters
+
+lhchar "Lowercase Cyrillic letter e_grv - e grave";
+cyrchar_twice(e_grv,7.25u#+max(.75u#,.5curve#),x_height#,0);
+italcorr .5[bar_height#,x_height#]*slant+.5min(curve#-1.5u#,0);
+adjust_fit(if monospace: .25u#,.5u# else: 0,0 fi);
+% lower_e;
+numeric left_curve,right_curve;
+left_curve=right_curve+6stem_corr=curve if not serifs: -3stem_corr fi;
+if right_curve<tiny.breadth: right_curve:=tiny.breadth; fi
+if left_curve<tiny.breadth: left_curve:=tiny.breadth; fi
+pickup tiny.nib; pos1(right_curve,0);
+pos2(vair,90); pos3(left_curve,180);
+y1=good.y bar_height; top y2r=h+vround 1.5oo; y0l=bot y1;
+rt x1r=hround min(w-.5u,w-u+.5right_curve);
+lft x3r=hround max(.5u,1.25u-.5left_curve); x2=.5w+.25u;
+{{interim superness:=more_super;
+ filldraw stroke super_arc.e(1,2)}}; % right bowl
+y3=.5[y2,y4]; bot y4r=-oo; x4=x2+.25u;
+if serifs:
+ pos4(vair',270); pos5(hair,360);
+ y5=max(good.y(.5bar_height-.9),y4l+vair); x5r=x1r;
+ (x,y4l)=whatever[z4r,z5]; x4l:=min(x,x4l+.5u);
+ filldraw stroke pulled_arc.e(2,3) & pulled_arc.e(3,4)
+ ...{x5-x4,5(y5-y4)}z5e; % left bowl, arc, and terminal
+else:
+ pos4(vair,270);
+ filldraw stroke super_arc.e(2,3) & super_arc.e(3,4); % left bowl and arc
+ pickup fine.nib; pos4'(vair,270); z4=z4';
+ pos5(.5[vair,flare],275); rt x5r=hround(w-.6u);
+ y5r=good.y(y5r+1/3bar_height-y5); y5l:=good.y y5l; x5l:=good.x x5l;
+ filldraw stroke term.e(4',5,right,1,4); fi % terminal
+path testpath; testpath=super_arc.r(2,3) & super_arc.r(3,4);
+y1'r=y0r=y0l+.6[thin_join,vair]; y1'l=y0l; x1'l=x1'r=x1;
+forsuffixes $=l,r:
+ x0$=xpart(((0,y0$)--(x1,y0$)) intersectionpoint testpath); endfor
+fill stroke z0e--z1'e; % crossbar
+%%%%%
+% the accent
+hpos_corr=1.5u;
+put_gravis; repeat_once;
+penlabels(0,1,2,3,4,5); endchar;
+
+lhchar "Lowercase Cyrillic letter i_grv - i grave";
+cyrchar_twice(i_grv,10u# if not serifs:+.5width_adj# fi, % n_width
+ x_height#,0);
+italcorr x_height#*slant-serif_fit#+jut#-2u#+.5stem#; %d->x_height+jut
+adjust_fit(serif_fit#,serif_fit#);
+begingroup
+% lower_i;
+pickup tiny.nib; pos1(fudged.stem,0); pos2(fudged.stem,0);
+pos3(fudged.stem,0); pos4(fudged.stem,0);
+lft x1l=lft x2l=hround(2.5u-.5fudged.stem-eps); x3=x4=w-x1;
+top y1=top y3=h; bot y2=bot y4=0;
+filldraw stroke z1e--z2e; % left stem
+filldraw stroke z3e--z4e; % right stem
+numeric stem[],alpha[];
+if hefty: numeric upper_notch,lower_notch;
+ stem1=fudged.hair-2stem_corr;
+ upper_notch=y6-cap_notch_cut-eps; lower_notch=y5+cap_notch_cut+eps;
+ if monospace:
+ x5r =rt x1r; x6l =lft x3l; y5=vround(vair'+eps); y6=vround(h-vair-eps);
+ alpha1=diag_ratio(1,stem1,y5-y6,x5r-x6l);
+ penpos5(min(2fudged.stem,alpha1*stem1),0);
+ penpos6(min(2fudged.stem,alpha1*stem1),0);
+ x5'=lft x1l; z5'=whatever[z5l,z6l]; x6'=rt x4r; z6'=whatever[z5r,z6r];
+ x5l:=x5'; x6r:=x6'; y5l:=y5'; y6r:=y6';
+ else:
+ y5l=0; y6r=h; x5=x1r; x6=x3l; penpos5(stem1,0); penpos6(stem1,0);
+ fi
+ x2'=rt x1r; z2'=whatever[z5l,z6l]; x3'=lft x4l; z3'=whatever[z5r,z6r];
+ fill z5l..
+ if y2'>lower_notch: {right}(x2'+1,lower_notch){up}... fi
+ {z6-z5}diag_in(5l,6l,1,6r)--z6r..
+ if y3'<upper_notch: {left}(x3'-1,upper_notch){down}... fi
+ {z5-z6}diag_in(6r,5r,1,5l)--cycle; % diagonal
+else:
+ x5=hround (rt x1r-.5)-eps; x6=hround (lft x3l+.5)+eps;
+ y5l=vround(y2+bracket+eps); y6r=vround(y3-bracket-eps);
+ stem1=max(tiny.breadth,fudged.hair-2stem_corr);
+ alpha1=diag_ratio(1,stem1,x6-x5,top y6r-bot y5l);
+ penpos5(alpha1*stem1,90); penpos6(alpha1*stem1,90);
+ fill stroke z5e--z6e; fi % diagonal
+%%%
+if serifs:
+ numeric inner_jut;
+ if rt x1r+jut+.5u+1<=lft x3l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+1=lft x3l-inner_jut; fi
+ save slab; slab:=Vround(vair-vair_corr); % lower.slab
+ dish_serif(1,2,a,1/3,jut,b,1/3,inner_jut); % upper left serif
+ dish_serif(3,4,e,1/3,inner_jut,f,1/3,jut); % upper right serif
+ slab:=vair; % lower.slab
+ dish_serif(2,1,c,1/3,jut,d,1/3,inner_jut); % lower left serif
+ dish_serif(4,3,g,1/3,inner_jut,h,1/3,jut); fi % lower right serif
+%%%%%
+endgroup;
+% the accent
+hpos_corr=0.75u;
+put_gravis; repeat_once;
+penlabels(1,2,3,4,5,6); endchar;
lhchar "Lowercase Cyrillic letter gje (g acute)";
cyrchar_twice(gje,8u#-.5width_adj#,x_height#,0);
@@ -65,6 +170,7 @@ endgroup;
hpos_corr=-u; put_accent; repeat_once;
penlabels(0,1,2,3,4,5,6,7,8,9); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Lowercase Cyrillic letter kje (k acute) (`roman')";
cyrchar_twice(kje,if serifs:10u# else:9.5u# fi % zhk_width: n_width;keng_width
@@ -122,6 +228,7 @@ endgroup;
hpos_corr=-u; put_accent; repeat_once;
penlabels(1,2,3,4,5,6); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Lowercase Cyrillic letter zh_brv - zhe breve (`roman')";
cyrchar(zh_brv,if serifs:10u# else:9.5u# fi % zhk_width: n_width;keng_width
@@ -383,6 +490,7 @@ fill stroke z0e--z1'e; % crossbar
h:=full_h; lowercase_umlaut(0,0, 7,8,9,10);
penlabels(0,1,2,3,4,5,5'); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Lowercase Cyrillic letter zh_uml - zhe umlaut (`roman')";
cyrchar(zh_uml,if serifs:10u# else:9.5u# fi % zhk_width: n_width;keng_width
@@ -678,6 +786,111 @@ fi
h:=full_h; lowercase_umlaut(0,0, 8,9,10,11);
penlabels(1,2,3,4); endchar;
+lhchar "Lowercase Cyrillic letter ukre_uml - Ukrainian e (C with mid-line)";
+cyrchar(ukre_uml,8u#,lc_trema_height#,0); % eng
+italcorr x_height#*slant-.2u#;
+adjust_fit(if monospace: .5u#,.5u# else: -.1u#,0 fi);
+full_h:=h; h:=x_height;
+% lower_ukre;
+set_bar_axis;
+pickup fine.nib; pos2(vair',90); pos3(curve,180); pos4(vair',270);
+x2=x4=(.5(w+u)); top y2r=vround(h+1.5oo); bot y4r=-oo;
+lft x3r=(hround max(.6u,1.35u-.5curve)); y3=.5h;
+if serifs:
+ pos1(hair,0); pos5(hair,360);
+ y1=min(y2.bh+.75flare-.25vair+eps,.9[bar_height,h]-.75flare);
+ rt x1r=rt x5r=hround(w-.5u);
+ y5=max(good.y(.5bar_height-.9),y4l+vair');
+ (x,y4l)=whatever[z4r,z5l]; x4l:=min(x,x4l+.5u);
+ filldraw stroke z1e{x2-x1,5(y2-y1)}...pulled_super_arc.e(2,3)(.7superpull)
+ & pulled_super_arc.e(3,4)(.5superpull)
+ ..tension .9 and 1..{x5-x4,5(y5-y4)}z5e; % arc and lower terminal
+ pos6(.3[fine.breadth,hair],0); x6r=x1r; top y6=h+oo;
+ x1r-x1'=1.5curve; y1'=y1;
+ path upper_arc; upper_arc=z1{x2-x1,5(y2-y1)}..z2{left};
+ numeric t; t=xpart(upper_arc intersectiontimes (z6l--z1'));
+ filldraw z1r--z6r--z6l--subpath(t,0) of upper_arc--cycle; % barb
+else:
+ pos1(4/7[vair',flare],80); pos5(.6[vair',flare],275);
+ rt x1r=hround(w-.6u);
+ top y1r=vround .82[bar_height,top y2r];
+ filldraw stroke term.e(2,1,right,.8,4); % upper terminal
+ rt x5r=hround(w-.5u);
+ y5r=good.y(y5r+1/3bar_height-y5); y5l:=good.y y5l; x5l:=good.x x5l;
+ forsuffixes e=l,r: path p.e; p.e=z4e{right}..tension .9 and 1..z5e;
+ if angle direction 1 of p.e>75:
+ p.e:=z4e{right}..tension atleast.9 and 1..{dir 75}z5e; fi endfor
+ filldraw stroke pulled_super_arc.e(2,3)(.7superpull)
+ & pulled_super_arc.e(3,4)(.5superpull) & p.e; fi % arc and lower terminal
+%%%
+% lukre_bar;
+if (serifs=true) and (bar#<=.5curve#):
+ x7r=x3l; x8r=min(lft x1l-.5hair,0.85[x3l,x1l]);
+ y7l=y8l=y1.bh; y7r=y8r=y2.bh; x7l=x7r; x8l=x8r;
+ numeric bar[];
+ bar2=7/8[bar,fudged.stem-2stem_corr];
+ penpos9(bar2,45); z9=.575[z7l,z8l];
+ fill circ_stroke z8e{-2,-1}..{-2,1}z9e..{-2,-1}z7e; % curve ~
+else:
+ bar_stroke(x3l,min(lft x1l-.5hair,0.85[x3l,x1l])); % bar --
+fi
+%%%%%
+h:=full_h; lowercase_umlaut(0,0, 10,11,12,13);
+penlabels(1,1',2,3,4,5,6,7,8,9); endchar;
+
+lhchar "Lowercase Cyrillic letter erev_uml - reverse e umlaut";
+cyrchar(erev_uml,8u#,lc_trema_height#,0); % eng
+italcorr x_height#*slant-.2u#;
+adjust_fit(if monospace: .5u#,.5u# else: 0,0 fi);
+full_h:=h; h:=x_height;
+% lower_erev;
+set_bar_axis;
+pickup fine.nib; pos2(vair',90); pos3(curve,0); pos4(vair',-90);
+x2=x4=w-.5(w+u); top y2r=vround(h+1.5oo); bot y4r=-oo;
+rt x3r=w-hround max(.6u,1.35u-.5curve); y3=.5h; % eng
+if serifs:
+ pos1(hair,180); pos5(hair,-180);
+ y1=min(y2.bh+.75flare-.25vair+eps,.9[bar_height,h]-.75flare);
+ lft x1r=lft x5r=hround.5u;
+ y5=max(good.y(.5bar_height-.9),y4l+vair');
+ (x,y4l)=whatever[z4r,z5l]; x4l:=max(x,x4l-.5u);
+ filldraw stroke z1e{x2-x1,5(y2-y1)}...pulled_super_arc.e(2,3)(.7superpull)
+ & pulled_super_arc.e(3,4)(.5superpull)
+ ..tension .9 and 1..{x5-x4,5(y5-y4)}z5e; % arc and lower terminal
+ pos6(.3[fine.breadth,hair],180); x6r=x1r; top y6=h+oo;
+ x1'-x1r=1.5curve; y1'=y1;
+ path upper_arc; upper_arc=z1{x2-x1,5(y2-y1)}..z2{right};
+ numeric t; t=xpart(upper_arc intersectiontimes (z6l--z1'));
+ filldraw z1r--z6r--z6l--subpath(t,0) of upper_arc--cycle; % barb
+else:
+ pos1(4/7[vair',flare],100); pos5(.6[vair',flare],-95);
+ lft x1r=good.x .6u; top y1r=vround .82[bar_height,top y2r];
+ filldraw stroke term.e(2,1,left,.8,4); % upper terminal
+ lft x5r=good.x .5u;
+ y5r=good.y(y5r+1/3bar_height-y5); y5l:=good.y y5l; x5l:=good.x x5l;
+ forsuffixes e=l,r: path p.e; p.e=z4e{left}..tension .9 and 1..z5e;
+ if angle direction 1 of p.e<105:
+ p.e:=z4e{left}..tension atleast.9 and 1..{dir 105}z5e; fi
+ endfor
+ filldraw stroke pulled_super_arc.e(2,3)(.7superpull)
+ & pulled_super_arc.e(3,4)(.5superpull) & p.e; fi % arc and lower terminal
+%%%
+% lerev_bar;
+if (serifs=true) and (bar#<=.5curve#):
+ x7r=max(rt x1l+.5hair,0.85[x3l,x1l]); x8r=x3l;
+ y7l=y8l=y1.bh; y7r=y8r=y2.bh; x7l=x7r; x8l=x8r;
+ numeric bar[];
+ bar2=7/8[bar,fudged.stem-2stem_corr];
+ penpos9(bar2,45); z9=.475[z7l,z8l];
+ fill circ_stroke z7e{2,1}..{2,-1}z9e..{2,1}z8e; % curve /\/
+else:
+ bar_stroke(max(rt x1l+.5hair,0.85[x3l,x1l]),x3l); % bar --
+fi
+%%%%%
+% the accent
+h:=full_h; lowercase_umlaut(0,0, 10,11,12,13);
+penlabels(1,1',2,3,4,5,6,7,8,9, 10,11,12,13); endchar;
+
lhchar "Lowercase Cyrillic letter u_bar - u bar (macron)";
cyrchar(u_bar,if serifs:9.5u# else:9u# fi,
lc_trema_height#,desc_depth#); % eng
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lgunicu.mf b/Master/texmf-dist/fonts/source/lh/nont2/lgunicu.mf
index b0348bb9d25..a75c5888f17 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lgunicu.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lgunicu.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -20,6 +20,8 @@
% List of letternames and their codes in Unicode
%
+% E_grv "00 E with grave
+% I_grv "0d I with grave
% GJE "03 Ghe with acute
% KJE "0c Ka with acute
% ZH_brv "c1 Zhe with breve
@@ -33,6 +35,8 @@
% I_uml "e4 I with umlaut
% O_uml "e6 O with umlaut
% OTLD_uml "e8 O tilded with umlaut
+% UKRE_uml -- Ukrainian E width umlaut
+% EREV_uml "ec Reverse E width umlaut
% U_bar "ee U with macron (bar)
% U_uml "f0 U with umlaut
% U_dac "f2 U with double acute
@@ -40,7 +44,92 @@
% ERY_uml "f8 Ery with umlaut
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
+
+if concrete: input lgnoncu; fi % Cyrillic concrete letters
+
+lhchar "Uppercase Cyrillic letter E_grv - E grave";
+cyrchar_twice(E_grv,12u#-width_adj#,cap_height#,0);
+if is_small_cap: getcharcode(e_grv); fi
+italcorr cap_height#*slant-beak_jut#-.5u#;
+adjust_fit(cap_serif_fit#,0);
+% upper_e;
+pickup tiny.nib; pos1(cap_stem,0); pos2(cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+pickup crisp.nib; pos3(slab,90); pos4(hair,0);
+top y3r=h; x3=x1; rt x4r=hround(w-u); y4=good.y(y3l-beak)-eps;
+arm(3,4,e,beak_darkness,beak_jut); % upper arm and beak
+pos5(cap_bar,-90); pos6(hair,0);
+top y5l=vround(.52[y2,y1]+.5cap_bar); x5=x1;
+pos0(cap_bar,90); pos7(hair,0);
+z0=z5; x6=x7; y6-y5l=y0l-y7;
+if serifs: rt x6r=hround(w-4.4u+.5hair); y6=good.y(y5l+.6beak)+eps;
+ rt x9r=hround(w-.5u);
+else: rt x6r=hround(w-1.5u); y6=y5l+eps; rt x9r=hround(w-.75u); fi
+arm(5,6,f,beak_darkness,0); arm(0,7,g,beak_darkness,0); % middle arm and serif
+pos8(slab if not serifs:+2stem_corr fi,-90); pos9(hair,0);
+bot y8r=0; x8=x2; y9=good.y(y8l+7/6beak)+eps;
+arm(8,9,h,beak_darkness,1.5beak_jut); % lower arm and beak
+if serifs: nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
+ nodish_serif(2,1,c,1/3,cap_jut,d,1/3,.5cap_jut); fi % lower serif
+%%%%%
+% the accent
+hpos_corr= .75u;
+put_gravis(cyrcaph); repeat_once;
+penlabels(0,1,2,3,4,5,6,7,8,9); endchar;
+
+lhchar "Uppercase Cyrillic letter I_grv - I grave";
+cyrchar_twice(I_grv,13.5u#,cap_height#,0); % N_width
+if is_small_cap: getcharcode(i_grv); fi
+italcorr cap_height#*slant-cap_serif_fit#+cap_jut#-2.5u#+min(.5cap_stem#,u#);
+adjust_fit(cap_serif_fit#,cap_serif_fit#);
+% upper_i;
+pickup tiny.nib; pos1(fudged.cap_stem,0); pos2(fudged.cap_stem,0);
+pos3(fudged.cap_stem,0); pos4(fudged.cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5cap_stem); x3=x4=w-x1;
+top y1=top y3=h; bot y2=bot y4=0;
+filldraw stroke z1e--z2e; % left stem
+filldraw stroke z3e--z4e; % right stem
+numeric stem[],alpha[];
+if hefty: numeric upper_notch,lower_notch;
+ stem1=fudged.hair-stem_corr;
+ upper_notch=y6-cap_notch_cut-eps; lower_notch=y5+cap_notch_cut+eps;
+ if monospace:
+ x5r =rt x1r; x6l =lft x3l; y5=vround(slab+eps); y6=vround(h-slab-eps);
+ alpha1=diag_ratio(1,stem1,y5-y6,x5r-x6l);
+ penpos5(min(2fudged.cap_stem,alpha1*stem1),0);
+ penpos6(min(2fudged.cap_stem,alpha1*stem1),0);
+ x5'=lft x1l; z5'=whatever[z5l,z6l]; x6'=rt x4r; z6'=whatever[z5r,z6r];
+ x5l:=x5'; x6r:=x6'; y5l:=y5'; y6r:=y6';
+ else:
+ y5l=0; y6r=h; x5=x1r; x6=x3l; penpos5(stem1,0); penpos6(stem1,0);
+ fi
+ x2'=rt x1r; z2'=whatever[z5l,z6l]; x3'=lft x4l; z3'=whatever[z5r,z6r];
+ fill z5l..
+ if y2'>lower_notch: {right}(x2'+1,lower_notch){up}... fi
+ {z6-z5}diag_in(5l,6l,1,6r)--z6r..
+ if y3'<upper_notch: {left}(x3'-1,upper_notch){down}... fi
+ {z5-z6}diag_in(6r,5r,1,5l)--cycle; % diagonal
+else: y5l=y2+bracket+eps; y6r=y3-bracket-eps;
+ x5=hround (rt x1r-.5)-eps; x6=hround (lft x3l+.5)+eps;
+ stem1=max(tiny.breadth,fudged.hair);
+ alpha1=diag_ratio(1,stem1,x6-x5,top y6r-bot y5l);
+ penpos5(alpha1*stem1,90); penpos6(alpha1*stem1,90);
+ fill stroke z5e--z6e; fi % diagonal
+%%%
+if serifs: numeric inner_jut;
+ if rt x1r+cap_jut+.5u+1<=lft x3l-cap_jut: inner_jut=cap_jut;
+ else: rt x1r+inner_jut+.5u+1=lft x3l-inner_jut; fi
+ dish_serif(1,2,a,1/3,cap_jut,b,1/3,inner_jut); % upper left serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,inner_jut); % lower left serif
+ dish_serif(3,4,e,1/3,inner_jut,f,1/3,cap_jut); % upper right serif
+ dish_serif(4,3,g,1/3,inner_jut,h,1/3,cap_jut); fi % lower right serif
+%%%%%
+% the accent
+hpos_corr= .75u;
+put_gravis(cyrcaph); repeat_once;
+penlabels(1,2,3,4,5,6); endchar;
lhchar "Uppercase Cyrillic letter GJE (G acute)";
cyrchar_twice(GJE,if monospace: 9u# else: 11u# fi-width_adj#, %G_width
@@ -62,6 +151,7 @@ if serifs: nodish_serif(1,2,a,1/3,cap_jut,b,1/3,.5cap_jut); % upper serif
put_accent(cyrcaph); repeat_once;
penlabels(1,2,3,4); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Uppercase Cyrillic letter KJE (K acute) (`roman')";
cyrchar_twice(KJE,13.5u#,cap_height#,0); % N_width %+acc_height#
@@ -322,6 +412,7 @@ fill stroke z0e--z1'e; % crossbar
h:=full_h; uppercase_umlaut(0,0, 7,8,9,10);
penlabels(0,1,2,3,4,5,6, 7,8,9,10); endchar;
+iff not concrete:%
iff not specific:%
lhchar "Uppercase Cyrillic letter ZH_uml - ZHE umlaut (`roman')";
cyrchar(ZH_uml,13.5u#,cap_height#+acc_height#,0); % N_width
@@ -597,6 +688,139 @@ else: fill stroke z5e--z6e; fi
h:=full_h; uppercase_umlaut(0,0, 8,9,10,11);
penlabels(1,2,3,4,5,6,7, 8,9,10,11); endchar;
+iff serifs:%
+lhchar "Uppercase Cyrillic letter UKRE_uml - Ukrainian E (C with mid-line)";
+cyrchar(UKRE_uml,13u#,cap_height#+acc_height#,0);
+if is_small_cap: getcharcode(ukre_uml); fi
+italcorr cap_height#*slant-.5u#;
+adjust_fit(0,0); full_h:=h; h:=cap_height;
+% upper_ukre;
+pickup fine.nib; pos1(cap_hair,0); pos2(cap_band,90);
+pos3(cap_curve,180); pos4(cap_band,270); pos5(hair,360);
+rt x1r=rt x5r=hround(w-u); lft x3r=hround u; x2=x4=.55[x3,x1];
+top y2r=h+o; bot y4r=-o; y3=.5h-vair_corr; y3l:=.52h;
+bot y1=min(vround.675h,bot y2l-eps);
+y5=max(good.y .95(h-y1),y4l+eps);
+(x2l',y2l)=whatever[z2r,z1l]; x2l:=min(x2l',x2l+.5u);
+(x4l',y4l)=whatever[z4r,z5l]; x4l:=min(x4l',x4l+.5u);
+filldraw stroke z1e{x2-x1,10(y2-y1)}...pulled_super_arc.e(2,3)(.5superpull)
+ & pulled_super_arc.e(3,4)(.5superpull)...{up}z5e; % arc
+pos6(.3[fine.breadth,cap_hair],0); x6r=x1r; top y6=h+o;
+x1r-x1'=2cap_curve-fine; y1'=y1;
+path upper_arc; upper_arc=z1{x2-x1,10(y2-y1)}..z2{left};
+numeric t; t=xpart(upper_arc intersectiontimes (z6l--z1'));
+filldraw z1r--z6r--z6l--subpath(t,0) of upper_arc--cycle; % barb
+% upukre_bar;
+numeric bar[]; y7=y8=y3;
+x7=x3l; x8=(min(lft x1l-.5hair,0.85[x3l,x1l]));
+if (serifs=true) and (bar#<=.5curve#):
+ penpos7(cap_bar,90); penpos8(cap_bar,90);
+ bar2=7/8[cap_bar,fudged.cap_stem-3stem_corr];
+ penpos9(bar2,45); z9=.575[z7l,z8l];
+ fill circ_stroke z8e{-2,-1}..{-2,1}z9e..{-2,-1}z7e; % curve ~
+else:
+ pickup fine.nib; pos7(cap_bar,90); pos8(cap_bar,90);
+ filldraw stroke z7e--z8e; fi % bar --
+%%%%%
+% the accent
+h:=full_h; uppercase_umlaut(x2-.5w,0, 11,12,13,14);
+penlabels(1,1',2,3,4,5,6); endchar;
+
+iff not serifs:%
+lhchar "Uppercase Cyrillic letter UKRE_uml - Ukrainian E (C with mid-line)";
+cyrchar(UKRE_uml,11.5u#,cap_height#+acc_height#,0);
+if is_small_cap: getcharcode(ukre_uml); fi
+italcorr cap_height#*slant-.5u#;
+adjust_fit(0,0); full_h:=h; h:=cap_height;
+% uppers_ukre;
+pickup fine.nib; pos1(1.2flare,80); pos2(slab,90);
+pos3(cap_curve,180); pos4(slab,270); pos5(flare,275);
+rt x1r=hround(w-1.1u); x2=x4=.5w+1.25u;
+lft x3r=hround max(u,2u-.5cap_curve); rt x5r=hround(w-.9u);
+top y1r=vround.95h+o; top y2r=h+o; y3=.5h;
+bot y4r=-o; bot y5r=vround .08h-o; y5l:=good.y y5l; x5l:=good.x x5l;
+filldraw stroke rterm.e(2,1,right,.9,4) & super_arc.e(2,3)
+ & super_arc.e(3,4) & term.e(4,5,right,.8,4);
+% uukres_bar;
+numeric bar[]; y6=y7=y3; x6=x3l; x7=(min(lft x1l-.5hair,0.85[x3l,x1l]));
+pickup fine.nib;
+bar1=if is_small_cap:max(fine.breadth+eps,.6[thin_join,vair]) else: cap_bar fi;
+pos6(bar1,90); pos7(bar1,90);
+filldraw stroke z6e--z7e; % bar --
+%%%%%
+% the accent
+h:=full_h; uppercase_umlaut(x2-.5w,0, 11,12,13,14);
+penlabels(1,1',2,3,4,5,6); endchar;
+
+iff serifs:%
+lhchar "Uppercase Cyrillic letter EREV_uml - Reverse E umlaut";
+cyrchar(EREV_uml,13u#,cap_height#+acc_height#,0);
+if is_small_cap: getcharcode(erev_uml); fi
+italcorr cap_height#*slant-.5u#;
+adjust_fit(0,0); full_h:=h; h:=cap_height;
+% upper_erev;
+ pickup fine.nib; pos1(cap_hair,180); pos2(cap_band,90);
+ pos3(cap_curve,0); pos4(cap_band,-90); pos5(hair,-180);
+ lft x1r=lft x5r=hround u;
+ rt x3r=hround(w-u); x2=x4=.55[x3,x1];
+ top y2r=h+o; bot y4r=-o; y3=.5h-vair_corr; y3l:=.52h;
+ bot y1=min(vround.675h,bot y2l-eps); y5=max(good.y .95(h-y1),y4l+eps);
+ (x2l',y2l)=whatever[z2r,z1l]; x2l:=max(x2l',x2l-.5u);
+ (x4l',y4l)=whatever[z4r,z5l]; x4l:=max(x4l',x4l-.5u);
+ filldraw stroke z1e{x2-x1,10(y2-y1)}...pulled_super_arc.e(2,3)(.5superpull)
+ & pulled_super_arc.e(3,4)(.5superpull)...{up}z5e; % arc
+ pos6(.3[fine.breadth,cap_hair],180); x6r=x1r; top y6=h+o;
+ x1'-x1r=2cap_curve-fine; y1'=y1;
+ path upper_arc; upper_arc=z1{x2-x1,10(y2-y1)}..z2{right};
+ numeric t; t=xpart(upper_arc intersectiontimes (z6l--z1'));
+ filldraw z1r--z6r--z6l--subpath(t,0) of upper_arc--cycle; % barb
+%%%
+%%% uerev_bar;
+numeric bar[]; y8=y7=y3;
+x8=x3l; x7=max(rt x1l+.5hair,0.85[x3l,x1l]);
+if (bar#<=.5curve#):
+ penpos7(cap_bar,90); penpos8(cap_bar,90);
+ bar2=7/8[cap_bar,fudged.cap_stem-3stem_corr];
+ penpos9(bar2,45); z9=.475[z7l,z8l];
+ fill circ_stroke z7e{2,1}..{2,-1}z9e..{2,1}z8e; % curve /\/
+else:
+ pickup fine.nib; pos7(cap_bar,90); pos8(cap_bar,90);
+ filldraw stroke z7e--z8e; % bar --
+fi
+%%%
+% the accent
+h:=full_h; uppercase_umlaut(x2-.5w,0, 10,11,12,13);
+penlabels(1,1',2,3,4,5,6,7,8,9, 10,11,12,13); endchar;
+
+iff not serifs:%
+lhchar "Uppercase Cyrillic letter EREV_uml - Reverse E umlaut";
+cyrchar(EREV_uml,11.5u#,cap_height#+acc_height#,0);
+if is_small_cap: getcharcode(erev_uml); fi
+italcorr cap_height#*slant-.5u#;
+adjust_fit(0,0); full_h:=h; h:=cap_height;
+% uppers_erev;
+ pickup fine.nib; pos1(1.2flare,100); pos2(slab,90);
+ pos3(cap_curve,0); pos4(slab,-90); pos5(flare,-95);
+ lft x1r=hround1.1u; x2=x4=w-(.5w+1.25u);
+ rt x3r=w-hround max(u,2u-.5cap_curve);
+ lft x5r=hround.9u;
+ top y1r=vround .95h+o; top y2r=h+o; y3=.5h;
+ bot y4r=-o; bot y5r=vround .08h-o; y5l:=good.y y5l; x5l:=good.x x5l;
+ filldraw stroke rterm.e(2,1,left,.9,4) & super_arc.e(2,3)
+ & super_arc.e(3,4) & term.e(4,5,left,.8,4);
+%%%
+% urevs_bar;
+pickup fine.nib; numeric bar[];
+bar1=if is_small_cap: max(fine.breadth+eps,.6[thin_join,vair])
+ else: cap_bar fi;
+pos6(bar1,90); pos7(bar1,90);
+y7=y6=y3; x7=x3l; x6=max(rt x1l+.5hair,0.85[x3l,x1l]);
+filldraw stroke z6e--z7e; % bar --
+%%%%%
+% the accent
+h:=full_h; uppercase_umlaut(x2-.5w,0, 8,9,10,11);
+penlabels(1,1',2,3,4,5,6,7, 8,9,10,11); endchar;
+
lhchar "Uppercase Cyrillic letter U_bar - U bar (macron)";
cyrchar(U_bar,13u#,cap_height#+acc_height#,0);
if is_small_cap: getcharcode(u_bar); fi
diff --git a/Master/texmf-dist/fonts/source/lh/nont2/lhberest.mf b/Master/texmf-dist/fonts/source/lh/nont2/lhberest.mf
index e45502bf539..2e4cbd4b8c2 100644
--- a/Master/texmf-dist/fonts/source/lh/nont2/lhberest.mf
+++ b/Master/texmf-dist/fonts/source/lh/nont2/lhberest.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -22,14 +22,12 @@
% additional macros for ec compatible mode
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
if unknown cmbase: input cmbase fi %
input lcyrbeg;
-LHver_check(3,4); % like |version_check| in ec
-
string genmode; genmode="cm";
let lhchar=\;
diff --git a/Master/texmf-dist/fonts/source/lh/specific/lgcrusl.mf b/Master/texmf-dist/fonts/source/lh/specific/lgcrusl.mf
index 2bb2225069f..9747f59ad82 100644
--- a/Master/texmf-dist/fonts/source/lh/specific/lgcrusl.mf
+++ b/Master/texmf-dist/fonts/source/lh/specific/lgcrusl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=0
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -28,7 +28,7 @@
% f
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
lhchar "Lowercase Russian letter a - Small Caps A";
cyrchar(a,if serifs: 9.5u# else:9u# fi,x_height#,0);
diff --git a/Master/texmf-dist/fonts/source/lh/specific/lgcyrcl.mf b/Master/texmf-dist/fonts/source/lh/specific/lgcyrcl.mf
new file mode 100644
index 00000000000..de480378c65
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/specific/lgcyrcl.mf
@@ -0,0 +1,763 @@
+%
+% lgcyrcl.mf
+%
+%% Cyrillic font container with T2 encoding beta-support
+%
+% This file is future part of lxfonts package
+% Version 3.5 // Patchlevel=1
+% (c) O.Lapko
+%
+% This package is freeware product under conditions similar to
+% those of D. E. Knuth specified for the Computer Modern family of fonts.
+% In particular, only the authors are entitled to modify this file
+% (and all this package as well) and to save it under the same name.
+%
+% Content:
+%
+% Lowercase Cyrillic letters common for couple of encodings
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% List of letternames and their codes in T2 & Ko
+%
+% X2 T2A T2B T2C T2D X2S LH WNCYR
+%
+% lje "6b k "a7 "a8 - - - - "09 Lje
+%
+% X2 T2A T2B T2C
+%
+% k_vcrs "66 f "ab - - Ka vertically crossed
+% k_hcrs "67 g - - "ab Ka horisontally crossed
+% l_dsc "68 h - "aa "aa El with descender
+%
+% zh_dsc "a5 "a5 "a5 - Zhe with descender
+% k_dsc "a9 "a9 "a9 "a9 Ka with descender
+% k_beak "aa "aa - - Ka with reversed beak
+% l_tl "ac - "ac - El with tail
+%
+
+LHver_check(3,5); % like |version_check| in ec
+
+begingroup
+
+def is_egyptian =
+% |false| for most of the CM fonts, except funny fonts;
+% |true| for the CC fonts
+ (serifs and (1.4max(fine#,crisp#, tiny#)<slab#) and (1.6slab#>stem#))
+%added
+ or (vair#>.5stem#)
+enddef;
+
+lhchar "Lowercase Cyrillic letter lje (`concrete' form)";
+cyrchar(lje,10u# % if not serifs:+.5width_adj# fi % dl_width;n_width
+ ,x_height#,0);
+italcorr .5x_height#*slant+min(.5curve#-.85u#,-.1u#); %p
+adjust_fit(if serifs: .25(7/8[hair#,flare#])-.25u# if is_egyptian:+.5hair# fi
+ else: serif_fit# fi,
+ 3.25u# if serifs:-.5width_adj# fi);%lsftsn_adj(lje);lsftsnwd-.25u-.5width_adj
+%lower_spec_l;
+numeric bulb_diam; bulb_diam=hround 7/8[hair,flare];
+numeric left_stem,right_stem,outer_jut,alpha;
+right_stem=stem-stem_corr;
+left_stem=max(tiny.breadth+eps,min(hair if hefty:-3stem_corr fi,right_stem));
+outer_jut=.75jut; x4r=w+serif_fit-outer_jut- if serifs:.25 else:.5 fi u;
+x1l-.5u-.065jut=w-x4r; y1=y4=0; x2-x1=x4-x3;
+if serifs: x3l=x2r+((x1r-x4l)*(vair/(h-vair)))if not is_egyptian:-.25left_stem fi;
+ else: x3r=x2r+apex_corr; fi
+y2=y3=h if not serifs:+apex_o+apex_oo fi;
+alpha=diag_ratio(2,left_stem,y2-y1,x4r-x1l-apex_corr);
+penpos1(alpha*left_stem,0); penpos2(alpha*left_stem,0);
+penpos3(alpha*right_stem,0); penpos4(alpha*right_stem,0);
+if serifs:
+ fill stroke z3e--z4e; % right stem
+ pickup tiny.nib;
+ penpos5(left_stem,-90); pos5'(left_stem,-90); z5'=z5;
+ pos8(hair,-180); pos9(bulb_diam,-180);
+ y9-.5bulb_diam=.12desc_depth-eps; lft x9r=l+letter_fit+hround(.35u-.5);
+ y5r=-oo-eps; x5=max(min(.4[x9r,x1r],rt x9l+eps),lft x9r+.5bulb_diam);
+ z7r=(max(.5[x1,x1r],x9+if is_egyptian:1.25bulb_diam +.5slant*hair
+ else: 1.5bulb_diam-hair fi),
+ y7l-7/8left_stem);
+ z7l=(x7r-2/3(x1r-x1l),if is_egyptian: .35[y5l,y5] else: y5 fi);
+ y6l=y9+.5bulb_diam; z6r=(x7r,y1)+whatever*(z1-z2);%
+ y6r-y6l=y5r-y5l; x6r-x6l=2/3(x1r-x1l);
+ fill stroke z2e.. controls z6e and z7e ..z5e; % left stem
+ {{less_tense; cyrbulb(5',8,9)}}; % arc and bulb
+ numeric inner_jut,left_jut,fit;
+ pickup tiny.nib; left_jut=jut+left_stem;
+ prime_points_inside(4,3);
+ x10r=x3r; top y10=h; pos10(max(currentbreadth+eps,alpha*right_stem),0); x4:=x4r;
+ if rt x1r+jut+.5u+1<=lft x4'l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
+ save slab; slab:=Vround(vair-vair_corr);
+ serif(10,4,c,0,-left_jut); % upper serif
+ slab:=vair;
+ nodish_serif(4',3,d,1/2,inner_jut,e,1/3,outer_jut); %!!! right serif
+else: z0=whatever[z1r,z2r]=whatever[z3l,z4l];
+ if y0<h-notch_cut: y0:=h-notch_cut;
+ fill z0+.5right{down}...{z4-z3}diag_end(3l,4l,1,1,4r,3r)
+ --diag_end(4r,3r,1,1,2l,1l)--diag_end(2l,1l,1,1,1r,2r){z2-z1}
+ ...{up}z0+.5left--cycle; % left and right diagonals
+ else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
+ --diag_end(2l,1l,1,1,1r,0)--cycle; fi fi % left and right diagonals
+%%%%%
+% now the b part
+w:=w+3.25u if serifs:-.5width_adj fi;%lsftsnwd-.25u-.5width_adj
+% lsftsn_bowl(2)lje;
+_zero:=4;
+_one:=12; _two:=13; _three:=14; _four:=15; _five:=16;
+%
+set_bar_axis;
+penpos[_three](curve if hefty:-3stem_corr fi,0);
+penpos[_four](vair,-90); penpos[_five](vair,-90);
+z[_five]r=z[_zero]; y[_four]=y[_five];%!!!
+y[_three]=.5[y[_two]l,y[_four]l];
+y[_one]l=y[_two]l=y1.bh; y[_one]r=y[_two]r=y2.bh;
+z[_one]l=whatever[z3,z4]; x[_one]l=x[_one]=x[_one]r;%!!!
+x[_two]l=x[_two]r=x[_four]=w-3.25u; %!!!
+x[_three]r=hround(w-.6u);
+x[_two]l:=x[_four]l:=x[_two]r-.25curve;
+fill stroke
+ {{if not serifs: interim superness:=more_super; fi
+ z[_five]e..super_arc.e([_four],[_three])}} &
+ super_arc.e([_three],[_two])..z[_one]e; % lobe
+%%%
+penlabels(1,2,3,4,5,6,7,8,9,10,11); endchar;
+
+lhchar "Lowercase Cyrillic letter k_vcrs (`concrete' form)";
+cyrchar(k_vcrs,11.5u# if not serifs:+.5width_adj# fi,
+ % n_width+if serifs:1.5u else:+2u+.5tiny fi
+ x_height#,0);
+italcorr x_height#*slant-.2u#;
+adjust_fit(serif_fit#,serif_fit#);
+ numeric stem[]; stem1=max(tiny.breadth,hround(fudged.stem-stem_corr));
+pickup tiny.nib; pos1(fudged.stem,0); pos2(fudged.stem,0);
+lft x1l=lft x2l=hround (2.5u-.5fudged.stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+% kv_cbowl;
+ pos10(stem1,0); x10=hround(w-7u); y10=y1;
+% k_cbowl;
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6jut else:.4tiny fi;
+stem1=max(tiny.breadth,hround(fudged.hair if hefty:-\\4stem_corr fi));
+stem2=max(tiny.breadth,fudged.stem-3stem_corr);
+x3r=hround(r-letter_fit-.7u-right_jut)-.5tiny+eps;
+x6r=hround(r-letter_fit-.3u-right_jut)-.5tiny+eps;
+y4=.7bar_height; top y3=h; bot y6=0; x4=x10;%!!!
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5$=z6'$+whatever*(z10-z6)=z3'$+whatever*(z3-z4); endfor%!!!
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y10-y6,x6r-x10));%!!!
+else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z10-z6 of currentpen+whatever*(z10-z6);
+z6'l=z6l+penoffset z6-z10 of currentpen+whatever*(z10-z6);
+fill z5r--diag_end(4r,3'r,1,.5,3'l,4l)--z5l--cycle; %!!! upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(vair',90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+%%%
+else: fill z5l--diag_end(5l,6'l,.5,1,6'r,5r)--z5r--cycle; fi % lower diagonal
+%%%
+ if (2(y5l-y5r)>(.6[thin_join, vair]-eps)) or (y5l<y5r):
+ y9r=vround (y5l+.5(.6[thin_join, vair])-eps);
+ else:y9r=vround (y5r+.5(.6[thin_join, vair])-eps); fi
+ y9r=y8r; y9r-y9l=y8r-y8l=(.6[thin_join, vair]); x9l=x9r=x1; x8l=x8r=x5r;
+ fill stroke z9e--z8e; % middle cross
+if serifs:
+ pickup tiny.nib;
+ save slab; slab:=Vround(vair-vair_corr); % lower.slab
+ dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ slab:=vair; % lower.slab
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); fi % lower stem serif
+%%%
+if serifs:
+ numeric inner_jut,up_inner_jut;
+ if rt x2r+.5u+1<=lft x6l-jut: inner_jut=jut;
+ else: rt x2r+jut+.5u+1=lft x6l-inner_jut; fi
+ if rt x1r+jut+.5u+1<=lft x3l-1.2jut: up_inner_jut=1.2jut;
+ else: rt x1r+jut+.5u+1=lft x3l-up_inner_jut; fi
+ slab:=Vround(vair-vair_corr); % lower.slab
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); fi % upper diagonal serif
+% slab:=vair; % lower.slab
+% dish_serif(6,5,g,1/2,inner_jut,h,1/3,right_jut)(dark); fi % lower diagonal serif
+% vcross
+pickup if serifs: crisp.nib else: fine.nib fi;
+numeric middle_weight;
+middle_weight=max(currentbreadth+eps,.6[thin_join,vair]);
+pos12(middle_weight,0); pos11(middle_weight,0);
+lft x12l=lft x11l=
+ hround max(tiny.rt x1r+1,max(x5l-middle_weight,.5[tiny.rt x1r,x5l]));
+top y11-bot y12=.5x_height; .52[y12,y11]=.5[y9l,y9r];
+filldraw stroke z12e--z11e; % cross bar
+penlabels(1,2,3,4,5,6,7,8,9,10,11); endchar;
+
+lhchar "Lowercase Cyrillic letter k_hcrs (`concrete' form)";
+cyrchar(k_hcrs,10u#,asc_height#,0); % n_width
+italcorr x_height#*slant-.2u#;
+adjust_fit(serif_fit#,serif_fit#); full_h:=h; h:=x_height;
+% lower_hk;
+% long k_stem;
+numeric stem[]; stem1=max(tiny.breadth,hround(fudged.stem-stem_corr));
+stem2=max(tiny.breadth,hround(fudged.stem-2stem_corr));
+pickup tiny.nib; pos1(stem1,0); pos2(stem2,0);
+lft x1l=lft x2l=hround (2.5u-.5stem1); top y1=h; bot y2=0;
+x11'=x1; top y11'=asc_height; pos11'(stem1,0);
+filldraw stroke z11'e--z2e; % stem
+pos0(stem1,0); pos0'(stem2,0); y0=y0'; x0=x11'; x0'=x2;
+rt z0r=whatever[((w-.7u-jut-hair),x_height),(x1,.7bar_height)];
+filldraw stroke z11'e..z0e--z0'e..z2e; % stem
+if serifs:
+ sloped_serif.l(11',0,a,1/3,jut,serif_drop); fi % upper stem serif
+% k_cbowl;
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6jut else:.4tiny fi;
+stem1=max(tiny.breadth,hround(fudged.hair if hefty:-\\4stem_corr fi));
+stem2=max(tiny.breadth,fudged.stem-3stem_corr);
+x3r=hround(r-letter_fit-.7u-right_jut)-.5tiny+eps;
+x6r=hround(r-letter_fit-.3u-right_jut)-.5tiny+eps;
+y4=.7bar_height; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(vair',90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+%%%
+else: fill z5l--diag_end(5l,6'l,.5,1,6'r,5r)--z5r--cycle; fi % lower diagonal
+%%%
+if serifs: save slab; slab:=Vround(vair-vair_corr);
+ %dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ slab:=vair;
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower stem serif
+ numeric up_inner_jut;
+ if rt x1r+jut+.5u+1<=lft x3l-1.2jut: up_inner_jut=1.2jut;
+ else: rt x1r+jut+.5u+1=lft x3l-up_inner_jut; fi
+ slab:=Vround(vair-vair_corr);
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+fi
+%%%%%
+% hcross
+h:=full_h;
+_one:=8; _two:=9;
+pickup crisp.nib;
+pos[_one](bar,90); pos[_two](bar,90);
+top y[_one]r=top y[_two]r=vround (min(.5[x_height,h]+.5bar,h-max(bracket,1.2slab))-eps);
+rt x[_two]=x1r+if serifs: max(limit_dist,1.1jut) else: 1.7u fi;
+lft x[_one]=hround 1/3u-serif_fit;
+filldraw stroke z[_one]e--z[_two]e; % cross bar
+penlabels(1,2,3,4,5,6, 7,8); endchar;
+
+lhchar "Lowercase Cyrillic letter l_dsc (`concrete' form)";
+cyrchar(l_dsc,10u# % if not serifs:+.5width_adj# fi % dl_width;n_width
+ ,x_height#,if is_ogonek: desc_depth# else: sbeak# fi); %ldesc/og_depth
+italcorr x_height#*slant-serif_fit#+jut#-2u#+.5stem#; %d->x_height+jut
+adjust_fit(if serifs: .25(7/8[hair#,flare#])-.25u# if is_egyptian:+.5hair# fi
+ else: serif_fit# fi,
+ serif_fit# if serifs: if not is_ogonek:+.35jut# fi fi);
+begingroup
+%lower_spec_l;
+numeric bulb_diam; bulb_diam=hround 7/8[hair,flare];
+numeric left_stem,right_stem,outer_jut,alpha;
+right_stem=stem-stem_corr;
+left_stem=max(tiny.breadth+eps,min(hair if hefty:-3stem_corr fi,right_stem));
+outer_jut=.75jut; x4r=w+serif_fit-outer_jut- if serifs:.25 else:.5 fi u;
+x1l-.5u-.065jut=w-x4r; y1=y4=0; x2-x1=x4-x3;
+if serifs: x3l=x2r+((x1r-x4l)*(vair/(h-vair)))if not is_egyptian:-.25left_stem fi;
+ else: x3r=x2r+apex_corr; fi
+y2=y3=h if not serifs:+apex_o+apex_oo fi;
+alpha=diag_ratio(2,left_stem,y2-y1,x4r-x1l-apex_corr);
+penpos1(alpha*left_stem,0); penpos2(alpha*left_stem,0);
+penpos3(alpha*right_stem,0); penpos4(alpha*right_stem,0);
+if serifs:
+ fill stroke z3e--z4e; % right stem
+ pickup tiny.nib;
+ penpos5(left_stem,-90); pos5'(left_stem,-90); z5'=z5;
+ pos8(hair,-180); pos9(bulb_diam,-180);
+ y9-.5bulb_diam=.12desc_depth-eps; lft x9r=l+letter_fit+hround(.35u-.5);
+ y5r=-oo-eps; x5=max(min(.45[x9r,x1r],rt x9l-eps),lft x9r+.5bulb_diam);
+ z7r=(max(.5[x1,x1r],x9+if is_egyptian:1.25bulb_diam +.5slant*hair
+ else: 1.5bulb_diam-hair fi),
+ y7l-7/8left_stem);
+ z7l=(x7r-2/3(x1r-x1l),if is_egyptian: .35[y5l,y5] else: y5 fi);
+ y6l=y9+.5bulb_diam; z6r=(x7r,y1)+whatever*(z1-z2);%
+ y6r-y6l=y5r-y5l; x6r-x6l=2/3(x1r-x1l);
+ fill stroke z2e.. controls z6e and z7e ..z5e; % left stem
+ {{less_tense; cyrbulb(5',8,9)}}; % arc and bulb
+ numeric inner_jut,left_jut,fit;
+ pickup tiny.nib; left_jut=jut+left_stem;
+ prime_points_inside(4,3);
+ x10r=x3r; top y10=h; pos10(max(currentbreadth+eps,alpha*right_stem),0); x4:=x4r;
+ if rt x1r+jut+.5u+1<=lft x4'l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
+ save slab; slab:=Vround(vair-vair_corr);
+ serif(10,4,c,0,-left_jut); % upper serif
+ slab:=vair;
+ if is_ogonek:
+ dish_serif(4',3,d,1/2,inner_jut,e,1/3,outer_jut); % right serif
+ fi
+else: z0=whatever[z1r,z2r]=whatever[z3l,z4l];
+ if y0<h-notch_cut: y0:=h-notch_cut;
+ fill z0+.5right{down}...{z4-z3}diag_end(3l,4l,1,1,4r,3r)
+ --diag_end(4r,3r,1,1,2l,1l)--diag_end(2l,1l,1,1,1r,2r){z2-z1}
+ ...{up}z0+.5left--cycle; % left and right diagonals
+ else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
+ --diag_end(2l,1l,1,1,1r,0)--cycle; fi fi % left and right diagonals
+%%%%%
+% lowercase descender/saam tail
+slab:=vair; % lower.slab
+numeric right_jut;
+right_jut=if serifs: max(limit_dist,1.1jut) else: hround (r-rt x2r-.5u) fi;
+if unic:
+ %saam tail
+ serif(4',3,v,1/3,-jut);
+ siam_serif(4',3,w,1/3,right_jut);
+else:
+ r_serif(4',3,o,1/3,jut,p,1/3,beak_darkness,right_jut,.6beak_jut); % lower right descender
+fi
+endgroup;
+penlabels(1,2,3,4,5,6, 7,8,9);endchar;
+
+lhchar "Lowercase Cyrillic letter zh_dsc (`concrete' form)";
+cyrchar(zh_dsc,if serifs:10u# else:9.5u# fi % zhk_width: n_width;keng_width
+ ,x_height#,if is_ogonek: desc_depth# else: sbeak# fi); %ldesc/og_depth
+italcorr x_height#*slant-.2u#;
+adjust_fit(w#-5u#+ %zhr_adj
+ if monospace: 0 else: serif_fit# fi, %wlett_adj
+ if monospace: 0 else: serif_fit# fi); %wlett_adj
+begingroup
+% lowerc_zh;
+pickup tiny.nib; numeric stem[];
+stem0=max(tiny.breadth,hround(fudged.stem-stem_corr));
+if odd((r-l)-stem0): change_width; fi % symmetric & all three equal
+pos1(stem0,0); pos2(stem0,0);
+lft x1l=lft x2l=hround (.5[l,r]-.5fudged.stem)-eps; % middle stem point
+top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+% k_cbowl;
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6jut else:.4tiny fi;
+stem1=max(tiny.breadth,hround(fudged.hair if hefty:-\\4stem_corr fi));
+stem2=max(tiny.breadth,fudged.stem-3stem_corr);
+x3r=hround(r-letter_fit-.7u-right_jut)-.5tiny+eps;
+x6r=hround(r-letter_fit-.3u-right_jut)-.5tiny+eps;
+y4=.7bar_height; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(vair',90);
+ else: y7=0; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi %!!!
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+%%%
+else: fill z5l--diag_end(5l,6'l,.5,1,6'r,5r)--z5r--cycle; fi % lower diagonal
+%%%
+% mirror
+ pickup tiny.nib;
+forsuffixes $ = 3l,3,3r,3'l,3'r,4l,4,4r,5l,5,5r,6l,6,6r,6'l,6'r:
+ x.m$=l+(r-x$); y.m$=y$; endfor;
+forsuffixes $ = 7l,7r:
+ x.m$=l+(r-x$); y.m$=y$-o; endfor;
+fill z.m4r--diag_end(.m4r,.m3'r,1,.5,.m3'l,.m4l)--z.m4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ fill z.m5l
+ if is_egyptian: ---z.m6'l...{z.m6r-z.m6l}(.35[x.m6l,x.m7l],y.m7l)--
+ else:{z.m6'l-.5[z.m5,z.m5l]}...{z.m6r-z.m6l} fi
+ z.m7l..(lft x.m7l,top y.m7l)--(lft x.m7r,bot y.m7r)..z.m7r
+ if is_egyptian: --(.5[x.m6r,x.m7r],y.m7r){z.m6l-z.m6r}...z.m6'r---
+ else: {z.m6l-z.m6r}...{.5[z.m5,z.m5l]-z.m6'l} fi
+ z.m5r--cycle; % lower diagonal
+ z8l=z.m3r; z8r=z.m3l; z9l=z.m4r; z9r=z.m4l; z8=.5[z8l,z8r]; z9=.5[z9l,z9r];
+else: fill z.m5'l--diag_end(.m5'l,.m6'l,.5,1,.m6'r,.m5'r)--z.m5'r--cycle; % lower diagonal
+fi
+if serifs: save slab; slab:=Vround(vair-vair_corr);
+ dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ slab:=vair;
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower stem serif
+ numeric up_inner_jut;
+ if rt x1r+jut+.5u+1<=lft x3l-1.2jut: up_inner_jut=1.2jut;
+ else: rt x1r+jut+.5u+1=lft x3l-up_inner_jut; fi
+ slab:=Vround(vair-vair_corr);
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+ dish_serif(8,9,g,1/2,right_jut,h,2/3,up_inner_jut)(dark); % upper diagonal serif
+fi
+%%%%%
+% lowercase descender/ogonek
+if is_ogonek:
+ endgroup;
+ def the_pen=
+ if known ogonek_pen: ogonek_pen elseif serifs: tiny else: fine fi
+ enddef;
+ % |diag_end| refers to |tiny| pen, hence |tiny| in the following equation:
+ ogonek_pos=(x6 if not serifs: l fi,.5the_pen)
+ if serifs and not is_egyptian: +(.5xvair,0) fi;
+ easy_ogonek(the_pen,11,12,13); % ogonek
+else:
+ slab:=vair; % lower.slab
+%
+ if serifs:
+ pickup crisp.nib;
+ else:
+ pickup pencircle scaled (3/5[fine,crisp]+eps);
+ fi
+ numeric bracket_height,light_stem; pair downward;
+ bracket_height=bracket;
+ light_stem=hround (max(tiny.breadth,fudged.hair if hefty:-4stem_corr fi));
+ % for cyr_serif always |y$|<|y$$|
+ if (y6>y1): errmessage ("`cyr_serif' placed only on the bottom"); fi
+ downward=z6-z1;
+ y.q0=min(y6+.5bracket_height,y1)+eps;
+ top y.q1-slab-eps=bot y.q4+eps=tiny.bot y6;
+ if y.q1>y.q0: y.q0:=y.q1+eps; fi
+ bot y.q2=bot y.q3=vround(-d);
+ y.q5=y.q1; y.q6=y.q0;
+ z.q5=whatever[z6,z1]; z.q6=whatever[z6,z1];
+ z.q0-penoffset downward of currentpen =
+ z6r-penoffset downward of pen_[tiny.nib]-whatever*downward;
+ rt x.q1=hround (tiny.rt x6r+right_jut)+eps;
+ if x.q6>x.q0-eps: x.q6:=x.q0-eps; fi
+ rt x.q2=lft x.q3+light_stem+eps=hround (rt x.q1+.6beak_jut)+eps;
+ x.q4=x6-.5(fudged.stem-3stem_corr-tiny)-eps;
+ pair corner,beak_corner;
+ ypart corner=y.q1; corner=z.q0+whatever*downward;
+ ypart beak_corner=y.q4; beak_corner=z.q3+whatever*(z.q1-z.q2);
+ filldraw z.q6--z.q5
+ ...(beak_darkness+eps)[beak_corner,.5[z.q3,z.q4]]
+ ...{z.q2-z.q1}z.q3--z.q2--z.q1{-right_jut,0}
+ ...(1/3+eps)[corner,.5[z.q1,z.q0]]{z.q0-z.q1}
+ ...{z1-z6}z.q0--cycle; % descender
+ labels (.q0,.q1,.q2,.q3,.q4,.q5,.q6);
+%
+ endgroup;
+fi
+penlabels(1,2,3,4,5,6,7,8,9,10, 11,12,13); endchar;
+
+lhchar "Lowercase Cyrillic letter k_dsc (`concrete' form)";
+cyrchar(k_dsc,if serifs:10u# else:9.5u# fi % zhk_width: n_width;keng_width
+ ,x_height#,if is_ogonek: desc_depth# else: sbeak# fi); %ldesc/og_depth
+italcorr x_height#*slant-.2u#;
+adjust_fit(serif_fit#,serif_fit#);
+begingroup
+% lowerr_k;
+pickup tiny.nib; numeric stem[];
+stem0=max(tiny.breadth,hround(fudged.stem-stem_corr));
+pos1(stem0,0); pos2(stem0,0);
+lft x1l=lft x2l=hround (2.5u-.5fudged.stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+% k_cbowl;
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6jut else:.4tiny fi;
+stem1=max(tiny.breadth,hround(fudged.hair if hefty:-\\4stem_corr fi));
+stem2=max(tiny.breadth,fudged.stem-3stem_corr);
+x3r=hround(r-letter_fit-.7u-right_jut)-.5tiny+eps;
+x6r=hround(r-letter_fit-.3u-right_jut)-.5tiny+eps;
+y4=.7bar_height; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(vair',90);
+ else: y7=0; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi %!!!
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+%%%
+else: fill z5l--diag_end(5l,6'l,.5,1,6'r,5r)--z5r--cycle; fi % lower diagonal
+%%%
+if serifs: save slab; slab:=Vround(vair-vair_corr);
+ dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ slab:=vair;
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower stem serif
+ numeric up_inner_jut;
+ if rt x1r+jut+.5u+1<=lft x3l-1.2jut: up_inner_jut=1.2jut;
+ else: rt x1r+jut+.5u+1=lft x3l-up_inner_jut; fi
+ slab:=Vround(vair-vair_corr);
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+fi
+%%%%%
+% lowercase descender/ogonek
+if is_ogonek:
+ endgroup;
+ def the_pen=
+ if known ogonek_pen: ogonek_pen elseif serifs: tiny else: fine fi
+ enddef;
+ % |diag_end| refers to |tiny| pen, hence |tiny| in the following equation:
+ ogonek_pos=(x6 if not serifs: l fi,.5the_pen)
+ if serifs and not is_egyptian: +(.5xvair,0) fi;
+ easy_ogonek(the_pen,7,8,9); % ogonek
+else:
+ slab:=vair; % lower.slab
+%
+ if serifs:
+ pickup crisp.nib;
+ else:
+ pickup pencircle scaled (3/5[fine,crisp]+eps);
+ fi
+ numeric bracket_height,light_stem; pair downward;
+ bracket_height=bracket;
+ light_stem=hround (max(tiny.breadth,fudged.hair if hefty:-4stem_corr fi));
+ % for cyr_serif always |y$|<|y$$|
+ if (y6>y1): errmessage ("`cyr_serif' placed only on the bottom"); fi
+ downward=z6-z1;
+ y.q0=min(y6+.5bracket_height,y1)+eps;
+ top y.q1-slab-eps=bot y.q4+eps=tiny.bot y6;
+ if y.q1>y.q0: y.q0:=y.q1+eps; fi
+ bot y.q2=bot y.q3=vround(-d);
+ y.q5=y.q1; y.q6=y.q0;
+ z.q5=whatever[z6,z1]; z.q6=whatever[z6,z1];
+ z.q0-penoffset downward of currentpen =
+ z6r-penoffset downward of pen_[tiny.nib]-whatever*downward;
+ rt x.q1=hround (tiny.rt x6r+right_jut)+eps;
+ if x.q6>x.q0-eps: x.q6:=x.q0-eps; fi
+ rt x.q2=lft x.q3+light_stem+eps=hround (rt x.q1+.6beak_jut)+eps;
+ x.q4=x6-.5(fudged.stem-3stem_corr-tiny)-eps;
+ pair corner,beak_corner;
+ ypart corner=y.q1; corner=z.q0+whatever*downward;
+ ypart beak_corner=y.q4; beak_corner=z.q3+whatever*(z.q1-z.q2);
+ filldraw z.q6--z.q5
+ ...(beak_darkness+eps)[beak_corner,.5[z.q3,z.q4]]
+ ...{z.q2-z.q1}z.q3--z.q2--z.q1{-right_jut,0}
+ ...(1/3+eps)[corner,.5[z.q1,z.q0]]{z.q0-z.q1}
+ ...{z1-z6}z.q0--cycle; % descender
+ labels (.q0,.q1,.q2,.q3,.q4,.q5,.q6);
+%
+ endgroup;
+fi
+penlabels(1,2,3,4,5,6); endchar;
+
+lhchar "Lowercase Cyrillic letter k_beak (`concrete' form)";
+cyrchar(k_beak,if serifs:10u# else:9.5u# fi % zhk_width: n_width;keng_width
+ ,x_height#,0);
+italcorr x_height#*slant-.2u#;
+adjust_fit(2u#-.5width_adj#, % beak_adj
+ serif_fit#);
+% lowerc_k;
+pickup tiny.nib; numeric stem[];
+stem0=max(tiny.breadth,hround(fudged.stem-stem_corr));
+pos1(stem0,0); pos2(stem0,0);
+lft x1l=lft x2l=hround (2.5u-.5fudged.stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+% k_cbowl;
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6jut else:.4tiny fi;
+stem1=max(tiny.breadth,hround(fudged.hair if hefty:-\\4stem_corr fi));
+stem2=max(tiny.breadth,fudged.stem-3stem_corr);
+x3r=hround(r-letter_fit-.7u-right_jut)-.5tiny+eps;
+x6r=hround(r-letter_fit-.3u-right_jut)-.5tiny+eps;
+y4=.7bar_height; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(vair',90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+%%%
+else: fill z5l--diag_end(5l,6'l,.5,1,6'r,5r)--z5r--cycle; fi % lower diagonal
+%%%
+if serifs: save slab; slab:=Vround(vair-vair_corr);
+ nodish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ slab:=vair;
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower stem serif
+ numeric up_inner_jut;
+ if rt x1r+jut+.5u+1<=lft x3l-1.2jut: up_inner_jut=1.2jut;
+ else: rt x1r+jut+.5u+1=lft x3l-up_inner_jut; fi
+ slab:=Vround(vair-vair_corr);
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+fi
+%%%%%
+% lower left beak
+_one:=9; _two:=10;
+pickup crisp.nib; pos[_one](vair,90); pos[_two](hair,180);
+top y[_one]r=h; x[_one]=x1; lft x[_two]r=l+letter_fit+hround.45u; y[_two]=good.y(y[_one]l-beak/1.4)-eps;
+arm([_one],[_two],q,beak_darkness,-.4beak_jut);
+penlabels(1,2,3,4,5,6, 7,8); endchar;
+
+lhchar "Lowercase Cyrillic letter l_tl (`concrete' form)";
+cyrchar(l_tl,10u# % if not serifs:+.5width_adj# fi % dl_width;n_width
+ ,x_height#,desc_depth#);
+italcorr x_height#*slant-serif_fit#+jut#-2u#+.5stem#; %d->x_height+jut
+adjust_fit(if serifs: .25(7/8[hair#,flare#])-.25u# if is_egyptian:+.5hair# fi
+ else: serif_fit# fi,
+ -.75cap_jut#+if serifs:.25 else .5 fi u#); %lcon_tl
+%lower_spec_l!!!;
+numeric bulb_diam; bulb_diam=hround 7/8[hair,flare];
+numeric left_stem,right_stem,outer_jut,alpha;
+right_stem=stem-stem_corr;
+left_stem=min(hair if hefty:-3stem_corr fi,right_stem);
+outer_jut=.75jut; x4r=w+serif_fit-outer_jut- if serifs:.25 else:.5 fi u;
+x1l-.5u-.065jut=w-x4r; y1=y4=0; x2-x1=x4-x3;
+if serifs: x3l=x2r+((x1r-x4l)*(vair/(h-vair)))if not is_egyptian:-.25left_stem fi;
+ else: x3r=x2r+apex_corr; fi
+y2=y3=h if not serifs:+apex_o+apex_oo fi;
+alpha=diag_ratio(2,left_stem,y2-y1,x4r-x1l-apex_corr);
+penpos1(alpha*left_stem,0); penpos2(alpha*left_stem,0);
+penpos3(alpha*right_stem,0); penpos4(alpha*right_stem,0);
+numeric t; t=slab+bracket;
+forsuffixes e=l,r: z54e=(((0,t)--(w,t)) intersectionpoint (z4e--z3e)); endfor;
+if serifs:
+ fill stroke z3e--z54e; %!!! right stem
+ pickup tiny.nib;
+ penpos5(left_stem,-90); pos5'(left_stem,-90); z5'=z5;
+ pos8(hair,-180); pos9(bulb_diam,-180);
+ y9-.5bulb_diam=.12desc_depth-eps; lft x9r=l+letter_fit+hround(.35u-.5);
+ y5r=-oo-eps; x5=max(min(.45[x9r,x1r],rt x9l-eps),lft x9r+.5bulb_diam);
+ z7r=(max(.5[x1,x1r],x9+if is_egyptian:1.25bulb_diam +.5slant*hair
+ else: 1.5bulb_diam-hair fi),
+ y7l-7/8left_stem);
+ z7l=(x7r-2/3(x1r-x1l),if is_egyptian: .35[y5l,y5] else: y5 fi);
+ y6l=y9+.5bulb_diam; z6r=(x7r,y1)+whatever*(z1-z2);%
+ y6r-y6l=y5r-y5l; x6r-x6l=2/3(x1r-x1l);
+ fill stroke z2e.. controls z6e and z7e ..z5e; % left stem
+ {{less_tense; cyrbulb(5',8,9)}}; % arc and bulb
+ numeric inner_jut,left_jut,fit;
+ pickup tiny.nib; left_jut=jut+left_stem;
+ prime_points_inside(4,3);
+ x10r=x3r; top y10=h; pos10(alpha*right_stem,0); x4:=x4r;
+ if rt x1r+jut+.5u+1<=lft x4'l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
+ save slab; slab:=Vround(vair-vair_corr);
+ serif(10,4,c,0,-left_jut); % upper serif
+ slab:=vair;
+ %dish_serif(4',3,d,1/2,inner_jut,e,1/3,outer_jut); % right serif
+else: z0=whatever[z1r,z2r]=whatever[z3l,z4l];
+ if y0<h-notch_cut: y0:=h-notch_cut;
+ fill z0+.5right{down}...{z4-z3}diag_end(3l,4l,1,1,4r,3r)
+ --diag_end(4r,3r,1,1,2l,1l)--diag_end(2l,1l,1,1,1r,2r){z2-z1}
+ ...{up}z0+.5left--cycle; % left and right diagonals
+ else: fill z0--z54l--z54r--diag_end(2l,1l,1,1,1r,0)--cycle; fi fi %!!! left and right diagonals
+%%%%%
+% l_tail(4);x_tail
+_zero:=4;
+_one:=14; _two:=15; _three:=16; _four:=17;
+%
+% x_
+pickup fine.nib;
+stem3=hround (max(fine.breadth,.5[fudged.stem-4stem_corr,x[_zero]r-x[_zero]l]));
+x[_one]'r=x4r;
+penpos[_one]'(stem3,0); pos[_one](stem3,0); z[_one]=z[_one]';
+bot y[_one]=max(-1/3d,-d+vair')-eps;
+(x[_one]'l,y54')=whatever[z4l,z4l+dir angle(z4l-z3l)];
+z54'=(x[_one]'l,y54');
+fill z54l{z4r-z1r}
+ ..controls (z54')..
+ {down}z[_one]'l--z[_one]'r{up}
+ ..controls (z4r)..
+ {z1r-z4r}z54r--cycle; %link
+% _x
+if serifs:
+ numeric bulb_diam;
+ bulb_diam=max(currentbreadth+eps,min(.82d-1-eps,hround 7/8[hair,flare]));
+ pos[_two](vair',-90); pos[_three](hair,-180);
+ pos[_four](bulb_diam,-180);
+ x[_two]=.5[x[_one],x[_three]r];
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
+ z[_three]r=z[_four]r;
+ rt x[_four]l=max(x[_one]l-bulb_diam,%!!!
+ floor x[_one]-2.5u if monospace: / expansion_factor fi);%!!!
+ (x,y[_two]r)=whatever[z[_two]l,z[_one]l];
+ x[_two]r:=max(x,.5[x[_three]r,x[_two]]);
+ filldraw stroke pulled_arc.e([_one],[_two]);%!!!
+ bulb([_two],[_three],[_four]); % bulb
+else:
+ pos[_two](vair',-90); pos[_three](.6[vair',flare],-105);
+ rt x[_three]r=x[_one]-3u; bot y[_three]r=-d;%!!!
+ bot y[_two]r=-d-oo; x[_two]=.4[x[_three]r,x[_one]r];%!!!
+ filldraw stroke super_arc.e([_one],[_two])%!!!
+ & term.e([_two],[_three],left,.8,4); fi
+%%%
+penlabels(1,2,3,4,5,6, 7,8,9,10,11);endchar;
+
+endgroup;
+
+endinput;
+%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/specific/lgcyrcu.mf b/Master/texmf-dist/fonts/source/lh/specific/lgcyrcu.mf
new file mode 100644
index 00000000000..38047b59c77
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/specific/lgcyrcu.mf
@@ -0,0 +1,723 @@
+%
+% lgcyrcu.mf
+%
+%% Cyrillic font container with T2 encoding beta-support
+%
+% This file is future part of lxfonts package
+% Version 3.5 // Patchlevel=1
+% (c) O.Lapko
+%
+% This package is freeware product under conditions similar to
+% those of D. E. Knuth specified for the Computer Modern family of fonts.
+% In particular, only the authors are entitled to modify this file
+% (and all this package as well) and to save it under the same name.
+%
+% Content:
+%
+% Lowercase Cyrillic letters common for couple of encodings
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% List of letternames and their codes in T2 & Ko
+%
+% X2 T2A T2B T2C T2D X2S LH WNCYR
+%
+% LJE "4b K !"87 "88 - - - - "01 Lje
+%
+% X2 T2A T2B T2C
+%
+% K_vcrs "46 F "8b - - Ka vertically crossed
+% K_hcrs "47 G - - "8b Ka horisontally crossed
+% L_dsc "48 H - "8a "8a El with descender
+%
+% ZH_dsc "85 "85 "85 - Zhe with descender
+% K_dsc "89 "89 "89 "89 Ka with descender
+% K_beak "8a "8a - - Ka with reversed beak
+% L_tl "8c - "8c - El with tail
+%
+
+LHver_check(3,5); % like |version_check| in ec
+
+begingroup
+
+def is_egyptian =
+% |false| for most of the CM fonts, except funny fonts;
+% |true| for the CC fonts
+ (serifs and (1.4max(fine#,crisp#, tiny#)<slab#) and (1.6slab#>stem#))
+%added
+ or (vair#>.5stem#)
+enddef;
+
+lhchar "Uppercase Russian letter LJE (`concrete' form)";
+cyrchar(LJE,13.5u#,cap_height#,0); %N_width#
+if is_small_cap: getcharcode(lje); fi
+adjust_fit(if serifs: .8(flare#+(cap_stem#-stem#))-.5u#
+ else: cap_serif_fit# fi,
+ 4u#-.5width_adj#);% usftsn_adj;usftsnwd-.25u-.5width_adj
+% upper_spec_l;
+numeric bulb_diam; bulb_diam=flare+(cap_stem-stem);
+numeric left_stem,right_stem,outer_jut,alpha;
+right_stem=cap_stem-stem_corr;
+left_stem=max(tiny.breadth+eps,min(cap_hair if hefty:-3stem_corr fi,right_stem));
+outer_jut=.8cap_jut; x1l=w-x4r=outer_jut+if serifs:.5 fi u; y1=y4=0; x2-x1=x4-x3;
+if serifs: x3l=x2r+((x1r-x4l)*(slab/(h-slab))) %+2apex_corr;
+ if not is_egyptian:-.25left_stem fi;
+else: x3r= x2r+apex_corr; fi
+y2=y3=h if not serifs:+apex_o+apex_oo fi;
+alpha=diag_ratio(2,left_stem,y2-y1,x4r-x1l-apex_corr);
+penpos1(alpha*left_stem,0); penpos2(alpha*left_stem,0);
+penpos3(alpha*right_stem,0); penpos4(alpha*right_stem,0);
+if serifs:
+ fill stroke z3e--z4e; % right stem
+ pickup tiny.nib;
+ penpos5(left_stem,-90); pos5'(left_stem,-90); z5'=z5;
+ pos8(cap_hair,-180); pos9(bulb_diam,-180);
+ y9=if is_egyptian: 0.12h else: 1/6h-max(0,flare-stem-2vair_corr-.5) fi;
+ lft x9r=l+letter_fit+hround(.5u-.5);
+ y5r=-o; x5=max(lft x9r+.5bulb_diam,.5[x9r,x1r]);
+ y6l=y9+bulb_diam-hair;
+ numeric t; t=1-slant;
+ z7r=(max(.75[x1,x1r],x9+if is_egyptian: (if is_small_cap: 2.25 else: 2.667 fi
+ +max(-2slant,.5slant))*hair
+ else: if is_bold:.75 fi bulb_diam+1.35hair fi),
+ y7l-t*7/8left_stem);
+ z7l=(x7r-2/3(x1r-x1l),if is_egyptian: .35[y5l,y5] else: y5 fi);%y5l);
+ z6r=(x7r,y1)+whatever*((x1r,y1)-z2r); y6r-y6l=t*(y5r-y5l);
+ x6r-x6l=1/2(x1r-x1l);
+ fill stroke z2e{z1e-z6e}.. controls z6e and z7e ..z5e;
+ {{less_tense; cyrbulb(5',8,9)}}; % arc and bulb
+ numeric inner_jut,left_jut,fit; pickup tiny.nib;
+ x10r=x3r; top y10=h; pos10(max(currentbreadth+eps,alpha*right_stem),0); x4:=x4r;
+ left_jut=cap_jut+left_stem;
+ serif(10,4,c,0,-left_jut); % upper serif
+ pickup tiny.nib;
+ prime_points_inside(1,2); prime_points_inside(4,3);
+ if rt x1'r+cap_jut+.5u+1<=lft x4'l-cap_jut: inner_jut=cap_jut;
+ else: rt x1'r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
+ dish_serif(4',3,d,1/2,inner_jut,e,1/3,outer_jut); % right serif
+else: z0=whatever[z1r,z2r]=whatever[z3l,z4l];
+ if y0<h-cap_notch_cut: y0:=h-cap_notch_cut;
+ fill z0+.5right{down}...{z4-z3}diag_end(3l,4l,1,1,4r,3r)
+ --diag_end(4r,3r,1,1,2l,1l)--diag_end(2l,1l,1,1,1r,2r){z2-z1}
+ ...{up}z0+.5left--cycle; % left and right diagonals
+ else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
+ --diag_end(2l,1l,1,1,1r,0)--cycle; fi fi % left and right diagonals
+%%%%%
+% now the b part
+w:=w+4u-.5width_adj;%usftsnwd-.5u-.5width_adj
+% usftsn_bowl(4)LJE;
+_zero:=4;
+_one:=11; _two:=12; _three:=13; _four:=14; _five:=15;
+%
+pickup tiny.nib;
+penpos[_one](cap_bar,90);
+penpos[_three](cap_curve if hefty:-3stem_corr fi,0);
+penpos[_four](cap_band,-90); penpos[_five](cap_band,-90);
+z[_five]r=z[_zero]; y[_four]=y[_five];%!!!
+z[_one]l=whatever[z3,z4]; %x[_one]l=x[_one]=x[_one]r;%!!!
+y[_three]=.5[y[_four],y[_two]];
+x[_three]r=hround(w-u);
+if (serifs=false) or (cap_bar#>.5cap_curve#) or (cap_bar<3):
+ penpos[_two](cap_bar,90);
+ x[_four]=.5[.5[x2,x4],w-if serifs:1.5u else:2.5u fi]+.5u;
+ y[_one]=y[_two]=.52h; x[_two]=x[_four];
+else: penpos[_two](1/18[cap_bar,cap_curve],90);
+ x[_four]=.5[.5[x2,x4],w-1.5u]+.5u;
+ y[_one]l=y[_two]l-.35cap_bar=.52h-.5cap_bar;
+ x[_two]=x[_four]-.35u; fi
+x[_two]l:=x[_two]l-.5u; x[_four]l:=x[_four]l-.5u;
+fill stroke z[_five]e..super_arc.e([_four],[_three])
+ & super_arc.e([_three],[_two])..z[_one]e; % lobe
+%%%%%
+penlabels(0,2,6,3,4,5,7,8,9,10); endchar;
+
+lhchar "Uppercase Russian letter K_vcrs (`concrete' form)";
+cyrchar(K_vcrs,15u# if not serifs:+.5width_adj# fi, % N_width+1.5u
+ cap_height#,0);
+if is_small_cap: getcharcode(k_vcrs); fi
+italcorr cap_height#*slant-.5u#;
+adjust_fit(cap_serif_fit#,cap_serif_fit#);
+% upperc_k;
+pickup tiny.nib; pos1(fudged.cap_stem,0); pos2(fudged.cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5fudged.cap_stem);
+top y1=h; bot y2=0;
+pickup tiny.nib; filldraw stroke z1e--z2e; % stem
+if serifs: dish_serif(1,2,a,1/3,cap_jut,b,1/3,cap_jut); % upper stem serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,cap_jut); fi % lower stem serif
+% Kv_cbowl;
+ pos10(stem1,0); y10=y1; x10=hround max(w-11.5u,w-10.5u-.5fudged.cap_stem);
+% K_cbowl
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6cap_jut else:.4tiny fi;
+stem1=max(tiny.breadth,fudged.hair if hefty:-3stem_corr fi);
+stem2=max(tiny.breadth,fudged.cap_stem-3stem_corr);
+rt x3r=hround(r-letter_fit-u-right_jut);
+rt x6r=hround(r-letter_fit-.75u-right_jut);
+y4=1/3h; top y3=h; bot y6=0; x4=x10;%!!!
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y10-y6,x6r-x10);%!!!
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y10-y6,x6r-x10));%!!!
+ else: y6'l=y6'r=0; fi
+forsuffixes $=l,r: y3'$=h; z4$=z3'$+whatever*(z3-z4);
+ z5$=z6'$+whatever*(z10-z6)=z3'$+whatever*(z3-z4); endfor
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z10-z6 of currentpen+whatever*(z10-z6);%!!!
+z6'l=z6l+penoffset z6-z10 of currentpen+whatever*(z10-z6);%!!!
+fill z5r--diag_end(5r,3'r,1,.5,3'l,5l)--z5l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(slab,90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+ numeric up_inner_jut;
+ if rt x1r+cap_jut+.5u+1<=lft x3l-1.2cap_jut: up_inner_jut=1.2cap_jut;
+ else: rt x1r+cap_jut+.5u+1=lft x3l-up_inner_jut; fi
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+else: fill z5'l--diag_end(5'l,6'l,.5,1,6'r,5'r)--z5'r--cycle; fi% lower diagonal
+%%%
+_one:=12; _two:=13; _three:=14; _four:=15;
+ pickup fine.nib; pos[_one](vair,90); pos[_two](vair,90);
+ y[_one]=y[_two]=y5l; x[_one]=x1; rt x[_two]=x5r;
+ filldraw stroke z[_one]e--z[_two]e; % middle cross
+%%%
+% vcross
+pickup crisp.nib; pos[_three](bar,0); pos[_four](bar,0);
+lft x[_three]l=lft x[_four]l=hround max(rt x1r+1,max(x5l-bar+eps,.5[rt x1r,x5l]));
+top y[_four]-bot y[_three]=.5cap_height; .52[y[_three],y[_four]]=y[_one];
+filldraw stroke z[_three]e--z[_four]e; % cross bar
+%%%%%
+penlabels(1,2,3,4,5,6,7,10); endchar;
+
+lhchar "Uppercase Russian letter K_hcrs (`concrete' form)";
+cyrchar(K_hcrs,13.5u#,cap_height#,0); %EN_width#
+if is_small_cap: getcharcode(k_hcrs); fi
+italcorr cap_height#*slant-.5u#;
+adjust_fit(cap_serif_fit#,cap_serif_fit#);
+% upperc_k;
+pickup tiny.nib; pos1(fudged.cap_stem,0); pos2(fudged.cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5fudged.cap_stem);
+top y1=h; bot y2=0;
+pickup tiny.nib; filldraw stroke z1e--z2e; % stem
+if serifs: dish_serif(1,2,a,1/3,cap_jut,b,1/3,cap_jut); % upper stem serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,cap_jut); fi % lower stem serif
+% K_cbowl
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6cap_jut else:.4tiny fi;
+stem1=max(tiny.breadth,fudged.hair if hefty:-3stem_corr fi);
+stem2=max(tiny.breadth,fudged.cap_stem-3stem_corr);
+rt x3r=hround(r-letter_fit-u-right_jut);
+rt x6r=hround(r-letter_fit-.75u-right_jut);
+y4=1/3h; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+ else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(slab,90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+ numeric up_inner_jut;
+ if rt x1r+cap_jut+.5u+1<=lft x3l-1.2cap_jut: up_inner_jut=1.2cap_jut;
+ else: rt x1r+cap_jut+.5u+1=lft x3l-up_inner_jut; fi
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+else: fill z5'l--diag_end(5'l,6'l,.5,1,6'r,5'r)--z5'r--cycle; fi% lower diagonal
+%%%
+% hcross
+_one:=12; _two:=13;
+pickup crisp.nib; numeric outer_jut;
+outer_jut=if serifs: max(limit_dist,if not is_egyptian: 1.1 fi cap_jut) else: 1.8u fi;
+pos[_one](bar,90); pos[_two](bar,90);
+top y[_one]r=top y[_two]r=vround (min(.35[x_height,h]+.5bar,h-max(bracket,1.2slab))-eps);
+if serifs and is_egyptian:
+ rt x[_one]=tiny.rt x1r+cap_jut; lft x[_two]=tiny.lft x1l-cap_jut;
+else:
+ x[_one]=x1r+1.15outer_jut; x[_two]=hround 1/3u-cap_serif_fit;
+fi
+filldraw stroke z[_one]e--z[_two]e; % cross bar
+%%%%%
+penlabels(1,2,3,4,5,6,7); endchar;
+
+lhchar "Uppercase Russian letter L_dsc (`concrete' form)";
+cyrchar(L_dsc,13.5u#,cap_height#, %N_width#
+ if is_ogonek: desc_depth# else: cap_sbeak# fi); %udesc/og_depth
+if is_small_cap: getcharcode(l_dsc); fi
+adjust_fit(if serifs: .8(flare#+(cap_stem#-stem#))-.5u#
+ else: cap_serif_fit# fi,
+ cap_serif_fit# if (serifs=false) or (is_ogonek=false):+.5(cap_stem#-u#) fi); %ZhDL_adj
+% upper_spec_l;
+numeric bulb_diam; bulb_diam=flare+(cap_stem-stem);
+numeric left_stem,right_stem,outer_jut,alpha;
+right_stem=cap_stem-stem_corr;
+left_stem=max(tiny.breadth+eps,min(cap_hair if hefty:-3stem_corr fi,right_stem));
+outer_jut=.8cap_jut; x1l=w-x4r=outer_jut+if serifs:.5 fi u; y1=y4=0; x2-x1=x4-x3;
+if serifs: x3l=x2r+((x1r-x4l)*(slab/(h-slab))) %+2apex_corr;
+ if not is_egyptian:-.25left_stem fi;
+else: x3r= x2r+apex_corr; fi
+y2=y3=h if not serifs:+apex_o+apex_oo fi;
+alpha=diag_ratio(2,left_stem,y2-y1,x4r-x1l-apex_corr);
+penpos1(alpha*left_stem,0); penpos2(alpha*left_stem,0);
+penpos3(alpha*right_stem,0); penpos4(alpha*right_stem,0);
+if serifs:
+ fill stroke z3e--z4e; % right stem
+ pickup tiny.nib;
+ penpos5(left_stem,-90); pos5'(left_stem,-90); z5'=z5;
+ pos8(cap_hair,-180); pos9(bulb_diam,-180);
+ y9=if is_egyptian: 0.12h else: 1/6h-max(0,flare-stem-2vair_corr-.5) fi;
+ lft x9r=l+letter_fit+hround(.5u-.5);
+ y5r=-o; x5=max(lft x9r+.5bulb_diam,.5[x9r,x1r]);
+ y6l=y9+bulb_diam-hair;
+ numeric t; t=1-slant;
+ z7r=(max(.75[x1,x1r],x9+if is_egyptian: (if is_small_cap: 2.25 else: 2.667 fi
+ +max(-2slant,.5slant))*hair
+ else: if is_bold:.75 fi bulb_diam+1.35hair fi),
+ y7l-t*7/8left_stem);
+ z7l=(x7r-2/3(x1r-x1l),if is_egyptian: .35[y5l,y5] else: y5 fi);%y5l);
+ z6r=(x7r,y1)+whatever*((x1r,y1)-z2r); y6r-y6l=t*(y5r-y5l);
+ x6r-x6l=1/2(x1r-x1l);
+ fill stroke z2e{z1e-z6e}.. controls z6e and z7e ..z5e;
+ {{less_tense; cyrbulb(5',8,9)}}; % arc and bulb
+ numeric inner_jut,left_jut,fit; pickup tiny.nib;
+ x10r=x3r; top y10=h; pos10(max(currentbreadth+eps,alpha*right_stem),0); x4:=x4r;
+ left_jut=cap_jut+left_stem;
+ serif(10,4,c,0,-left_jut); % upper serif
+ pickup tiny.nib;
+ prime_points_inside(1,2); prime_points_inside(4,3);
+ if rt x1'r+cap_jut+.5u+1<=lft x4'l-cap_jut: inner_jut=cap_jut;
+ else: rt x1'r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
+ if is_ogonek:
+ dish_serif(4',3,d,1/2,inner_jut,e,1/3,outer_jut); % right serif
+ fi
+else: z0=whatever[z1r,z2r]=whatever[z3l,z4l];
+ if y0<h-cap_notch_cut: y0:=h-cap_notch_cut;
+ fill z0+.5right{down}...{z4-z3}diag_end(3l,4l,1,1,4r,3r)
+ --diag_end(4r,3r,1,1,2l,1l)--diag_end(2l,1l,1,1,1r,2r){z2-z1}
+ ...{up}z0+.5left--cycle; % left and right diagonals
+ else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
+ --diag_end(2l,1l,1,1,1r,0)--cycle; fi fi % left and right diagonals
+% uppercase descender/saam tail
+numeric right_jut;
+right_jut=
+ if serifs: max(limit_dist,1.1cap_jut) else: hround (r-rt x2r-.65u) fi;
+if unic:
+ %saam tail
+ serif(4',3,v,1/3,-cap_jut);
+ siam_serif(4',3,w,1/3,right_jut);
+else:
+ r_serif(4',3,x,1/3,cap_jut,y,1/3,beak_darkness,right_jut,beak_jut); % lower right descender
+fi
+%%%%%
+penlabels(0,2,6,3,4,5,7,8,9,10); endchar;
+
+lhchar "Uppercase Russian letter ZH_dsc (`concrete' form)";
+cyrchar(ZH_dsc,13.5u#,cap_height#, %N_width#
+ if is_ogonek: desc_depth# else: cap_sbeak# fi); %udesc/og_depth
+if is_small_cap: getcharcode(zh_dsc); fi
+italcorr cap_height#*slant+.25u#;
+adjust_fit(w#-2max(2u#+.5cap_stem#,3u#)+cap_serif_fit#,
+ cap_serif_fit# if (serifs=false) or (is_ogonek=false):+.5(cap_stem#-u#) fi); %ZhDL_adj
+% upperc_zh;
+if odd((r-l)-fudged.cap_stem): change_width; fi % symmetric & all three equal
+pickup tiny.nib; pos1(fudged.cap_stem,0); pos2(fudged.cap_stem,0);
+lft x1l=lft x2l=hround (.5[l,r]-.5fudged.cap_stem)-eps; % middle stem point
+top y1=h; bot y2=0;
+pickup tiny.nib; filldraw stroke z1e--z2e; % stem
+if serifs: dish_serif(1,2,a,1/3,cap_jut,b,1/3,cap_jut); % upper stem serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,cap_jut); fi % lower stem serif
+% K_cbowl
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6cap_jut else:.4tiny fi;
+stem1=max(tiny.breadth,fudged.hair if hefty:-3stem_corr fi);
+stem2=max(tiny.breadth,fudged.cap_stem-3stem_corr);
+rt x3r=hround(r-letter_fit-u-right_jut);
+rt x6r=hround(r-letter_fit-.75u-right_jut);
+y4=1/3h; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+ else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(slab,90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+ numeric up_inner_jut;
+ if rt x1r+cap_jut+.5u+1<=lft x3l-1.2cap_jut: up_inner_jut=1.2cap_jut;
+ else: rt x1r+cap_jut+.5u+1=lft x3l-up_inner_jut; fi
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+else: fill z5'l--diag_end(5'l,6'l,.5,1,6'r,5'r)--z5'r--cycle; fi% lower diagonal
+%%%
+% mirror
+pickup tiny.nib;
+forsuffixes $ = 3l,3,3r,3'l,3'r,4l,4,4r,5l,5,5r,6l,6,6r,6'l,6'r,7l,7r:
+ x.m$=l+(r-x$); y.m$=y$; endfor;
+fill z.m4r--diag_end(.m4r,.m3'r,1,.5,.m3'l,.m4l)--z.m4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ fill z.m5l
+ if is_egyptian: ---z.m6'l...{z.m6r-z.m6l}(.35[x.m6l,x.m7l],y.m7l)--
+ else:{z.m6'l-.5[z.m5,z.m5l]}...{z.m6r-z.m6l} fi
+ z.m7l..(lft x.m7l,top y.m7l)--(lft x.m7r,bot y.m7r)..z.m7r
+ if is_egyptian: --(.5[x.m6r,x.m7r],y.m7r){z.m6l-z.m6r}...z.m6'r---
+ else: {z.m6l-z.m6r}...{.5[z.m5,z.m5l]-z.m6'l} fi
+ z.m5r--cycle; % lower diagonal
+ z8l=z.m3r; z8r=z.m3l; z9l=z.m4r; z9r=z.m4l; z8=.5[z8l,z8r]; z9=.5[z9l,z9r];
+ dish_serif(8,9,g,1/2,right_jut,h,2/3,up_inner_jut)(dark); % upper diagonal serif
+else: fill z.m5'l--diag_end(.m5'l,.m6'l,.5,1,.m6'r,.m5'r)--z.m5'r--cycle; % lower diagonal
+fi
+%%%%%
+% uppercase descender/ogonek
+if is_ogonek:
+ def the_pen=if known ogonek_pen: ogonek_pen
+ elseif serifs: tiny elseif is_bold: fisp else: fine fi
+ enddef;
+ % |diag_end| refers to |tiny| pen, hence |tiny| in the following equation:
+ ogonek_pos=(x6 if not serifs: l if is_bold: +.75tiny fi\\ fi,.5the_pen)
+ if serifs and not is_egyptian: +(.5xvair,0) fi;
+ easy_ogonek(the_pen,11,12,13); % ogonek
+else:
+ if not serifs:
+ right_jut:=max(right_jut,hround (r-rt x6r-.65u)); fi
+ if serifs:
+ pickup crisp.nib;
+ else:
+ pickup pencircle scaled (3/5[fine,crisp]+eps);
+ fi
+ numeric bracket_height,light_stem; pair downward;
+ bracket_height=bracket;
+ light_stem=hround (max(tiny.breadth,fudged.hair if hefty:-4stem_corr fi));
+ % for cyr_serif always |y$|<|y$$|
+ if (y6>y1): errmessage ("`cyr_serif' placed only on the bottom"); fi
+ downward=z6-z1;
+ y.q0=min(y6+.5bracket_height,y1)+eps;
+ top y.q1-slab-eps=bot y.q4+eps=tiny.bot y6;
+ if y.q1>y.q0: y.q0:=y.q1+eps; fi
+ bot y.q2=bot y.q3=vround(-d);
+ y.q5=y.q1; y.q6=y.q0;
+ z.q5=whatever[z6,z1]; z.q6=whatever[z6,z1];
+ z.q0-penoffset downward of currentpen =
+ z6r-penoffset downward of pen_[tiny.nib]-whatever*downward;
+ rt x.q1=hround (tiny.rt x6r+right_jut)+eps;
+ if x.q6>x.q0-eps: x.q6:=x.q0-eps; fi
+ rt x.q2=lft x.q3+light_stem+eps=hround (rt x.q1+beak_jut)+eps;
+ x.q4=x6-.5(fudged.stem-3stem_corr-tiny)-eps;
+ pair corner,beak_corner;
+ ypart corner=y.q1; corner=z.q0+whatever*downward;
+ ypart beak_corner=y.q4; beak_corner=z.q3+whatever*(z.q1-z.q2);
+ filldraw z.q6--z.q5
+ ...(beak_darkness+eps)[beak_corner,.5[z.q3,z.q4]]
+ ...{z.q2-z.q1}z.q3--z.q2--z.q1{-right_jut,0}
+ ...(1/3+eps)[corner,.5[z.q1,z.q0]]{z.q0-z.q1}
+ ...{z1-z6}z.q0--cycle; % descender
+ labels (.q0,.q1,.q2,.q3,.q4,.q5,.q6);
+%
+fi
+penlabels(1,2,3,4,5,6,7); endchar;
+
+lhchar "Uppercase Russian letter K_dsc (`concrete' form)";
+cyrchar(K_dsc,13.5u#,cap_height#, %EN_width#
+ if is_ogonek: desc_depth# else: cap_sbeak# fi); %udesc/og_depth
+if is_small_cap: getcharcode(k_dsc); fi
+italcorr cap_height#*slant-.5u#;
+adjust_fit(cap_serif_fit#,
+ cap_serif_fit# if (serifs=false) or (is_ogonek=false):+.5(cap_stem#-u#) fi); %ZhDL_adj
+% upperc_k;
+pickup tiny.nib; pos1(fudged.cap_stem,0); pos2(fudged.cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5fudged.cap_stem);
+top y1=h; bot y2=0;
+pickup tiny.nib; filldraw stroke z1e--z2e; % stem
+if serifs: dish_serif(1,2,a,1/3,cap_jut,b,1/3,cap_jut); % upper stem serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,cap_jut); fi % lower stem serif
+% K_cbowl
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6cap_jut else:.4tiny fi;
+stem1=max(tiny.breadth,fudged.hair if hefty:-3stem_corr fi);
+stem2=max(tiny.breadth,fudged.cap_stem-3stem_corr);
+rt x3r=hround(r-letter_fit-u-right_jut);
+rt x6r=hround(r-letter_fit-.75u-right_jut);
+y4=1/3h; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+ else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(slab,90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+ numeric up_inner_jut;
+ if rt x1r+cap_jut+.5u+1<=lft x3l-1.2cap_jut: up_inner_jut=1.2cap_jut;
+ else: rt x1r+cap_jut+.5u+1=lft x3l-up_inner_jut; fi
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+else: fill z5'l--diag_end(5'l,6'l,.5,1,6'r,5'r)--z5'r--cycle; fi% lower diagonal
+%%%
+% uppercase descender/ogonek
+if is_ogonek:
+ def the_pen=if known ogonek_pen: ogonek_pen
+ elseif serifs: tiny elseif is_bold: fisp else: fine fi
+ enddef;
+ % |diag_end| refers to |tiny| pen, hence |tiny| in the following equation:
+ ogonek_pos=(x6 if not serifs: l if is_bold: +.75tiny fi\\ fi,.5the_pen)
+ if serifs and not is_egyptian: +(.5xvair,0) fi;
+ easy_ogonek(the_pen,11,12,13); % ogonek
+else:
+ if not serifs:
+ right_jut:=max(right_jut,hround (r-rt x6r-.65u)); fi
+ if serifs:
+ pickup crisp.nib;
+ else:
+ pickup pencircle scaled (3/5[fine,crisp]+eps);
+ fi
+ numeric bracket_height,light_stem; pair downward;
+ bracket_height=bracket;
+ light_stem=hround (max(tiny.breadth,fudged.hair if hefty:-4stem_corr fi));
+ % for cyr_serif always |y$|<|y$$|
+ if (y6>y1): errmessage ("`cyr_serif' placed only on the bottom"); fi
+ downward=z6-z1;
+ y.q0=min(y6+.5bracket_height,y1)+eps;
+ top y.q1-slab-eps=bot y.q4+eps=tiny.bot y6;
+ if y.q1>y.q0: y.q0:=y.q1+eps; fi
+ bot y.q2=bot y.q3=vround(-d);
+ y.q5=y.q1; y.q6=y.q0;
+ z.q5=whatever[z6,z1]; z.q6=whatever[z6,z1];
+ z.q0-penoffset downward of currentpen =
+ z6r-penoffset downward of pen_[tiny.nib]-whatever*downward;
+ rt x.q1=hround (tiny.rt x6r+right_jut)+eps;
+ if x.q6>x.q0-eps: x.q6:=x.q0-eps; fi
+ rt x.q2=lft x.q3+light_stem+eps=hround (rt x.q1+beak_jut)+eps;
+ x.q4=x6-.5(fudged.stem-3stem_corr-tiny)-eps;
+ pair corner,beak_corner;
+ ypart corner=y.q1; corner=z.q0+whatever*downward;
+ ypart beak_corner=y.q4; beak_corner=z.q3+whatever*(z.q1-z.q2);
+ filldraw z.q6--z.q5
+ ...(beak_darkness+eps)[beak_corner,.5[z.q3,z.q4]]
+ ...{z.q2-z.q1}z.q3--z.q2--z.q1{-right_jut,0}
+ ...(1/3+eps)[corner,.5[z.q1,z.q0]]{z.q0-z.q1}
+ ...{z1-z6}z.q0--cycle; % descender
+ labels (.q0,.q1,.q2,.q3,.q4,.q5,.q6);
+%
+fi
+%%%%%
+penlabels(1,2,3,4,5,6,7); endchar;
+
+lhchar "Uppercase Russian letter K_beak (`concrete' form)";
+cyrchar(K_beak,13.5u#,cap_height#,0); %EN_width#
+if is_small_cap: getcharcode(k_beak); fi
+italcorr cap_height#*slant-.5u#;
+adjust_fit(min(4.5u#-.5cap_stem#,3.5u#)-.5width_adj#, % Beak_adj
+ cap_serif_fit#);
+% upperc_k;beak
+pickup tiny.nib; pos1(fudged.cap_stem,0); pos2(fudged.cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5fudged.cap_stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+if serifs:
+ nodish_serif(1,2,a,1/3,cap_jut,b,1/3,cap_jut); %!!! upper stem serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,cap_jut); fi % lower stem serif
+% K_cbowl
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6cap_jut else:.4tiny fi;
+stem1=max(tiny.breadth,fudged.hair if hefty:-3stem_corr fi);
+stem2=max(tiny.breadth,fudged.cap_stem-3stem_corr);
+rt x3r=hround(r-letter_fit-u-right_jut);
+rt x6r=hround(r-letter_fit-.75u-right_jut);
+y4=1/3h; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+ else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(slab,90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+ numeric up_inner_jut;
+ if rt x1r+cap_jut+.5u+1<=lft x3l-1.2cap_jut: up_inner_jut=1.2cap_jut;
+ else: rt x1r+cap_jut+.5u+1=lft x3l-up_inner_jut; fi
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+else: fill z5'l--diag_end(5'l,6'l,.5,1,6'r,5'r)--z5'r--cycle; fi% lower diagonal
+%%%
+% upper left beak
+_one:=10; _two:=11;
+pickup crisp.nib;
+top y[_one]r=h; x[_one]=x1; pos[_one](slab,90); pos[_two](hair,180);
+lft x[_two]r=l+letter_fit+hround.65u; y[_two]=good.y(y[_one]l-beak)-eps;
+arm([_one],[_two],q,beak_darkness,-.7beak_jut);
+%%%%%
+penlabels(1,2,3,4,5,6,7); endchar;
+
+lhchar "Uppercase Russian letter L_tl (`concrete' form)";
+cyrchar(L_tl,13.5u#,cap_height#,desc_depth#); %N_width#
+if is_small_cap: getcharcode(l_tl); fi
+adjust_fit(if serifs: .8(flare#+(cap_stem#-stem#))-.5u#
+ else: cap_serif_fit# fi,
+ -.8cap_jut#+if serifs:.5 fi u#); %Lcon_tl
+% upper_spec_l;
+numeric bulb_diam; bulb_diam=flare+(cap_stem-stem);
+numeric left_stem,right_stem,outer_jut,alpha;
+right_stem=cap_stem-stem_corr;
+left_stem=min(cap_hair if hefty:-3stem_corr fi,right_stem);
+outer_jut=.8cap_jut; x1l=w-x4r=outer_jut+if serifs:.5 fi u; y1=y4=0; x2-x1=x4-x3;
+if serifs: x3l=x2r+((x1r-x4l)*(slab/(h-slab))) %+2apex_corr;
+ if not is_egyptian:-.25left_stem fi;
+else: x3r= x2r+apex_corr; fi
+y2=y3=h if not serifs:+apex_o+apex_oo fi;
+alpha=diag_ratio(2,left_stem,y2-y1,x4r-x1l-apex_corr);
+penpos1(alpha*left_stem,0); penpos2(alpha*left_stem,0);
+penpos3(alpha*right_stem,0); penpos4(alpha*right_stem,0);
+numeric t; t=slab+bracket;
+forsuffixes e=l,r: z54e=(((0,t)--(w,t)) intersectionpoint (z4e--z3e)); endfor;
+if serifs:
+ fill stroke z3e--z54e; %!!! right stem
+ pickup tiny.nib;
+ penpos5(left_stem,-90); pos5'(left_stem,-90); z5'=z5;
+ pos8(cap_hair,-180); pos9(bulb_diam,-180);
+ y9=if is_egyptian: 0.12h else: 1/6h-max(0,flare-stem-2vair_corr-.5) fi;
+ lft x9r=l+letter_fit+hround(.5u-.5);
+ y5r=-o; x5=max(lft x9r+.5bulb_diam,.5[x9r,x1r]);
+ y6l=y9+bulb_diam-hair;
+ numeric t; t=1-slant;
+ z7r=(max(.75[x1,x1r],x9+if is_egyptian: (if is_small_cap: 2.25 else: 2.667 fi
+ +max(-2slant,.5slant))*hair
+ else: if is_bold:.75 fi bulb_diam+1.35hair fi),
+ y7l-t*7/8left_stem);
+ z7l=(x7r-2/3(x1r-x1l),if is_egyptian: .35[y5l,y5] else: y5 fi);%y5l);
+ z6r=(x7r,y1)+whatever*((x1r,y1)-z2r); y6r-y6l=t*(y5r-y5l);
+ x6r-x6l=1/2(x1r-x1l);
+ fill stroke z2e{z1e-z6e}.. controls z6e and z7e ..z5e;
+ {{less_tense; cyrbulb(5',8,9)}}; % arc and bulb
+ numeric inner_jut,left_jut,fit; pickup tiny.nib;
+ x10r=x3r; top y10=h; pos10(alpha*right_stem,0); x4:=x4r;
+ left_jut=cap_jut+left_stem;
+ serif(10,4,c,0,-left_jut); % upper serif
+ pickup tiny.nib;
+ prime_points_inside(1,2); prime_points_inside(4,3);
+ if rt x1'r+cap_jut+.5u+1<=lft x4'l-cap_jut: inner_jut=cap_jut;
+ else: rt x1'r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
+ %dish_serif(4',3,d,1/2,inner_jut,e,1/3,outer_jut); %!!! right serif
+else: z0=whatever[z1r,z2r]=whatever[z3l,z4l];
+ if y0<h-notch_cut: y0:=h-notch_cut;
+ fill z0+.5right{down}...{z4-z3}diag_end(3l,4l,1,1,4r,3r)
+ --diag_end(4r,3r,1,1,2l,1l)--diag_end(2l,1l,1,1,1r,2r){z2-z1}
+ ...{up}z0+.5left--cycle; % left and right diagonals
+ else: fill z0--z54l--z54r--diag_end(2l,1l,1,1,1r,0)--cycle; fi fi %!!! left and right diagonals
+%%%%%
+% L_tail(4);X_tail
+_zero:=4;
+_one:=11; _two:=12; _three:=13; _four:=14;
+%
+% X_
+pickup fine.nib;
+stem3=hround (max(fine.breadth,.5[stem1,x[_zero]r-x[_zero]l]));
+x[_one]'r=x[_zero]r;
+penpos[_one]'(stem3,0); pos[_one](stem3,0); z[_one]=z[_one]';
+bot y[_one]=max(-1/3d-eps,-d+if serifs: vair'else: slab fi);
+(x[_one]'l,y54')=whatever[z4l,z4l+dir angle(z4l-if serifs:z1l else:z34'fi)];
+z54'=(x[_one]'l,y54');
+fill z54l{z4r-z1r}
+ ..controls (z54')..
+ {down}z[_one]'l--z[_one]'r{up}
+ ..controls (z4r)..
+ {z1r-z4r}z54r--cycle; %link
+% _X
+if serifs:
+ numeric bulb_diam;
+ bulb_diam=max(currentbreadth+eps,min(.82d-1-eps,flare+(cap_stem-stem)));
+ pos[_two](vair',-90); pos[_three](hair,-180);
+ pos[_four](bulb_diam,-180);
+ x[_two]=.5[x[_one],x[_three]r];
+ bot y[_two]r=-d-oo; y[_three]-.5bulb_diam=vround max(-.85d,y[_two]r+eps)+eps;
+ z[_three]r=z[_four]r;
+ rt x[_four]l=floor x[_one]-2.5u if monospace: / expansion_factor fi;%!!!
+ filldraw stroke pulled_arc.e([_one],[_two]);%!!!
+ bulb([_two],[_three],[_four]); % bulb
+else:
+ pos[_two](slab,-90); pos[_three](flare,-105);
+ rt x[_three]r=x[_one]-4u; bot y[_three]r=-d;%!!!
+ bot y[_two]r=-d-o; x[_two]=.4[x[_three]r,x[_one]r];%!!!
+ filldraw stroke super_arc.e([_one],[_two])%!!!
+ & term.e([_two],[_three],left,.8,4); fi
+%%%
+penlabels(0,2,6,3,4,5,7,8,9,10); endchar;
+
+endgroup;
+
+endinput;
+%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/specific/lgnoncl.mf b/Master/texmf-dist/fonts/source/lh/specific/lgnoncl.mf
new file mode 100644
index 00000000000..1f569679971
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/specific/lgnoncl.mf
@@ -0,0 +1,465 @@
+%
+% lgnoncl.mf
+%
+%% Cyrillic font container with T2 encoding beta-support
+%
+% This file is future part of lxfonts package
+% Version 3.5 // Patchlevel=0
+% (c) O.Lapko
+%
+% This package is freeware product under conditions similar to
+% those of D. E. Knuth specified for the Computer Modern family of fonts.
+% In particular, only the authors are entitled to modify this file
+% (and all this package as well) and to save it under the same name.
+%
+% Content:
+%
+% Lowercase Cyrillic letters common for couple of encodings
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% kje "5c Ka with acute
+% zh_brv "c2 Zhe with breve
+% zh_uml "dd Zhe with umlaut
+% ya_ac
+% ya_bar
+% l_ldot
+
+LHver_check(3,5); % like |version_check| in ec
+
+begingroup
+
+def is_egyptian =
+% |false| for most of the CM fonts, except funny fonts;
+% |true| for the CC fonts
+ (serifs and (1.4max(fine#,crisp#, tiny#)<slab#) and (1.6slab#>stem#))
+%added
+ or (vair#>.5stem#)
+enddef;
+
+lhchar "Lowercase Cyrillic letter kje (`concrete' form)";
+cyrchar_twice(kje,10u#,x_height#,0); %en_width#
+italcorr x_height#*slant-.5u#;
+adjust_fit(serif_fit#,serif_fit#);
+begingroup
+% lowerc_k;
+pickup tiny.nib; numeric stem[];
+stem0=max(tiny.breadth,hround(fudged.stem-stem_corr));
+pos1(stem0,0); pos2(stem0,0);
+lft x1l=lft x2l=hround (2.5u-.5fudged.stem); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+% k_cbowl;
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6jut else:.4tiny fi;
+stem1=max(tiny.breadth,hround(fudged.hair if hefty:-\\4stem_corr fi));
+stem2=max(tiny.breadth,fudged.stem-3stem_corr);
+x3r=hround(r-letter_fit-.7u-right_jut)-.5tiny+eps;
+x6r=hround(r-letter_fit-.3u-right_jut)-.5tiny+eps;
+y4=.7bar_height; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(vair',90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+%%%
+else: fill z5l--diag_end(5l,6'l,.5,1,6'r,5r)--z5r--cycle; fi % lower diagonal
+%%%
+if serifs: save slab; slab:=Vround(vair-vair_corr);
+ dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ slab:=vair;
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower stem serif
+ numeric up_inner_jut;
+ if rt x1r+jut+.5u+1<=lft x3l-1.2jut: up_inner_jut=1.2jut;
+ else: rt x1r+jut+.5u+1=lft x3l-up_inner_jut; fi
+ slab:=Vround(vair-vair_corr);
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+fi
+%%%%%
+endgroup;
+% the accent
+hpos_corr=-u; put_accent; repeat_once;
+penlabels(1,2,3,4,5,6); endchar;
+
+lhchar "Lowercase Cyrillic letter zh breve (`concrete' form)";
+cyrchar(zh_brv,10u#,x_height#+acc_height#, 0); %en_width#
+italcorr x_height#*slant+.25u#;
+adjust_fit(w#-5u#+serif_fit#,serif_fit#);
+full_h:=h; h:=x_height;
+% lowerc_zh;
+pickup tiny.nib; numeric stem[];
+stem0=max(tiny.breadth,hround(fudged.stem-stem_corr));
+if odd((r-l)-stem0): change_width; fi % symmetric & all three equal
+pos1(stem0,0); pos2(stem0,0);
+lft x1l=lft x2l=hround (.5[l,r]-.5fudged.stem)-eps; % middle stem point
+top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+% k_cbowl;
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6jut else:.4tiny fi;
+stem1=max(tiny.breadth,hround(fudged.hair if hefty:-\\4stem_corr fi));
+stem2=max(tiny.breadth,fudged.stem-3stem_corr);
+x3r=hround(r-letter_fit-.7u-right_jut)-.5tiny+eps;
+x6r=hround(r-letter_fit-.3u-right_jut)-.5tiny+eps;
+y4=.7bar_height; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(vair',90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+%%%
+else: fill z5l--diag_end(5l,6'l,.5,1,6'r,5r)--z5r--cycle; fi % lower diagonal
+%%%
+% mirror
+ pickup tiny.nib;
+forsuffixes $ = 3l,3,3r,3'l,3'r,4l,4,4r,5l,5,5r,6l,6,6r,6'l,6'r,7l,7r:
+ x.m$=l+(r-x$); y.m$=y$; endfor;
+fill z.m4r--diag_end(.m4r,.m3'r,1,.5,.m3'l,.m4l)--z.m4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ fill z.m5l
+ if is_egyptian: ---z.m6'l...{z.m6r-z.m6l}(.35[x.m6l,x.m7l],y.m7l)--
+ else:{z.m6'l-.5[z.m5,z.m5l]}...{z.m6r-z.m6l} fi
+ z.m7l..(lft x.m7l,top y.m7l)--(lft x.m7r,bot y.m7r)..z.m7r
+ if is_egyptian: --(.5[x.m6r,x.m7r],y.m7r){z.m6l-z.m6r}...z.m6'r---
+ else: {z.m6l-z.m6r}...{.5[z.m5,z.m5l]-z.m6'l} fi
+ z.m5r--cycle; % lower diagonal
+ z8l=z.m3r; z8r=z.m3l; z9l=z.m4r; z9r=z.m4l; z8=.5[z8l,z8r]; z9=.5[z9l,z9r];
+else: fill z.m5'l--diag_end(.m5'l,.m6'l,.5,1,.m6'r,.m5'r)--z.m5'r--cycle; % lower diagonal
+fi
+if serifs: save slab; slab:=Vround(vair-vair_corr);
+ dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ slab:=vair;
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower stem serif
+ numeric up_inner_jut;
+ if rt x1r+jut+.5u+1<=lft x3l-1.2jut: up_inner_jut=1.2jut;
+ else: rt x1r+jut+.5u+1=lft x3l-up_inner_jut; fi
+ slab:=Vround(vair-vair_corr);
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+ dish_serif(8,9,g,1/2,right_jut,h,2/3,up_inner_jut)(dark); % upper diagonal serif
+fi
+%%%%%
+% the accent
+h:=full_h; lowercase_breve(x1,0, 17,18,19);
+endchar;
+
+lhchar "Lowercase Cyrillic letter zh umlaut (`concrete' form)";
+cyrchar(zh_uml,10u#,lc_trema_height#, 0); %en_width#
+italcorr x_height#*slant+.25u#;
+adjust_fit(w#-5u#+serif_fit#,serif_fit#);
+full_h:=h; h:=x_height;
+% lowerc_zh;
+pickup tiny.nib; numeric stem[];
+stem0=max(tiny.breadth,hround(fudged.stem-stem_corr));
+if odd((r-l)-stem0): change_width; fi % symmetric & all three equal
+pos1(stem0,0); pos2(stem0,0);
+lft x1l=lft x2l=hround (.5[l,r]-.5fudged.stem)-eps; % middle stem point
+top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+% k_cbowl;
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6jut else:.4tiny fi;
+stem1=max(tiny.breadth,hround(fudged.hair if hefty:-\\4stem_corr fi));
+stem2=max(tiny.breadth,fudged.stem-3stem_corr);
+x3r=hround(r-letter_fit-.7u-right_jut)-.5tiny+eps;
+x6r=hround(r-letter_fit-.3u-right_jut)-.5tiny+eps;
+y4=.7bar_height; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(vair',90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+%%%
+else: fill z5l--diag_end(5l,6'l,.5,1,6'r,5r)--z5r--cycle; fi % lower diagonal
+%%%
+% mirror
+ pickup tiny.nib;
+forsuffixes $ = 3l,3,3r,3'l,3'r,4l,4,4r,5l,5,5r,6l,6,6r,6'l,6'r,7l,7r:
+ x.m$=l+(r-x$); y.m$=y$; endfor;
+fill z.m4r--diag_end(.m4r,.m3'r,1,.5,.m3'l,.m4l)--z.m4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ fill z.m5l
+ if is_egyptian: ---z.m6'l...{z.m6r-z.m6l}(.35[x.m6l,x.m7l],y.m7l)--
+ else:{z.m6'l-.5[z.m5,z.m5l]}...{z.m6r-z.m6l} fi
+ z.m7l..(lft x.m7l,top y.m7l)--(lft x.m7r,bot y.m7r)..z.m7r
+ if is_egyptian: --(.5[x.m6r,x.m7r],y.m7r){z.m6l-z.m6r}...z.m6'r---
+ else: {z.m6l-z.m6r}...{.5[z.m5,z.m5l]-z.m6'l} fi
+ z.m5r--cycle; % lower diagonal
+ z8l=z.m3r; z8r=z.m3l; z9l=z.m4r; z9r=z.m4l; z8=.5[z8l,z8r]; z9=.5[z9l,z9r];
+else: fill z.m5'l--diag_end(.m5'l,.m6'l,.5,1,.m6'r,.m5'r)--z.m5'r--cycle; % lower diagonal
+fi
+if serifs: save slab; slab:=Vround(vair-vair_corr);
+ dish_serif(1,2,a,1/3,jut,b,1/3,jut); % upper stem serif
+ slab:=vair;
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower stem serif
+ numeric up_inner_jut;
+ if rt x1r+jut+.5u+1<=lft x3l-1.2jut: up_inner_jut=1.2jut;
+ else: rt x1r+jut+.5u+1=lft x3l-up_inner_jut; fi
+ slab:=Vround(vair-vair_corr);
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+ dish_serif(8,9,g,1/2,right_jut,h,2/3,up_inner_jut)(dark); % upper diagonal serif
+fi
+%%%%%
+% the accent
+h:=full_h; lowercase_umlaut((x1-.5w),0, 17,18,19,20);
+endchar;
+
+lhchar "Lowercase Cyrillic letter ya acute (`concrete' form) (looks like backward R)";
+cyrchar_twice(ya_ac,if serifs: 9.75u# else: 10u# fi-.5width_adj#,x_height#,0); %ya (~n_width:10u)
+italcorr x_height#*slant-serif_fit#+jut#-2u#+.5stem#; %d->x_height+jut
+adjust_fit(if serifs:serif_fit# else:0 fi,serif_fit#);
+begingroup
+% lowerc_ya;
+pickup tiny.nib; pos1(stem',0); pos2(stem',0);
+rt x1r=rt x2r=hround(w-2.5u+.5stem'); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+penpos3(vair,90); penpos4(vair,90); penpos5(curve if hefty:-3stem_corr fi,180);
+y6r=y7r=hround (if serifs:.52h else:.5h fi-.6[thin_join,vair]/2);
+y6l=y7l=y6r+.6[thin_join,vair]; y6=y7=.5[y6l,y6r];%
+z3r=top z1; y4=y3; y5=.52[y6r,y4r]+eps;
+x7l=x7r=x2; x4+.25u=x6l=x6r; x4=.5w if serifs:+.25u else:-.25u fi;
+x5r=hround min(1.25u,2u-.5curve)+eps;
+x4l:=x4+.125curve; x6l:=x6l+.125curve;
+fill stroke
+{{interim superness:=more_super; z7e..pulled_arc.e(6,5) &
+ pulled_arc.e(5,4)..z3e}}; % lobe
+numeric stem[],alpha,right_jut;
+right_jut=if serifs:.7jut else:.4tiny fi;
+stem1=max(tiny.breadth,hround(fudged.stem-3stem_corr));
+lft x9l=hround(l+letter_fit+.3u+right_jut)-eps; bot y9=0;
+alpha=diag_ratio(1,.5(stem1-tiny),y1-y9,x9l-x1);
+penpos9(alpha*(stem1-tiny),0);
+x8=x6l-if serifs:.75u else:.25u fi; y8=y6;
+if serifs: numeric theta; theta=angle(y1-y9,x9l-x1);
+ y9'r=max(hair,.5stem); z9'l=z9'r+whatever*dir theta;
+else: y9'l=y9'r=0; fi
+z9'r=z9r+penoffset z1-z9 of currentpen+whatever*(z1-z9);
+z9'l=z9l+penoffset z9-z1 of currentpen+whatever*(z1-z9);
+z8=z9'+whatever*(z1-z9);
+penpos8(if serifs: alpha*stem1 else: stem fi-2stem_corr,0);
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ lft x10=tiny.lft x9l-right_jut;
+ if is_egyptian: y10r=0; penpos10(vair',-90); else: y10=-o;
+ penpos10(max(fine.breadth+eps,hair-fine),-90); fi
+ fill z8l
+ if is_egyptian: ---z9'l...{z9l-z9r}(.35[x9l,x10l],y10l)--
+ else: {.5[z9l,z9]-z8l}...{z8l-z8r} fi
+ z10l..(lft x10l,bot y10l)--(lft x10r,top y10r)..z10r
+ if is_egyptian: --(.35[x9r,x10r],y10r){z9r-z9l}...z9'r---
+ else: {z8r-z8l}...{z8l-.5[z9l,z9]} fi
+ z8r--cycle; % lower diagonal
+ numeric inner_jut;
+ if lft x2l-jut-.5u+1>=rt x9r+jut: inner_jut=jut;
+ else: lft x2l-jut-.5u+1=rt x9r+inner_jut; fi
+ save slab; slab:=Vround(vair-vair_corr);
+ nodish_serif(1,2,a,1/3,.5jut,b,1/3,jut); % upper serif
+ slab:=vair;
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower serif
+else: fill z8l--diag_end(8l,9'l,1,.5,9'r,8r)--z8r--cycle; fi % diagonal
+%%%%%
+endgroup;
+% the accent
+hpos_corr=-u; put_accent; repeat_once;
+penlabels(0,1,2,3,4,5,6,7,8,9,9',10); endchar;
+
+lhchar "Lowercase Cyrillic letter ya bar (`concrete' form) (looks like backward R)";
+cyrchar(ya_bar,if serifs: 9.75u# else: 10u# fi-.5width_adj#,lc_trema_height#,0); %ya (~n_width:10u)
+italcorr x_height#*slant-serif_fit#+jut#-2u#+.5stem#; %d->x_height+jut
+adjust_fit(if serifs:serif_fit# else:0 fi,serif_fit#);
+full_h:=h; h:=x_height;
+% lowerc_ya;
+pickup tiny.nib; pos1(stem',0); pos2(stem',0);
+rt x1r=rt x2r=hround(w-2.5u+.5stem'); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+penpos3(vair,90); penpos4(vair,90); penpos5(curve if hefty:-3stem_corr fi,180);
+y6r=y7r=hround (if serifs:.52h else:.5h fi-.6[thin_join,vair]/2);
+y6l=y7l=y6r+.6[thin_join,vair]; y6=y7=.5[y6l,y6r];%
+z3r=top z1; y4=y3; y5=.52[y6r,y4r]+eps;
+x7l=x7r=x2; x4+.25u=x6l=x6r; x4=.5w if serifs:+.25u else:-.25u fi;
+x5r=hround min(1.25u,2u-.5curve)+eps;
+x4l:=x4+.125curve; x6l:=x6l+.125curve;
+fill stroke
+{{interim superness:=more_super; z7e..pulled_arc.e(6,5) &
+ pulled_arc.e(5,4)..z3e}}; % lobe
+numeric stem[],alpha,right_jut;
+right_jut=if serifs:.7jut else:.4tiny fi;
+stem1=max(tiny.breadth,hround(fudged.stem-3stem_corr));
+lft x9l=hround(l+letter_fit+.3u+right_jut)-eps; bot y9=0;
+alpha=diag_ratio(1,.5(stem1-tiny),y1-y9,x9l-x1);
+penpos9(alpha*(stem1-tiny),0);
+x8=x6l-if serifs:.75u else:.25u fi; y8=y6;
+if serifs: numeric theta; theta=angle(y1-y9,x9l-x1);
+ y9'r=max(hair,.5stem); z9'l=z9'r+whatever*dir theta;
+else: y9'l=y9'r=0; fi
+z9'r=z9r+penoffset z1-z9 of currentpen+whatever*(z1-z9);
+z9'l=z9l+penoffset z9-z1 of currentpen+whatever*(z1-z9);
+z8=z9'+whatever*(z1-z9);
+penpos8(if serifs: alpha*stem1 else: stem fi-2stem_corr,0);
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ lft x10=tiny.lft x9l-right_jut;
+ if is_egyptian: y10r=0; penpos10(vair',-90); else: y10=-o;
+ penpos10(max(fine.breadth+eps,hair-fine),-90); fi
+ fill z8l
+ if is_egyptian: ---z9'l...{z9l-z9r}(.35[x9l,x10l],y10l)--
+ else: {.5[z9l,z9]-z8l}...{z8l-z8r} fi
+ z10l..(lft x10l,bot y10l)--(lft x10r,top y10r)..z10r
+ if is_egyptian: --(.35[x9r,x10r],y10r){z9r-z9l}...z9'r---
+ else: {z8r-z8l}...{z8l-.5[z9l,z9]} fi
+ z8r--cycle; % lower diagonal
+ numeric inner_jut;
+ if lft x2l-jut-.5u+1>=rt x9r+jut: inner_jut=jut;
+ else: lft x2l-jut-.5u+1=rt x9r+inner_jut; fi
+ save slab; slab:=Vround(vair-vair_corr);
+ nodish_serif(1,2,a,1/3,.5jut,b,1/3,jut); % upper serif
+ slab:=vair;
+ dish_serif(2,1,c,1/3,jut,d,1/3,jut); % lower serif
+else: fill z8l--diag_end(8l,9'l,1,.5,9'r,8r)--z8r--cycle; fi % diagonal
+%%%%%
+the accent
+h:=full_h;
+% low_bar(.5[x1,x6r-.5curve],0, 10,11);
+x_move:=.5[x1,x6r-.5curve]; y_move:=0; _one:=20; _two:=21;
+pickup if serifs: crisp.nib else: fine.nib fi;
+numeric macron_breadth; macron_breadth:=Vround .2[vair,stem];
+pos[_one](macron_breadth,90); pos[_two](macron_breadth,90);
+x[_one]=x_move+hround(2.5u if monospace:/expansion_factor fi+.5vair);
+top y[_one]r=top y[_two]r=lc_trema_height+o;
+x[_two]=x_move-hround(2.5u if monospace:/expansion_factor fi+.5vair);
+filldraw stroke z[_one]e--z[_two]e; % bar
+penlabels(0,1,2,3,4,5,6,7,8,9,9',10); endchar;
+
+lhchar "Lowercase Cyrillic letter l lower dot (`concrete' form)";
+cyrchar(l_ldot,10u#-.5width_adj#,x_height#,desc_depth#); %en_width#
+adjust_fit(if serifs:
+% max(.25u#,.25(7/8[hair#,flare#])+.5hair#) %l
+% if not is_egyptian: -.5hair# fi
+ %if is_egyptian: max(.25u#,.25(7/8[hair#,flare#])+.5hair#) %l
+ %else:
+ .25(7/8[hair#,flare#])-.25u# if is_egyptian:+.5hair# fi
+%fi
+ else: serif_fit# fi,serif_fit#);
+%lower_spec_l;
+numeric bulb_diam; bulb_diam=hround 7/8[hair,flare];
+numeric left_stem,right_stem,outer_jut,alpha;
+right_stem=stem-stem_corr;
+left_stem=min(hair if hefty:-3stem_corr fi,right_stem);
+outer_jut=.75jut; x4r=r-letter_fit-outer_jut- if serifs:.25 else:.5 fi u;
+x1l-.5u-.065jut=w-x4r; y1=y4=0; x2-x1=x4-x3;
+if serifs: x3l=x2r+((x1r-x4l)*(vair/(h-vair)))if not is_egyptian:-.25left_stem fi;
+ else: x3r=x2r+apex_corr; fi
+y2=y3=h if not serifs:+apex_o+apex_oo fi;
+alpha=diag_ratio(2,left_stem,y2-y1,x4r-x1l-apex_corr);
+penpos1(alpha*left_stem,0); penpos2(alpha*left_stem,0);
+penpos3(alpha*right_stem,0); penpos4(alpha*right_stem,0);
+if serifs:
+ fill stroke z3e--z4e; % right stem
+ pickup tiny.nib;
+ penpos5(left_stem,-90); pos5'(left_stem,-90); z5'=z5;
+ pos8(hair,-180); pos9(bulb_diam,-180);
+ y9-.5bulb_diam=.12desc_depth-eps; lft x9r=l+letter_fit+hround(.35u-.5);
+ y5r=-oo-eps; x5=max(min(.45[x9r,x1r],rt x9l-eps),lft x9r+.5bulb_diam);
+ z7r=(max(.5[x1,x1r],x9+if is_egyptian:1.25bulb_diam +.5slant*hair
+ else: 1.5bulb_diam-hair fi),
+ y7l-7/8left_stem);
+ z7l=(x7r-2/3(x1r-x1l),if is_egyptian: .35[y5l,y5] else: y5 fi);
+ y6l=y9+.5bulb_diam; z6r=(x7r,y1)+whatever*(z1-z2);%
+ y6r-y6l=y5r-y5l; x6r-x6l=2/3(x1r-x1l);
+ fill stroke z2e.. controls z6e and z7e ..z5e; % left stem
+ {{less_tense; cyrbulb(5',8,9)}}; % arc and bulb
+ numeric inner_jut,left_jut,fit;
+ pickup tiny.nib; left_jut=jut+left_stem;
+ prime_points_inside(4,3);
+ x10r=x3r; top y10=h; pos10(alpha*right_stem,0); x4:=x4r;
+ if rt x1r+jut+.5u+1<=lft x4'l-jut: inner_jut=jut;
+ else: rt x1r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
+ save slab; slab:=Vround(vair-vair_corr);
+ serif(10,4,c,0,-left_jut); % upper serif
+ slab:=vair;
+ dish_serif(4',3,d,1/2,inner_jut,e,1/3,outer_jut); % right serif
+else: z0=whatever[z1r,z2r]=whatever[z3l,z4l];
+ if y0<h-notch_cut: y0:=h-notch_cut;
+ fill z0+.5right{down}...{z4-z3}diag_end(3l,4l,1,1,4r,3r)
+ --diag_end(4r,3r,1,1,2l,1l)--diag_end(2l,1l,1,1,1r,2r){z2-z1}
+ ...{up}z0+.5left--cycle; % left and right diagonals
+ else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
+ --diag_end(2l,1l,1,1,1r,0)--cycle; fi fi % left and right diagonals
+%%%%%
+% the accent
+% lower_dot;
+_one:=17; _two:=18; _center:=.5w;
+%
+numeric dot_diam#; dot_diam#=max(dot_size#,cap_curve#);
+define_whole_blacker_pixels(dot_diam);
+pos[_one](dot_diam,0); pos[_two](dot_diam,90);
+x[_one]=hround(_center); bot y[_two]l=vround(-d-1);
+if 0-oo-top y[_two]r<slab: y[_one]r:=vround(max(y[_two]l+eps,-fine-slab)); fi
+x[_one]=x[_two]; y[_one]=vround(.5[y[_two]l,y[_two]r]);
+dot([_one],[_two]); % dot
+%%%%%
+penlabels(0,1,2,6,3,4,5,7,8,9,10); endchar;
+
+endgroup;
+
+endinput;
+%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/specific/lgnoncu.mf b/Master/texmf-dist/fonts/source/lh/specific/lgnoncu.mf
new file mode 100644
index 00000000000..1c9a688c6e2
--- /dev/null
+++ b/Master/texmf-dist/fonts/source/lh/specific/lgnoncu.mf
@@ -0,0 +1,437 @@
+%
+% lgnoncu.mf
+%
+%% Cyrillic font container with T2 encoding beta-support
+%
+% This file is future part of lxfonts package
+% Version 3.5 // Patchlevel=0
+% (c) O.Lapko
+%
+% This package is freeware product under conditions similar to
+% those of D. E. Knuth specified for the Computer Modern family of fonts.
+% In particular, only the authors are entitled to modify this file
+% (and all this package as well) and to save it under the same name.
+%
+% Content:
+%
+% Lowercase Cyrillic letters common for couple of encodings
+%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+% KJE "0c Ka with acute
+% ZH_brv "c1 Zhe with breve
+% ZH_uml "dc Zhe with umlaut
+% YA_ac
+% YA_bar
+% L_ldot
+
+LHver_check(3,5); % like |version_check| in ec
+
+begingroup
+
+def is_egyptian =
+% |false| for most of the CM fonts, except funny fonts;
+% |true| for the CC fonts
+ (serifs and (1.4max(fine#,crisp#, tiny#)<slab#) and (1.6slab#>stem#))
+%added
+ or (vair#>.5stem#)
+enddef;
+
+lhchar "Uppercase Cyrillic letter KJE (`concrete' form)";
+cyrchar_twice(KJE,13.5u#,cap_height#,0); %EN_width#
+if is_small_cap: getcharcode(kje); fi
+italcorr cap_height#*slant-.5u#;
+adjust_fit(cap_serif_fit#,cap_serif_fit#);
+% upperc_k;
+pickup tiny.nib; pos1(fudged.cap_stem,0); pos2(fudged.cap_stem,0);
+lft x1l=lft x2l=hround max(2u,3u-.5fudged.cap_stem);
+top y1=h; bot y2=0;
+pickup tiny.nib; filldraw stroke z1e--z2e; % stem
+if serifs: dish_serif(1,2,a,1/3,cap_jut,b,1/3,cap_jut); % upper stem serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,cap_jut); fi % lower stem serif
+% K_cbowl
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6cap_jut else:.4tiny fi;
+stem1=max(tiny.breadth,fudged.hair if hefty:-3stem_corr fi);
+stem2=max(tiny.breadth,fudged.cap_stem-3stem_corr);
+rt x3r=hround(r-letter_fit-u-right_jut);
+rt x6r=hround(r-letter_fit-.75u-right_jut);
+y4=1/3h; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+ else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(slab,90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+ numeric up_inner_jut;
+ if rt x1r+cap_jut+.5u+1<=lft x3l-1.2cap_jut: up_inner_jut=1.2cap_jut;
+ else: rt x1r+cap_jut+.5u+1=lft x3l-up_inner_jut; fi
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+else: fill z5'l--diag_end(5'l,6'l,.5,1,6'r,5'r)--z5'r--cycle; fi% lower diagonal
+%%%
+%%%%%
+% the accent
+put_accent(cyrcaph); repeat_once;
+penlabels(1,2,3,4,5,6,7); endchar;
+
+lhchar "Uppercase Cyrillic letter ZH breve (`concrete' form)";
+cyrchar(ZH_brv,13.5u#,cap_height#+acc_height#, 0); %N_width#
+if is_small_cap: getcharcode(zh_brv); fi
+italcorr cap_height#*slant+.25u#;
+adjust_fit(w#-2max(2u#+.5cap_stem#,3u#)+cap_serif_fit#,cap_serif_fit#);
+full_h:=h; h:=cap_height;
+% upperc_zh;
+if odd((r-l)-fudged.cap_stem): change_width; fi % symmetric & all three equal
+pickup tiny.nib; pos1(fudged.cap_stem,0); pos2(fudged.cap_stem,0);
+lft x1l=lft x2l=hround (.5[l,r]-.5fudged.cap_stem)-eps; % middle stem point
+top y1=h; bot y2=0;
+pickup tiny.nib; filldraw stroke z1e--z2e; % stem
+if serifs: dish_serif(1,2,a,1/3,cap_jut,b,1/3,cap_jut); % upper stem serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,cap_jut); fi % lower stem serif
+% K_cbowl
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6cap_jut else:.4tiny fi;
+stem1=max(tiny.breadth,fudged.hair if hefty:-3stem_corr fi);
+stem2=max(tiny.breadth,fudged.cap_stem-3stem_corr);
+rt x3r=hround(r-letter_fit-u-right_jut);
+rt x6r=hround(r-letter_fit-.75u-right_jut);
+y4=1/3h; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+ else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(slab,90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+ numeric up_inner_jut;
+ if rt x1r+cap_jut+.5u+1<=lft x3l-1.2cap_jut: up_inner_jut=1.2cap_jut;
+ else: rt x1r+cap_jut+.5u+1=lft x3l-up_inner_jut; fi
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+else: fill z5'l--diag_end(5'l,6'l,.5,1,6'r,5'r)--z5'r--cycle; fi% lower diagonal
+%%%
+% mirror
+pickup tiny.nib;
+forsuffixes $ = 3l,3,3r,3'l,3'r,4l,4,4r,5l,5,5r,6l,6,6r,6'l,6'r,7l,7r:
+ x.m$=l+(r-x$); y.m$=y$; endfor;
+fill z.m4r--diag_end(.m4r,.m3'r,1,.5,.m3'l,.m4l)--z.m4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ fill z.m5l
+ if is_egyptian: ---z.m6'l...{z.m6r-z.m6l}(.35[x.m6l,x.m7l],y.m7l)--
+ else:{z.m6'l-.5[z.m5,z.m5l]}...{z.m6r-z.m6l} fi
+ z.m7l..(lft x.m7l,top y.m7l)--(lft x.m7r,bot y.m7r)..z.m7r
+ if is_egyptian: --(.5[x.m6r,x.m7r],y.m7r){z.m6l-z.m6r}...z.m6'r---
+ else: {z.m6l-z.m6r}...{.5[z.m5,z.m5l]-z.m6'l} fi
+ z.m5r--cycle; % lower diagonal
+ z8l=z.m3r; z8r=z.m3l; z9l=z.m4r; z9r=z.m4l; z8=.5[z8l,z8r]; z9=.5[z9l,z9r];
+ dish_serif(8,9,g,1/2,right_jut,h,2/3,up_inner_jut)(dark); % upper diagonal serif
+else: fill z.m5'l--diag_end(.m5'l,.m6'l,.5,1,.m6'r,.m5'r)--z.m5'r--cycle; % lower diagonal
+fi
+%%%%%
+% the accent
+h:=full_h; uppercase_breve(x1,0, 17,18,19);
+penlabels(1,2,3,4,5,6,7); endchar;
+
+lhchar "Uppercase Russian letter ZH umlaut (`concrete' form)";
+cyrchar(ZH_uml,13.5u#,cap_height#+acc_height#, 0); %N_width#
+if is_small_cap: getcharcode(zh_uml); fi
+italcorr cap_height#*slant+.25u#;
+adjust_fit(w#-2max(2u#+.5cap_stem#,3u#)+cap_serif_fit#,cap_serif_fit#);
+full_h:=h; h:=cap_height;
+% upperc_zh;
+if odd((r-l)-fudged.cap_stem): change_width; fi % symmetric & all three equal
+pickup tiny.nib; pos1(fudged.cap_stem,0); pos2(fudged.cap_stem,0);
+lft x1l=lft x2l=hround (.5[l,r]-.5fudged.cap_stem)-eps; % middle stem point
+top y1=h; bot y2=0;
+pickup tiny.nib; filldraw stroke z1e--z2e; % stem
+if serifs: dish_serif(1,2,a,1/3,cap_jut,b,1/3,cap_jut); % upper stem serif
+ dish_serif(2,1,c,1/3,cap_jut,d,1/3,cap_jut); fi % lower stem serif
+% K_cbowl
+numeric right_jut,stem[],alpha[]; pickup tiny.nib;
+right_jut=if serifs:.6cap_jut else:.4tiny fi;
+stem1=max(tiny.breadth,fudged.hair if hefty:-3stem_corr fi);
+stem2=max(tiny.breadth,fudged.cap_stem-3stem_corr);
+rt x3r=hround(r-letter_fit-u-right_jut);
+rt x6r=hround(r-letter_fit-.75u-right_jut);
+y4=1/3h; top y3=h; bot y6=0; x4=x1;
+penpos3(alpha1*(stem1-tiny),0); penpos4(whatever,-90);
+alpha1=diag_ratio(1,.5(stem1-tiny),y3-y4,x3r-x4);
+penpos6(alpha2*(stem2-tiny),0);
+alpha2=diag_ratio(1,.5(stem2-tiny),y1-y6,x6r-x1);
+forsuffixes $=l,r: y3'$=h; z4.$=z3'$+whatever*(z3-z4);
+ z5.$=z6'$+whatever*(z1-z6)=whatever[z3,z4]; endfor
+if serifs: y6'l=max(cap_hair,.5stem);
+ z6'r=z6'l+whatever*dir(angle(y1-y6,x6r-x1));
+ else: y6'l=y6'r=0; fi
+z5=.5[z5l,z5r];
+z3'r=z3r+penoffset z3-z4 of currentpen+whatever*(z3-z4);
+% we have also |z3'l=z3l+penoffset z4-z3 of currentpen+whatever*(z3-z4)|;\]
+z6'r=z6r+penoffset z1-z6 of currentpen+whatever*(z1-z6);
+z6'l=z6l+penoffset z6-z1 of currentpen+whatever*(z1-z6);
+fill z4r--diag_end(4r,3'r,1,.5,3'l,4l)--z4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ rt x7=rt x6r+right_jut;
+ if is_egyptian: y7l=0; penpos7(slab,90);
+ else: y7=-o; penpos7(max(fine.breadth+eps,cap_hair-fine),90); fi
+ fill z5l
+ if is_egyptian: ---z6'l...{z6r-z6l}(.35[x6l,x7l],y7l)--
+ else:{z6'l-.5[z5,z5l]}...{z6r-z6l} fi
+ z7l..(rt x7l,top y7l)--(rt x7r,bot y7r)..z7r
+ if is_egyptian: --(.5[x6r,x7r],y7r){z6l-z6r}...z6'r---
+ else: {z6l-z6r}...{.5[z5,z5l]-z6'l} fi
+ z5r--cycle; % lower diagonal
+ numeric up_inner_jut;
+ if rt x1r+cap_jut+.5u+1<=lft x3l-1.2cap_jut: up_inner_jut=1.2cap_jut;
+ else: rt x1r+cap_jut+.5u+1=lft x3l-up_inner_jut; fi
+ dish_serif(3,4,e,2/3,up_inner_jut,f,1/2,right_jut)(dark); % upper diagonal serif
+else: fill z5'l--diag_end(5'l,6'l,.5,1,6'r,5'r)--z5'r--cycle; fi% lower diagonal
+%%%
+% mirror
+pickup tiny.nib;
+forsuffixes $ = 3l,3,3r,3'l,3'r,4l,4,4r,5l,5,5r,6l,6,6r,6'l,6'r,7l,7r:
+ x.m$=l+(r-x$); y.m$=y$; endfor;
+fill z.m4r--diag_end(.m4r,.m3'r,1,.5,.m3'l,.m4l)--z.m4l--cycle; % upper diagonal
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ fill z.m5l
+ if is_egyptian: ---z.m6'l...{z.m6r-z.m6l}(.35[x.m6l,x.m7l],y.m7l)--
+ else:{z.m6'l-.5[z.m5,z.m5l]}...{z.m6r-z.m6l} fi
+ z.m7l..(lft x.m7l,top y.m7l)--(lft x.m7r,bot y.m7r)..z.m7r
+ if is_egyptian: --(.5[x.m6r,x.m7r],y.m7r){z.m6l-z.m6r}...z.m6'r---
+ else: {z.m6l-z.m6r}...{.5[z.m5,z.m5l]-z.m6'l} fi
+ z.m5r--cycle; % lower diagonal
+ z8l=z.m3r; z8r=z.m3l; z9l=z.m4r; z9r=z.m4l; z8=.5[z8l,z8r]; z9=.5[z9l,z9r];
+ dish_serif(8,9,g,1/2,right_jut,h,2/3,up_inner_jut)(dark); % upper diagonal serif
+else: fill z.m5'l--diag_end(.m5'l,.m6'l,.5,1,.m6'r,.m5'r)--z.m5'r--cycle; % lower diagonal
+fi
+%%%%%
+% the accent
+h:=full_h; uppercase_umlaut((x1-.5w),0, 17,18,19,20);
+penlabels(1,2,3,4,5,6,7); endchar;
+
+lhchar "Uppercase Russian letter YA acute (`concrete' form)";
+cyrchar_twice(YA_ac,if serifs:13.5u# else:12.5u#-.5width_adj# fi %N_width; upss R
+ ,cap_height#,0);
+if is_small_cap: getcharcode(ya_ac); fi
+italcorr cap_height#*slant-cap_serif_fit#+cap_jut#-2.5u#+min(.5cap_stem#,u#);
+adjust_fit(if serifs: cap_serif_fit# else:0 fi,cap_serif_fit#);
+% upperc_ya;
+pickup tiny.nib; pos1(cap_stem',0); pos2(cap_stem',0);
+rt x1r=rt x2r=w-hround max(2u,3u-.5cap_stem'); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+penpos3(cap_band,90); penpos4(cap_band,90);
+penpos5(cap_curve if hefty:-3stem_corr fi,180);
+numeric middle_weight; middle_weight=.5[vair,cap_band];
+penpos6(middle_weight,-90); penpos7(middle_weight,-90);
+z3r=top z1; y4=y3; y5=.52[y6l,y4l]; y6=y7;
+x7=x2; y7l=vround(.5h+.5vair); x4=x6;
+if serifs: x4=.5w+.5u; x5r=hround (2u);
+ else: x4=.5w-.5u; x5r=hround u; fi
+x4l:=x6l:=x4+.125cap_curve;
+fill stroke z7e..pulled_arc.e(6,5) & pulled_arc.e(5,4)..z3e; % lobe
+pickup tiny.nib; numeric stem[],alpha,right_jut;
+right_jut=if serifs:.8cap_jut else:.4tiny fi;
+if serifs: bot y9=bot y2; else: y9=0; fi
+lft x9l=hround(if serifs:l+letter_fit+.75u+right_jut else:.5u fi); y8=y6;
+stem1=max(tiny.breadth,fudged.cap_stem-3stem_corr);
+alpha=diag_ratio(1,.5(stem1-tiny),y1-y9,x9l-x1);
+penpos9(alpha*(stem1-tiny),0);
+if serifs: numeric theta; theta=angle(y1-y9,x9l-x1);
+ y9'r=max(hair,.5stem); z9'l=z9'r+whatever*dir theta;
+ else: y9'l=y9'r=0; fi
+z9'r=z9r+penoffset z1-z9 of currentpen+whatever*(z1-z9);
+z9'l=z9l+penoffset z9-z1 of currentpen+whatever*(z1-z9);
+if serifs: z8r=z9'r+whatever*(z1r-z9); else: x8=x6+.5u; fi
+penpos8(if serifs: alpha*stem1 else: cap_stem fi-2stem_corr,0);
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ lft x10=tiny.lft x9l-right_jut;
+ if is_egyptian: y10r=0; penpos10(slab,-90); else: y10=-o;
+ penpos10(max(fine.breadth+eps,hair-fine),-90); fi
+ fill z8l
+ if is_egyptian: ---z9'l...{z9l-z9r}(.35[x9l,x10l],y10l)--
+ else: {.5[z9l,z9]-z8l}...{z8l-z8r} fi
+ z10l..(lft x10l,bot y10l)--(lft x10r,top y10r)..z10r
+ if is_egyptian: --(.35[x9r,x10r],y10r){z9r-z9l}...z9'r---
+ else: {z8r-z8l}...{z8l-.5[z9l,z9]} fi
+ z8r--cycle; % lower diagonal
+else: fill z8l--diag_end(8l,9'l,1,.5,9'r,8r)--z8r--cycle; fi % diagonal
+if serifs:
+nodish_serif(1,2,a,1/3,.5cap_jut,b,1/3,cap_jut); % upper serif
+dish_serif(2,1,c,1/3,cap_jut,d,1/3,cap_jut); fi % lower serif
+%%%%%
+% the accent
+put_accent(cyrcaph); repeat_once;
+penlabels(0,1,2,3,4,5,6,7,8,9,9',10); endchar;
+
+lhchar "Uppercase Russian letter YA bar (`concrete' form)";
+cyrchar(YA_bar,if serifs:13.5u# else:12.5u#-.5width_adj# fi %N_width; upss R
+ ,cap_height#+acc_height#,0);
+if is_small_cap: getcharcode(ya_bar); fi
+italcorr cap_height#*slant-cap_serif_fit#+cap_jut#-2.5u#+min(.5cap_stem#,u#);
+adjust_fit(if serifs: cap_serif_fit# else:0 fi,cap_serif_fit#);
+full_h:=h; h:=cap_height;
+% upperc_ya;
+pickup tiny.nib; pos1(cap_stem',0); pos2(cap_stem',0);
+rt x1r=rt x2r=w-hround max(2u,3u-.5cap_stem'); top y1=h; bot y2=0;
+filldraw stroke z1e--z2e; % stem
+penpos3(cap_band,90); penpos4(cap_band,90);
+penpos5(cap_curve if hefty:-3stem_corr fi,180);
+numeric middle_weight; middle_weight=.5[vair,cap_band];
+penpos6(middle_weight,-90); penpos7(middle_weight,-90);
+z3r=top z1; y4=y3; y5=.52[y6l,y4l]; y6=y7;
+x7=x2; y7l=vround(.5h+.5vair); x4=x6;
+if serifs: x4=.5w+.5u; x5r=hround (2u);
+ else: x4=.5w-.5u; x5r=hround u; fi
+x4l:=x6l:=x4+.125cap_curve;
+fill stroke z7e..pulled_arc.e(6,5) & pulled_arc.e(5,4)..z3e; % lobe
+pickup tiny.nib; numeric stem[],alpha,right_jut;
+right_jut=if serifs:.8cap_jut else:.4tiny fi;
+if serifs: bot y9=bot y2; else: y9=0; fi
+lft x9l=hround(if serifs:l+letter_fit+.75u+right_jut else:.5u fi); y8=y6;
+stem1=max(tiny.breadth,fudged.cap_stem-3stem_corr);
+alpha=diag_ratio(1,.5(stem1-tiny),y1-y9,x9l-x1);
+penpos9(alpha*(stem1-tiny),0);
+if serifs: numeric theta; theta=angle(y1-y9,x9l-x1);
+ y9'r=max(hair,.5stem); z9'l=z9'r+whatever*dir theta;
+ else: y9'l=y9'r=0; fi
+z9'r=z9r+penoffset z1-z9 of currentpen+whatever*(z1-z9);
+z9'l=z9l+penoffset z9-z1 of currentpen+whatever*(z1-z9);
+if serifs: z8r=z9'r+whatever*(z1r-z9); else: x8=x6+.5u; fi
+penpos8(if serifs: alpha*stem1 else: cap_stem fi-2stem_corr,0);
+if serifs: pickup if is_egyptian: crisp else: fine fi nib;
+ lft x10=tiny.lft x9l-right_jut;
+ if is_egyptian: y10r=0; penpos10(slab,-90); else: y10=-o;
+ penpos10(max(fine.breadth+eps,hair-fine),-90); fi
+ fill z8l
+ if is_egyptian: ---z9'l...{z9l-z9r}(.35[x9l,x10l],y10l)--
+ else: {.5[z9l,z9]-z8l}...{z8l-z8r} fi
+ z10l..(lft x10l,bot y10l)--(lft x10r,top y10r)..z10r
+ if is_egyptian: --(.35[x9r,x10r],y10r){z9r-z9l}...z9'r---
+ else: {z8r-z8l}...{z8l-.5[z9l,z9]} fi
+ z8r--cycle; % lower diagonal
+else: fill z8l--diag_end(8l,9'l,1,.5,9'r,8r)--z8r--cycle; fi % diagonal
+if serifs:
+nodish_serif(1,2,a,1/3,.5cap_jut,b,1/3,cap_jut); % upper serif
+dish_serif(2,1,c,1/3,cap_jut,d,1/3,cap_jut); fi % lower serif
+%%%%%
+% the accent
+h:=full_h;
+% up_bar(.5[x1,x6-.5cap_curve],0, 11,12);
+x_move:=.5[x1,x6-.5cap_curve]; y_move:=0; _one:=11; _two:=12;
+numeric macron_breadth; macron_breadth:=Vround .2[vair,stem];
+pickup if serifs: crisp.nib else: fine.nib fi;
+pos[_one](macron_breadth,90); pos[_two](macron_breadth,90);
+x[_one]=x_move+hround(2.75u if monospace:/expansion_factor fi+.5vair);
+top y[_one]r=top y[_two]r=vround(cap_height+dot_height#*hppp);
+x[_two]=x_move-hround(2.75u if monospace:/expansion_factor fi+.5vair);
+filldraw stroke z[_one]e--z[_two]e; % bar
+penlabels(0,1,2,3,4,5,6,7,8,9,9',10); endchar;
+
+lhchar "Uppercase Russian letter L lower dot(`concrete' form)";
+cyrchar(L_ldot,13.5u#,cap_height#,desc_depth#); %N_width#
+if is_small_cap: getcharcode(l_ldot); fi
+adjust_fit(if serifs: .8(flare#+(cap_stem#-stem#))-.5u#
+ else: cap_serif_fit# fi,
+ cap_serif_fit#); %
+% upper_spec_l;
+numeric bulb_diam; bulb_diam=flare+(cap_stem-stem);
+numeric left_stem,right_stem,outer_jut,alpha;
+right_stem=cap_stem-stem_corr;
+left_stem=min(cap_hair if hefty:-3stem_corr fi,right_stem);
+outer_jut=.8cap_jut; x1l=w-x4r=outer_jut+if serifs:.5 fi u; y1=y4=0; x2-x1=x4-x3;
+if serifs: x3l=x2r+((x1r-x4l)*(slab/(h-slab))) %+2apex_corr;
+ if not is_egyptian:-.25left_stem fi;
+else: x3r= x2r+apex_corr; fi
+y2=y3=h if not serifs:+apex_o+apex_oo fi;
+alpha=diag_ratio(2,left_stem,y2-y1,x4r-x1l-apex_corr);
+penpos1(alpha*left_stem,0); penpos2(alpha*left_stem,0);
+penpos3(alpha*right_stem,0); penpos4(alpha*right_stem,0);
+if serifs:
+ fill stroke z3e--z4e; % right stem
+ pickup tiny.nib;
+ penpos5(left_stem,-90); pos5'(left_stem,-90); z5'=z5;
+ pos8(cap_hair,-180); pos9(bulb_diam,-180);
+ y9=if is_egyptian: 0.12h else: 1/6h-max(0,flare-stem-2vair_corr-.5) fi;
+ lft x9r=l+letter_fit+hround(.5u-.5);
+ y5r=-o; x5=max(lft x9r+.5bulb_diam,.5[x9r,x1r]);
+ y6l=y9+bulb_diam-hair;
+ numeric t; t=1-slant;
+ z7r=(max(.75[x1,x1r],x9+if is_egyptian: (if is_small_cap: 2.25 else: 2.667 fi
+ +max(-2slant,.5slant))*hair
+ else: if is_bold:.75 fi bulb_diam+1.35hair fi),
+ y7l-t*7/8left_stem);
+ z7l=(x7r-2/3(x1r-x1l),if is_egyptian: .35[y5l,y5] else: y5 fi);%y5l);
+ z6r=(x7r,y1)+whatever*((x1r,y1)-z2r); y6r-y6l=t*(y5r-y5l);
+ x6r-x6l=1/2(x1r-x1l);
+ fill stroke z2e{z1e-z6e}.. controls z6e and z7e ..z5e;
+ {{less_tense; cyrbulb(5',8,9)}}; % arc and bulb
+ numeric inner_jut,left_jut,fit; pickup tiny.nib;
+ x10r=x3r; top y10=h; pos10(alpha*right_stem,0); x4:=x4r;
+ left_jut=cap_jut+left_stem;
+ serif(10,4,c,0,-left_jut); % upper serif
+ pickup tiny.nib;
+ prime_points_inside(1,2); prime_points_inside(4,3);
+ if rt x1'r+cap_jut+.5u+1<=lft x4'l-cap_jut: inner_jut=cap_jut;
+ else: rt x1'r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
+ dish_serif(4',3,d,1/2,inner_jut,e,1/3,outer_jut); % right serif
+else: z0=whatever[z1r,z2r]=whatever[z3l,z4l];
+ if y0<h-cap_notch_cut: y0:=h-cap_notch_cut;
+ fill z0+.5right{down}...{z4-z3}diag_end(3l,4l,1,1,4r,3r)
+ --diag_end(4r,3r,1,1,2l,1l)--diag_end(2l,1l,1,1,1r,2r){z2-z1}
+ ...{up}z0+.5left--cycle; % left and right diagonals
+ else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
+ --diag_end(2l,1l,1,1,1r,0)--cycle; fi fi % left and right diagonals
+%%%%%
+% upper_dot;
+_one:=17; _two:=18; _center:=.5w;
+%
+numeric dot_diam#; dot_diam#=max(dot_size#,cap_curve#);
+define_whole_blacker_pixels(dot_diam);
+pos[_one](dot_diam,0); pos[_two](dot_diam,90);
+x[_one]=hround(_center); bot y[_two]l=vround(-d-1);
+if 0-o-top y[_two]r<slab: y[_two]r:=vround(max(y[_two]l+eps,-fine-slab)); fi
+x[_one]=x[_two]; y[_one]=vround(.5[y[_two]l,y[_two]r]);
+dot([_one],[_two]); % dot
+penlabels(0,2,6,3,4,5,7,8,9,10); endchar;
+
+endgroup;
+
+endinput;
+%end of file
diff --git a/Master/texmf-dist/fonts/source/lh/specific/lgrucl.mf b/Master/texmf-dist/fonts/source/lh/specific/lgrucl.mf
index 6c9599f3c37..a3b93d7b778 100644
--- a/Master/texmf-dist/fonts/source/lh/specific/lgrucl.mf
+++ b/Master/texmf-dist/fonts/source/lh/specific/lgrucl.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -27,7 +27,7 @@
% ya
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
begingroup
@@ -58,7 +58,7 @@ penpos1(alpha*left_stem,0); penpos2(alpha*left_stem,0);
penpos3(alpha*right_stem,0); penpos4(alpha*right_stem,0);
if serifs: numeric left_jut; left_jut=jut+left_stem;
pickup tiny.nib; x5r=x3r; top y5=h;
- pos5(alpha*right_stem,0);
+ pos5(max(currentbreadth+eps,alpha*right_stem),0);
fill stroke if is_egyptian: z1e--z2e
else: z1e{(x2+2(stem-hair),y2)-z1}...{z2-(x1+.5(stem-hair),y1)}z2e fi;
fill stroke z3e--z4e; x4:=x4r;
@@ -233,10 +233,11 @@ adjust_fit(if serifs:
.25(7/8[hair#,flare#])-.25u# if is_egyptian:+.5hair# fi
%fi
else: serif_fit# fi,serif_fit#);
+%lower_spec_l;
numeric bulb_diam; bulb_diam=hround 7/8[hair,flare];
numeric left_stem,right_stem,outer_jut,alpha;
right_stem=stem-stem_corr;
-left_stem=min(hair if hefty:-3stem_corr fi,right_stem);
+left_stem=max(tiny.breadth+eps,min(hair if hefty:-3stem_corr fi,right_stem));
outer_jut=.75jut; x4r=r-letter_fit-outer_jut- if serifs:.25 else:.5 fi u;
x1l-.5u-.065jut=w-x4r; y1=y4=0; x2-x1=x4-x3;
if serifs: x3l=x2r+((x1r-x4l)*(vair/(h-vair)))if not is_egyptian:-.25left_stem fi;
@@ -263,7 +264,7 @@ if serifs:
numeric inner_jut,left_jut,fit;
pickup tiny.nib; left_jut=jut+left_stem;
prime_points_inside(4,3);
- x10r=x3r; top y10=h; pos10(alpha*right_stem,0); x4:=x4r;
+ x10r=x3r; top y10=h; pos10(max(currentbreadth+eps,alpha*right_stem),0); x4:=x4r;
if rt x1r+jut+.5u+1<=lft x4'l-jut: inner_jut=jut;
else: rt x1r+inner_jut+.5u+1=lft x4'l-inner_jut; fi
save slab; slab:=Vround(vair-vair_corr);
@@ -277,6 +278,7 @@ else: z0=whatever[z1r,z2r]=whatever[z3l,z4l];
...{up}z0+.5left--cycle; % left and right diagonals
else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
--diag_end(2l,1l,1,1,1r,0)--cycle; fi fi % left and right diagonals
+%%%%%
penlabels(0,1,2,6,3,4,5,7,8,9,10); endchar;
lhchar "Lowercase Russian letter ya (`concrete' form) (looks like backward R)";
diff --git a/Master/texmf-dist/fonts/source/lh/specific/lgrucu.mf b/Master/texmf-dist/fonts/source/lh/specific/lgrucu.mf
index f287285a838..f5abb52b964 100644
--- a/Master/texmf-dist/fonts/source/lh/specific/lgrucu.mf
+++ b/Master/texmf-dist/fonts/source/lh/specific/lgrucu.mf
@@ -4,13 +4,13 @@
%% Cyrillic font container with T2 encoding beta-support
%
% This file is future part of lxfonts package
-% Version 3.4 // Patchlevel=0
+% Version 3.5 // Patchlevel=1
% (c) O.Lapko
%
-% This package belongs to the public domain under conditions similar to
+% This package is freeware product under conditions similar to
% those of D. E. Knuth specified for the Computer Modern family of fonts.
% In particular, only the authors are entitled to modify this file
-% and to save it under the same name.
+% (and all this package as well) and to save it under the same name.
%
% Content:
%
@@ -27,7 +27,7 @@
% YA
%
-LHver_check(3,4); % like |version_check| in ec
+LHver_check(3,5); % like |version_check| in ec
begingroup
@@ -61,7 +61,7 @@ z0=whatever[z1r,z2r]=whatever[z3l,z4l];
if serifs:
numeric left_jut; left_jut=cap_jut+left_stem;
pickup tiny.nib; x35r=x3r; top y35=h;
- pos35(alpha*right_stem,0);
+ pos35(max(currentbreadth+eps,alpha*right_stem),0);
fill stroke if is_egyptian: z1e--z2e
else: z1e{(x2+2stem,y2)-z1}...{z2-(x1+.5stem,y1)}z2e fi;
fill stroke z3e--z4e; x4:=x4r;
@@ -222,10 +222,11 @@ if is_small_cap: getcharcode(l); fi
adjust_fit(if serifs: .8(flare#+(cap_stem#-stem#))-.5u#
else: cap_serif_fit# fi,
cap_serif_fit#); %
+% upper_spec_l;
numeric bulb_diam; bulb_diam=flare+(cap_stem-stem);
numeric left_stem,right_stem,outer_jut,alpha;
right_stem=cap_stem-stem_corr;
-left_stem=min(cap_hair if hefty:-3stem_corr fi,right_stem);
+left_stem=max(tiny.breadth+eps,min(cap_hair if hefty:-3stem_corr fi,right_stem));
outer_jut=.8cap_jut; x1l=w-x4r=outer_jut+if serifs:.5 fi u; y1=y4=0; x2-x1=x4-x3;
if serifs: x3l=x2r+((x1r-x4l)*(slab/(h-slab))) %+2apex_corr;
if not is_egyptian:-.25left_stem fi;
@@ -254,7 +255,7 @@ if serifs:
fill stroke z2e{z1e-z6e}.. controls z6e and z7e ..z5e;
{{less_tense; cyrbulb(5',8,9)}}; % arc and bulb
numeric inner_jut,left_jut,fit; pickup tiny.nib;
- x10r=x3r; top y10=h; pos10(alpha*right_stem,0); x4:=x4r;
+ x10r=x3r; top y10=h; pos10(max(currentbreadth+eps,alpha*right_stem),0); x4:=x4r;
left_jut=cap_jut+left_stem;
serif(10,4,c,0,-left_jut); % upper serif
pickup tiny.nib;
@@ -269,6 +270,7 @@ else: z0=whatever[z1r,z2r]=whatever[z3l,z4l];
...{up}z0+.5left--cycle; % left and right diagonals
else: fill z0--diag_end(0,4l,1,1,4r,3r)--diag_end(4r,3r,1,1,2l,1l)
--diag_end(2l,1l,1,1,1r,0)--cycle; fi fi % left and right diagonals
+%%%%%
penlabels(0,2,6,3,4,5,7,8,9,10); endchar;
lhchar "Uppercase Russian letter YA (`concrete' form)";