Add Greek Lunate Epsilon Symbol (U+03F5) and Greek Reversed Lunate Epsilon Symbol (U+03F6).

This commit is contained in:
be5invis 2021-06-13 00:09:19 -07:00
parent 6645389330
commit 830e7192d2
3 changed files with 37 additions and 1 deletions

View file

@ -1,5 +1,5 @@
* Add single-spacing TTC and Super TTC (#1112).
* Add Greek Kappa Symbol (`U+03F0`) and Greek Rho Symbol (`U+03F1`).
* Add Greek Kappa Symbol (`U+03F0`), Greek Rho Symbol (`U+03F1`), Greek Lunate Epsilon Symbol (`U+03F5`) and Greek Reversed Lunate Epsilon Symbol (`U+03F6`).
* Add Hryvnia sign (`U+20B4`) (#1117).
* Fix placement of diacritics over uppercase Greek (#1115).
* Adjust metrics of punctuations in Aile and Etoile (#1115).

View file

@ -14,6 +14,7 @@ export : define [apply] : begin
run-glyph-module './greek/lower-alpha.js'
run-glyph-module './greek/lower-delta.js'
run-glyph-module './greek/lower-epsilon.js'
run-glyph-module './greek/lower-lunate-epsilon.js'
run-glyph-module './greek/lower-gamma.js'
run-glyph-module './greek/lower-zeta.js'
run-glyph-module './greek/lower-theta.js'

View file

@ -0,0 +1,35 @@
$$include '../../../meta/macros.ptl'
import [mix barmixL linreg clamp fallback] from '../../../support/utils'
import [DesignParameters] from '../../../meta/aesthetics'
glyph-module
glyph-block Letter-Greek-Lower-Rho : begin
glyph-block-import CommonShapes
glyph-block-import Common-Derivatives
create-glyph 'grek/lowerLunateEpsilon' 0x3F5 : glyph-proc
include : MarkSet.e
include : dispiro [widths.lhs]
flat RightSB XH [heading Leftward]
curl [mix SB RightSB 0.625] XH [heading Leftward]
archv
g4 (SB + O) [YSmoothMidL XH 0 SmallSmoothA SmallSmoothB]
arcvh
flat [mix SB RightSB 0.625] 0 [heading Rightward]
curl RightSB 0 [heading Rightward]
include : HBar (SB + HalfStroke * HVContrast) ([mix SB RightSB 0.75] + 0.25 * Stroke) (XH / 2) [AdviceStroke2 2 3 XH]
create-glyph 'grek/lowerLunateEpsilonRev' 0x3F6 : glyph-proc
include : MarkSet.e
include : dispiro [widths.rhs]
flat SB XH [heading Rightward]
curl [mix RightSB SB 0.625] XH [heading Rightward]
archv
g4 (RightSB - O) [YSmoothMidR XH 0 SmallSmoothA SmallSmoothB]
arcvh
flat [mix RightSB SB 0.625] 0 [heading Leftward]
curl SB 0 [heading Leftward]
include : HBar ([mix RightSB SB 0.75] - 0.25 * Stroke) (RightSB - HalfStroke * HVContrast) (XH / 2) [AdviceStroke2 2 3 XH]