* Add characters:

- LATIN CAPITAL LETTER L WITH DOUBLE BAR (`U+2C60`) (#1659).
  - LATIN SMALL LETTER L WITH DOUBLE BAR (`U+2C61`) (#1659).
This commit is contained in:
be5invis 2023-04-15 16:59:50 -07:00
parent 2bd37706c9
commit 16c1fc231d
5 changed files with 20 additions and 3 deletions

View file

@ -1,3 +1,5 @@
* Add characters: * Add characters:
- SCRIPT CAPITAL P (`U+2118`) (#1668). - SCRIPT CAPITAL P (`U+2118`) (#1668).
- LATIN CAPITAL LETTER L WITH DOUBLE BAR (`U+2C60`) (#1659).
- LATIN SMALL LETTER L WITH DOUBLE BAR (`U+2C61`) (#1659).
* Fix shape of LATIN CAPITAL LETTER SMALL CAPITAL I (`U+A7AE`). * Fix shape of LATIN CAPITAL LETTER SMALL CAPITAL I (`U+A7AE`).

View file

@ -104,10 +104,16 @@ glyph-block Letter-Latin-Upper-L : begin
create-glyph 'LBarOverlay' create-glyph 'LBarOverlay'
LetterBarOverlay.l.in [LBarLeftX : DivFrame 1] 0 CAP LetterBarOverlay.l.in [LBarLeftX : DivFrame 1] 0 CAP
create-glyph 'LDoubleBarOverlay' : composite-proc
LetterBarOverlay.l.in [LBarLeftX : DivFrame 1] 0 CAP (py -- 0.6)
LetterBarOverlay.l.in [LBarLeftX : DivFrame 1] 0 CAP (py -- 0.4)
create-glyph 'LBeltOverlay' create-glyph 'LBeltOverlay'
BeltOverlay CAP ([LBarLeftX : DivFrame 1] + 0.5 * HVContrast * Stroke) BeltOverlay CAP ([LBarLeftX : DivFrame 1] + 0.5 * HVContrast * Stroke)
create-glyph 'smcpLBeltOverlay' create-glyph 'smcpLBeltOverlay'
BeltOverlay XH ([LBarLeftX : DivFrame 1] + 0.5 * HVContrast * Stroke) BeltOverlay XH ([LBarLeftX : DivFrame 1] + 0.5 * HVContrast * Stroke)
derive-composites 'LBar' 0x23D 'L' 'LBarOverlay' derive-composites 'LBar' 0x23D 'L' 'LBarOverlay'
derive-composites 'LDoubleBar' 0x2C60 'L' 'LDoubleBarOverlay'
derive-composites 'LBelt' 0xA7AD 'L' 'LBeltOverlay' derive-composites 'LBelt' 0xA7AD 'L' 'LBeltOverlay'
derive-composites 'smcpLBelt' 0x1DF04 'smcpL' 'smcpLBeltOverlay' derive-composites 'smcpLBelt' 0x1DF04 'smcpL' 'smcpLBeltOverlay'

View file

@ -855,12 +855,13 @@ glyph-block Letter-Shared-Shapes : begin
local xLeftEdge : x - pXInSw * refSw * HVContrast local xLeftEdge : x - pXInSw * refSw * HVContrast
local xRightEdge : x + (1 - pXInSw) * refSw * HVContrast local xRightEdge : x + (1 - pXInSw) * refSw * HVContrast
local p : (xLeftEdge - xLeftSpace) / ((xRightSpace - xRightEdge) + (xLeftEdge - xLeftSpace)) local p : (xLeftEdge - xLeftSpace) / ((xRightSpace - xRightEdge) + (xLeftEdge - xLeftSpace))
local xC : mix xLeftEdge xRightEdge (1 - p) local xC : mix xLeftEdge xRightEdge [mix 0.5 (1 - p) 0.5]
local jut : 0.75 * LongJut
return : HOverlayBar return : HOverlayBar
Math.min (xLeftEdge - SideJut) Math.min (xLeftEdge - SideJut)
Math.max (xC - 0.75 * LongJut) [mix xLeftSpace xLeftEdge 0.3] Math.max (xC - jut) [mix xLeftSpace xLeftEdge 0.3]
Math.max (xRightEdge + SideJut) Math.max (xRightEdge + SideJut)
Math.min [mix xRightSpace xRightEdge 0.3] (xC + 0.75 * LongJut) Math.min [mix xRightSpace xRightEdge 0.3] (xC + jut)
begin y begin y
begin sw begin sw

View file

@ -74,6 +74,13 @@ glyph-block Mark-Overlay : begin
set-mark-anchor 'overlay' markMiddle (XH / 2) markMiddle (XH / 2) set-mark-anchor 'overlay' markMiddle (XH / 2) markMiddle (XH / 2)
include : HOverlayBar (markMiddle - LongJut * 0.75) (markMiddle + LongJut * 0.75) (XH / 2) include : HOverlayBar (markMiddle - LongJut * 0.75) (markMiddle + LongJut * 0.75) (XH / 2)
create-glyph 'dblBarOver' : glyph-proc
set-width 0
set-mark-anchor 'overlay' markMiddle (XH / 2) markMiddle (XH / 2)
local gap : 0.2 * CAP
include : HOverlayBar (markMiddle - LongJut * 0.75) (markMiddle + LongJut * 0.75) (XH / 2 + 0.5 * gap)
include : HOverlayBar (markMiddle - LongJut * 0.75) (markMiddle + LongJut * 0.75) (XH / 2 - 0.5 * gap)
create-glyph 'longBarOver' 0xE001 : glyph-proc create-glyph 'longBarOver' 0xE001 : glyph-proc
set-width 0 set-width 0
set-mark-anchor 'overlay' markMiddle (XH / 2) markMiddle (XH / 2) set-mark-anchor 'overlay' markMiddle (XH / 2) markMiddle (XH / 2)

View file

@ -140,6 +140,7 @@ export : define decompOverrides : object
0x1EE2 { 'OHorn' 'dotBelow' } 0x1EE2 { 'OHorn' 'dotBelow' }
0x1EE3 { 'oHorn' 'dotBelow' } 0x1EE3 { 'oHorn' 'dotBelow' }
0x2c61 { 'l' 'dblBarOver' }
0x2c65 { 'a' 'slashOver' } 0x2c65 { 'a' 'slashOver' }
0x2c66 { 't' 'longSlashOver' } 0x2c66 { 't' 'longSlashOver' }