Refine shape of Latin Upper AU under monospace.

This commit is contained in:
John McWilliams 2025-03-16 09:59:08 -04:00
parent e65ae799b6
commit 28282c56b8
3 changed files with 16 additions and 11 deletions

2
changes/33.1.1.md Normal file
View file

@ -0,0 +1,2 @@
* Refine shape of the following characters:
- LATIN CAPITAL LETTER AU (`U+A736`).

View file

@ -107,11 +107,14 @@ glyph-block Letter-Latin-Upper-AA-AO : begin
include : difference [refer-glyph right] [refer-glyph leftMask]
do "U subglyphs"
glyph-block-import Letter-Latin-U : CapitalUConfig
foreach { suffix { Base {Slabs fLTSlab} } } [Object.entries CapitalUConfig] : do
glyph-block-import Letter-Latin-U : UShapeGroup CapitalUConfigT
define df : DivFrame para.advanceScaleMM 3.5
define { subDf shift } : SubDfAndShift 1 df
define sg : UShapeGroup subDf.archDepthA subDf.archDepthB
foreach { suffix { Base {Slabs fLTSlab} } } [Object.entries : CapitalUConfigT sg] : do
create-glyph "AU/Right.\(suffix)" : glyph-proc
define df : DivFrame para.advanceScaleMM 3.5
local { subDf shift } : SubDfAndShift 1 df
include : with-transform [ApparentTranslate shift 0]
union [Base subDf CAP df.mvs] [Slabs subDf CAP df.mvs]

View file

@ -149,13 +149,13 @@ glyph-block Letter-Latin-U : begin
local sf : SerifFrame.fromDf df top 0 (swSerif -- _sw)
return : composite-proc sf.lt.full sf.rt.full
glyph-block-export CapitalUConfig
define CapitalUConfig : SuffixCfg.weave
glyph-block-export CapitalUConfigT
define [CapitalUConfigT shapeGroup] : SuffixCfg.weave
object # body
toothed UUpper.Toothed
tailed UUpper.Tailed
toothlessCorner UUpper.ToothlessCorner
toothlessRounded UUpper.ToothlessRounded
toothed shapeGroup.Toothed
tailed shapeGroup.Tailed
toothlessCorner shapeGroup.ToothlessCorner
toothlessRounded shapeGroup.ToothlessRounded
function [body] : object # serifs
serifless { no-shape false }
bottomRightSerifed { USerifs.BottomRight false }
@ -168,7 +168,7 @@ glyph-block Letter-Latin-U : begin
[Just 'tailed'] { USerifs.Tailed true }
__ { USerifs.Toothless true }
foreach { suffix { Base {Slabs fLTSlab} } } [Object.entries CapitalUConfig] : do
foreach { suffix { Base {Slabs fLTSlab} } } [Object.entries : CapitalUConfigT UUpper] : do
create-glyph "U.\(suffix)" : glyph-proc
local df : DivFrame 1
include : MarkSet.capital