Some cosmetic enhancements/optimizations for Upper and Lower Greek Digamma. (#2078)

* Upper/Lower Greek Digamma improvements.

* typo

* tweak
This commit is contained in:
John McWilliams 2023-11-08 14:28:57 -05:00 committed by GitHub
parent e38bef7315
commit 00fe6370df
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
2 changed files with 17 additions and 13 deletions

View file

@ -41,13 +41,13 @@ glyph-block Letter-Greek-Upper-Gamma: begin
include : tagged 'serifRT' : VSerif.dr (RightSB - OX) top VJut
define GammaConfig : object
serifless { SLAB-NONE false }
topLeftSerifed { SLAB-LT false }
topRightSerifed { SLAB-TR false }
bottomSerifed { SLAB-BOTTOM false }
serifed { SLAB-ALL true }
serifless { SLAB-NONE SLAB }
topLeftSerifed { SLAB-LT SLAB }
topRightSerifed { SLAB-TR true }
bottomSerifed { SLAB-BOTTOM SLAB }
serifed { SLAB-ALL true }
foreach { suffix { slabType doSB } } [Object.entries GammaConfig] : do
foreach { suffix { slabType doSM } } [Object.entries GammaConfig] : do
create-glyph "grek/Gamma.\(suffix)" : glyph-proc
include : MarkSet.capital
include : GammaShape CAP slabType
@ -57,9 +57,9 @@ glyph-block Letter-Greek-Upper-Gamma: begin
include : GammaShape CAP slabType
local yBar : CAP * DesignParameters.upperEBarPos
include : HBar.m GammaBarLeft (RightSB - [xMidBarShrink slabType]) yBar
if slabType : include : tagged 'serifRM'
VSerif.dr (RightSB - [xMidBarShrink slabType]) (yBar + HalfStroke) [mix Stroke VJut 0.5]
include : HBar.m GammaBarLeft (RightSB - [xMidBarShrink doSM]) yBar
if doSM : include : tagged 'serifRM'
VSerif.dr (RightSB - [xMidBarShrink doSM]) (yBar + HalfStroke) [mix Stroke VJut 0.5]
create-glyph "cyrl/GheDescender.\(suffix)" : glyph-proc
include [refer-glyph "grek/Gamma.\(suffix)"] AS_BASE ALSO_METRICS
@ -163,9 +163,11 @@ glyph-block Letter-Greek-Upper-Gamma: begin
include : BBBarLeft GammaBarLeft 0 CAP
include : HBar.t GammaBarLeft RightSB CAP BBS
create-glyph 'digamma' 0x3DD : glyph-proc
create-glyph 'grek/digamma' 0x3DD : glyph-proc
include : MarkSet.p
include : GammaShape (XH - Descender) SLAB-NONE
include : ApparentTranslate 0 Descender
local yBar : mix Descender XH DesignParameters.upperEBarPos
include : GammaShape XH SLAB-NONE
include : PalatalHook.lExt GammaBarLeft 0
local yBar : mix 0 XH DesignParameters.upperEBarPos
include : HBar.m GammaBarLeft (RightSB - [xMidBarShrink SLAB]) yBar
if SLAB : include : tagged 'serifRM'
VSerif.dr (RightSB - [xMidBarShrink SLAB]) (yBar + HalfStroke) [mix Stroke VJut 0.5]