mikeslab/Iosevka
1
0
Fork 0
Code Issues Pull requests Projects Releases 1 Packages Wiki Activity Actions 1

Add {Less|Greater}-Than Above Similar Or Equal. (#2322)

Browse source
This commit is contained in:
John McWilliams 2024-04-30 20:49:37 -04:00 • committed by GitHub
parent bb05080532
commit d0cfca0d0e
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
2 changed files with 61 additions and 55 deletions
Download patch file Download diff file Expand all files Collapse all files

2
changes/30.0.0.md
View file

@ -11,3 +11,5 @@
- BOTTOM RIGHT CROP (`U+230C`) ... TOP LEFT CROP (`U+230F`). - BOTTOM RIGHT CROP (`U+230C`) ... TOP LEFT CROP (`U+230F`).
- KEYBOARD (`U+2328`). - KEYBOARD (`U+2328`).
- COUNTERBORE (`U+2334`). - COUNTERBORE (`U+2334`).
- LESS-THAN ABOVE SIMILAR OR EQUAL (`U+2A8D`).
- GREATER-THAN ABOVE SIMILAR OR EQUAL (`U+2A8E`).

114
packages/font-glyphs/src/symbol/math/relation.ptl
View file

@ -490,12 +490,12 @@ glyph-block Symbol-Math-Relation-Inequality : begin
create-glyph 'normalSubsetUpper' : AsRadical : NormalSubsetShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist) SB RightSB create-glyph 'normalSubsetUpper' : AsRadical : NormalSubsetShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist) SB RightSB
create-glyph 'normalSupersetUpper' : AsRadical : NormalSupersetShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist) SB RightSB create-glyph 'normalSupersetUpper' : AsRadical : NormalSupersetShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist) SB RightSB
derive-composites 'less.narrow' null 'lessEqUpper' [ApparentTranslate 0 (-lessEqDist)] derive-composites 'less.narrow' null 'lessEqUpper' [ApparentTranslate 0 (-lessEqDist)]
derive-composites 'lessEq' 0x2264 'lessEqUpper' 'eqLower' derive-composites 'lessEq' 0x2264 'lessEqUpper' 'eqLower'
derive-composites 'lessEqBarNegated' 0x2A87 'lessEqUpper' 'eqBarNegatedLower' derive-composites 'lessEqBarNegated' 0x2A87 'lessEqUpper' 'eqBarNegatedLower'
derive-composites 'lessSym' 0x2272 'lessEqUpper' 'symLower' derive-composites 'lessSym' 0x2272 'lessEqUpper' 'symLower'
derive-composites 'lessSymBarNegated' 0x22E6 'lessEqUpper' 'symBarNegatedLower' derive-composites 'lessSymBarNegated' 0x22E6 'lessEqUpper' 'symBarNegatedLower'
derive-composites 'lessEqSlant' 0x2A7D 'lessEqUpper' derive-composites 'lessEqSlant' 0x2A7D 'lessEqUpper'
LessShapeHalf 0 (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB OperatorStroke LessShapeHalf 0 (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB OperatorStroke
WithDotVariants 'lessEqSlantDot' 0x2A7F : function [DrawAt kr ov] : composite-proc WithDotVariants 'lessEqSlantDot' 0x2A7F : function [DrawAt kr ov] : composite-proc
@ -503,12 +503,12 @@ glyph-block Symbol-Math-Relation-Inequality : begin
LessShapeHalf 0 (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB [AdviceStroke 4] LessShapeHalf 0 (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB [AdviceStroke 4]
DrawAt (RightSB - DotRadius) (SymbolMid + lessEqDist) (DotRadius * kr * [AdviceStroke 4] / Stroke - ov) DrawAt (RightSB - DotRadius) (SymbolMid + lessEqDist) (DotRadius * kr * [AdviceStroke 4] / Stroke - ov)
derive-composites 'greater.narrow' null 'greaterEqUpper' [ApparentTranslate 0 (-lessEqDist)] derive-composites 'greater.narrow' null 'greaterEqUpper' [ApparentTranslate 0 (-lessEqDist)]
derive-composites 'greaterEq' 0x2265 'greaterEqUpper' 'eqLower' derive-composites 'greaterEq' 0x2265 'greaterEqUpper' 'eqLower'
derive-composites 'greaterEqBarNegated' 0x2A88 'greaterEqUpper' 'eqBarNegatedLower' derive-composites 'greaterEqBarNegated' 0x2A88 'greaterEqUpper' 'eqBarNegatedLower'
derive-composites 'greaterSym' 0x2273 'greaterEqUpper' 'symLower' derive-composites 'greaterSym' 0x2273 'greaterEqUpper' 'symLower'
derive-composites 'greaterSymBarNegated' 0x22E7 'greaterEqUpper' 'symBarNegatedLower' derive-composites 'greaterSymBarNegated' 0x22E7 'greaterEqUpper' 'symBarNegatedLower'
derive-composites 'greaterEqSlant' 0x2A7E 'greaterEqUpper' derive-composites 'greaterEqSlant' 0x2A7E 'greaterEqUpper'
GreaterShapeHalf 0 (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB OperatorStroke GreaterShapeHalf 0 (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB OperatorStroke
WithDotVariants 'greaterEqSlantDot' 0x2A80 : function [DrawAt kr ov] : composite-proc WithDotVariants 'greaterEqSlantDot' 0x2A80 : function [DrawAt kr ov] : composite-proc
@ -516,11 +516,11 @@ glyph-block Symbol-Math-Relation-Inequality : begin
GreaterShapeHalf 0 (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB [AdviceStroke 4] GreaterShapeHalf 0 (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB [AdviceStroke 4]
DrawAt (SB + DotRadius) (SymbolMid + lessEqDist) (DotRadius * kr * [AdviceStroke 4] / Stroke - ov) DrawAt (SB + DotRadius) (SymbolMid + lessEqDist) (DotRadius * kr * [AdviceStroke 4] / Stroke - ov)
derive-composites 'normalSubsetEq' 0x22B4 'normalSubsetUpper' 'eqLower' derive-composites 'normalSubsetEq' 0x22B4 'normalSubsetUpper' 'eqLower'
derive-composites 'normalSupersetEq' 0x22B5 'normalSupersetUpper' 'eqLower' derive-composites 'normalSupersetEq' 0x22B5 'normalSupersetUpper' 'eqLower'
turned 'turnGreaterEq' 0x22DC 'greaterEq' Middle SymbolMid turned 'turnGreaterEq' 0x22DC 'greaterEq' Middle SymbolMid
turned 'turnLessEq' 0x22DD 'lessEq' Middle SymbolMid turned 'turnLessEq' 0x22DD 'lessEq' Middle SymbolMid
do "Ligation Glyphs" do "Ligation Glyphs"
define l : 0.3 * Width define l : 0.3 * Width
@ -550,23 +550,25 @@ glyph-block Symbol-Math-Relation-Inequality : begin
create-glyph 'lessEqEqUpper' : AsRadical : LessShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist * 1.75) SB RightSB lesslessSW create-glyph 'lessEqEqUpper' : AsRadical : LessShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist * 1.75) SB RightSB lesslessSW
create-glyph 'greaterEqEqUpper' : AsRadical : GreaterShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist * 1.75) SB RightSB lesslessSW create-glyph 'greaterEqEqUpper' : AsRadical : GreaterShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist * 1.75) SB RightSB lesslessSW
derive-composites 'lessEqEq' 0x2266 'lessEqEqUpper' 'eqEqLower' derive-composites 'lessEqEq' 0x2266 'lessEqEqUpper' 'eqEqLower'
derive-composites 'lessEqEqBarNegated' 0x2268 'lessEqEqUpper' 'eqEqBarNegatedLower' derive-composites 'greaterEqEq' 0x2267 'greaterEqEqUpper' 'eqEqLower'
derive-composites 'lessSymSym' 0x2A85 'lessEqEqUpper' 'symSymLower' derive-composites 'lessEqEqBarNegated' 0x2268 'lessEqEqUpper' 'eqEqBarNegatedLower'
derive-composites 'lessSymSymBarNegated' 0x2A89 'lessEqEqUpper' 'symSymBarNegatedLower' derive-composites 'greaterEqEqBarNegated' 0x2269 'greaterEqEqUpper' 'eqEqBarNegatedLower'
derive-composites 'greaterEqEq' 0x2267 'greaterEqEqUpper' 'eqEqLower' derive-composites 'lessSymSym' 0x2A85 'lessEqEqUpper' 'symSymLower'
derive-composites 'greaterEqEqBarNegated' 0x2269 'greaterEqEqUpper' 'eqEqBarNegatedLower' derive-composites 'greaterSymSym' 0x2A86 'greaterEqEqUpper' 'symSymLower'
derive-composites 'greaterSymSym' 0x2A86 'greaterEqEqUpper' 'symSymLower' derive-composites 'lessSymSymBarNegated' 0x2A89 'lessEqEqUpper' 'symSymBarNegatedLower'
derive-composites 'greaterSymSymBarNegated' 0x2A8A 'greaterEqEqUpper' 'symSymBarNegatedLower' derive-composites 'greaterSymSymBarNegated' 0x2A8A 'greaterEqEqUpper' 'symSymBarNegatedLower'
derive-composites 'lessSymEq' 0x2A8D 'lessEqEqUpper' 'symEqLower'
derive-composites 'greaterSymEq' 0x2A8E 'greaterEqEqUpper' 'symEqLower'
turned 'turnGreaterEqSlant' 0x2A95 'greaterEqSlant' Middle SymbolMid turned 'turnGreaterEqSlant' 0x2A95 'greaterEqSlant' Middle SymbolMid
turned 'turnLessEqSlant' 0x2A96 'lessEqSlant' Middle SymbolMid turned 'turnLessEqSlant' 0x2A96 'lessEqSlant' Middle SymbolMid
turned 'turnGreaterEqSlantDot' 0x2A97 'greaterEqSlantDot' Middle SymbolMid turned 'turnGreaterEqSlantDot' 0x2A97 'greaterEqSlantDot' Middle SymbolMid
turned 'turnLessEqSlantDot' 0x2A98 'lessEqSlantDot' Middle SymbolMid turned 'turnLessEqSlantDot' 0x2A98 'lessEqSlantDot' Middle SymbolMid
turned 'turnGreaterEqEq' 0x2A99 'greaterEqEq' Middle SymbolMid turned 'turnGreaterEqEq' 0x2A99 'greaterEqEq' Middle SymbolMid
turned 'turnLessEqEq' 0x2A9A 'lessEqEq' Middle SymbolMid turned 'turnLessEqEq' 0x2A9A 'lessEqEq' Middle SymbolMid
turned 'turnGreaterSym' 0x2A9D 'greaterSym' Middle SymbolMid turned 'turnGreaterSym' 0x2A9D 'greaterSym' Middle SymbolMid
turned 'turnLessSym' 0x2A9E 'lessSym' Middle SymbolMid turned 'turnLessSym' 0x2A9E 'lessSym' Middle SymbolMid
create-glyph 'lessGreater' 0x2276 : glyph-proc create-glyph 'lessGreater' 0x2276 : glyph-proc
include : LessShape (SymbolMid + llggHeight / 2) (SymbolMid - llggHeight / 6 + lessEqDist) SB RightSB lesslessSW include : LessShape (SymbolMid + llggHeight / 2) (SymbolMid - llggHeight / 6 + lessEqDist) SB RightSB lesslessSW
@ -647,31 +649,31 @@ glyph-block Symbol-Math-Relation-Precedes-Succeeds : begin
create-glyph 'succeedsEqUpper' : AsRadical : SucceedsShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist) SB RightSB create-glyph 'succeedsEqUpper' : AsRadical : SucceedsShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist) SB RightSB
create-glyph 'succeedsEqEqUpper' : AsRadical : SucceedsShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist * 1.75) SB RightSB lesslessSW create-glyph 'succeedsEqEqUpper' : AsRadical : SucceedsShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist * 1.75) SB RightSB lesslessSW
derive-composites 'precedes.narrow' null 'precedesEqUpper' [ApparentTranslate 0 (-lessEqDist)] derive-composites 'precedes.narrow' null 'precedesEqUpper' [ApparentTranslate 0 (-lessEqDist)]
derive-composites 'precedesEq' 0x2AAF 'precedesEqUpper' 'eqLower' derive-composites 'precedesEq' 0x2AAF 'precedesEqUpper' 'eqLower'
derive-composites 'precedesEqBarNegated' 0x2AB1 'precedesEqUpper' 'eqBarNegatedLower' derive-composites 'precedesEqBarNegated' 0x2AB1 'precedesEqUpper' 'eqBarNegatedLower'
derive-composites 'precedesSym' 0x227E 'precedesEqUpper' 'symLower' derive-composites 'precedesSym' 0x227E 'precedesEqUpper' 'symLower'
derive-composites 'precedesSymBarNegated' 0x22E8 'precedesEqUpper' 'symBarNegatedLower' derive-composites 'precedesSymBarNegated' 0x22E8 'precedesEqUpper' 'symBarNegatedLower'
derive-composites 'precedesEqSlant' 0x227C 'precedesEqUpper' derive-composites 'precedesEqSlant' 0x227C 'precedesEqUpper'
PrecedesShapeB (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB OperatorStroke 1 PrecedesShapeB (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB OperatorStroke 1
derive-composites 'precedesEqEq' 0x2AB3 'precedesEqEqUpper' 'eqEqLower' derive-composites 'precedesEqEq' 0x2AB3 'precedesEqEqUpper' 'eqEqLower'
derive-composites 'precedesEqEqBarNegated' 0x2AB5 'precedesEqEqUpper' 'eqEqBarNegatedLower' derive-composites 'precedesEqEqBarNegated' 0x2AB5 'precedesEqEqUpper' 'eqEqBarNegatedLower'
derive-composites 'precedesSymSym' 0x2AB7 'precedesEqEqUpper' 'symSymLower' derive-composites 'precedesSymSym' 0x2AB7 'precedesEqEqUpper' 'symSymLower'
derive-composites 'precedesSymSymBarNegated' 0x2AB9 'precedesEqEqUpper' 'symSymBarNegatedLower' derive-composites 'precedesSymSymBarNegated' 0x2AB9 'precedesEqEqUpper' 'symSymBarNegatedLower'
derive-composites 'succeeds.narrow' null 'succeedsEqUpper' [ApparentTranslate 0 (-lessEqDist)] derive-composites 'succeeds.narrow' null 'succeedsEqUpper' [ApparentTranslate 0 (-lessEqDist)]
derive-composites 'succeedsEq' 0x2AB0 'succeedsEqUpper' 'eqLower' derive-composites 'succeedsEq' 0x2AB0 'succeedsEqUpper' 'eqLower'
derive-composites 'succeedsEqBarNegated' 0x2AB2 'succeedsEqUpper' 'eqBarNegatedLower' derive-composites 'succeedsEqBarNegated' 0x2AB2 'succeedsEqUpper' 'eqBarNegatedLower'
derive-composites 'succeedsSym' 0x227F 'succeedsEqUpper' 'symLower' derive-composites 'succeedsSym' 0x227F 'succeedsEqUpper' 'symLower'
derive-composites 'succeedsSymBarNegated' 0x22E9 'succeedsEqUpper' 'symBarNegatedLower' derive-composites 'succeedsSymBarNegated' 0x22E9 'succeedsEqUpper' 'symBarNegatedLower'
derive-composites 'succeedsEqSlant' 0x227D 'succeedsEqUpper' derive-composites 'succeedsEqSlant' 0x227D 'succeedsEqUpper'
SucceedsShapeB (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB OperatorStroke 1 SucceedsShapeB (SymbolMid + dH - lessEqDist) (SymbolMid - dH - lessEqDist) SB RightSB OperatorStroke 1
derive-composites 'succeedsEqEq' 0x2AB4 'succeedsEqEqUpper' 'eqEqLower' derive-composites 'succeedsEqEq' 0x2AB4 'succeedsEqEqUpper' 'eqEqLower'
derive-composites 'succeedsEqEqBarNegated' 0x2AB6 'succeedsEqEqUpper' 'eqEqBarNegatedLower' derive-composites 'succeedsEqEqBarNegated' 0x2AB6 'succeedsEqEqUpper' 'eqEqBarNegatedLower'
derive-composites 'succeedsSymSym' 0x2AB8 'succeedsEqEqUpper' 'symSymLower' derive-composites 'succeedsSymSym' 0x2AB8 'succeedsEqEqUpper' 'symSymLower'
derive-composites 'succeedsSymSymBarNegated' 0x2ABA 'succeedsEqEqUpper' 'symSymBarNegatedLower' derive-composites 'succeedsSymSymBarNegated' 0x2ABA 'succeedsEqEqUpper' 'symSymBarNegatedLower'
turned 'turnSucceedsEqSlant' 0x22DE 'succeedsEqSlant' Middle SymbolMid turned 'turnSucceedsEqSlant' 0x22DE 'succeedsEqSlant' Middle SymbolMid
@ -750,7 +752,7 @@ glyph-block Symbol-Math-Relation-Subset : begin
include : SubsetShape (SymbolMid + dHSubstSimple) (SymbolMid - dHSubstSimple) (sw -- sw) include : SubsetShape (SymbolMid + dHSubstSimple) (SymbolMid - dHSubstSimple) (sw -- sw)
include : SubsetShape (SymbolMid + dHSubstSimple) (SymbolMid - dHSubstSimple) (sw -- sw) (offset -- gap + sw) include : SubsetShape (SymbolMid + dHSubstSimple) (SymbolMid - dHSubstSimple) (sw -- sw) (offset -- gap + sw)
turned 'supst' 0x2283 'subst' Middle SymbolMid turned 'supst' 0x2283 'subst' Middle SymbolMid
turned 'doubleSupst' 0x22D1 'doubleSubst' Middle SymbolMid turned 'doubleSupst' 0x22D1 'doubleSubst' Middle SymbolMid
create-glyph 'substBarUpper' : AsRadical create-glyph 'substBarUpper' : AsRadical
@ -758,11 +760,11 @@ glyph-block Symbol-Math-Relation-Subset : begin
create-glyph 'supstBarUpper' : AsRadical create-glyph 'supstBarUpper' : AsRadical
SupsetShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist) SupsetShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist)
derive-composites 'substBar' 0x2286 'substBarUpper' 'eqLower' derive-composites 'substBar' 0x2286 'substBarUpper' 'eqLower'
derive-composites 'substBarNoRise' null 'subst' 'eqLower2' derive-composites 'substBarNoRise' null 'subst' 'eqLower2'
derive-composites 'substBarNegated' 0x228A 'substBarUpper' 'eqBarNegatedLower' derive-composites 'substBarNegated' 0x228A 'substBarUpper' 'eqBarNegatedLower'
derive-composites 'supstBar' 0x2287 'supstBarUpper' 'eqLower' derive-composites 'supstBar' 0x2287 'supstBarUpper' 'eqLower'
derive-composites 'supstBarNoRise' null 'supst' 'eqLower2' derive-composites 'supstBarNoRise' null 'supst' 'eqLower2'
derive-composites 'supstBarNegated' 0x228B 'supstBarUpper' 'eqBarNegatedLower' derive-composites 'supstBarNegated' 0x228B 'supstBarUpper' 'eqBarNegatedLower'
define supstDotShift : SB + [Math.max (OperatorStroke * 1.5) dHSubstSimple] - Middle define supstDotShift : SB + [Math.max (OperatorStroke * 1.5) dHSubstSimple] - Middle
@ -876,9 +878,9 @@ glyph-block Symbol-Math-Relation-Precedes-Succeeds-Prefix-Suffix : begin
create-glyph 'suffixBarUpper' : AsRadical create-glyph 'suffixBarUpper' : AsRadical
SuffixShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist) SuffixShape (SymbolMid + dSH + lessEqDist) (SymbolMid - dSH + lessEqDist)
derive-composites 'prefixBar' 0x2291 'prefixBarUpper' 'eqLower' derive-composites 'prefixBar' 0x2291 'prefixBarUpper' 'eqLower'
derive-composites 'prefixBarNegated' 0x22E4 'prefixBarUpper' 'eqBarNegatedLower' derive-composites 'prefixBarNegated' 0x22E4 'prefixBarUpper' 'eqBarNegatedLower'
derive-composites 'suffixBar' 0x2292 'suffixBarUpper' 'eqLower' derive-composites 'suffixBar' 0x2292 'suffixBarUpper' 'eqLower'
derive-composites 'suffixBarNegated' 0x22E5 'suffixBarUpper' 'eqBarNegatedLower' derive-composites 'suffixBarNegated' 0x22E5 'suffixBarUpper' 'eqBarNegatedLower'
create-glyph 'prefixElement' 0x22FF : glyph-proc create-glyph 'prefixElement' 0x22FF : glyph-proc
@ -914,7 +916,6 @@ glyph-block Symbol-Math-Relation-Between : begin
alsoThru.g2 (kShape) 0.5 alsoThru.g2 (kShape) 0.5
g4 [frame.mixX (1 - kExt)] [frame.mixY 0.0] [widths.lhs OperatorStroke] g4 [frame.mixX (1 - kExt)] [frame.mixY 0.0] [widths.lhs OperatorStroke]
glyph-block Symbol-Math-Relation-Addon-Glyphs : begin glyph-block Symbol-Math-Relation-Addon-Glyphs : begin
glyph-block-import CommonShapes glyph-block-import CommonShapes
glyph-block-import Common-Derivatives glyph-block-import Common-Derivatives
@ -929,10 +930,10 @@ glyph-block Symbol-Math-Relation-Addon-Glyphs : begin
flat (Middle + dist) (symbolBottom - dist + swo) [heading Downward] flat (Middle + dist) (symbolBottom - dist + swo) [heading Downward]
flat (Middle - dist) (symbolBottom - dist - swo) [heading Downward] flat (Middle - dist) (symbolBottom - dist - swo) [heading Downward]
create-glyph 'eqLower' : AsRadical : HBar.m SB RightSB (SymbolMid - dSH - lessEqDist) OperatorStroke create-glyph 'eqLower' : AsRadical : HBar.m SB RightSB (SymbolMid - dSH - lessEqDist) OperatorStroke
create-glyph 'eqLower2' : AsRadical : HBar.m SB RightSB (SymbolMid - dSH - 2 * lessEqDist) OperatorStroke create-glyph 'eqLower2' : AsRadical : HBar.m SB RightSB (SymbolMid - dSH - 2 * lessEqDist) OperatorStroke
create-glyph 'eqBarNegatedLower' : AsRadical : union [refer-glyph 'eqLower'] [BarNegator (SymbolMid - dSH) lessEqDist] create-glyph 'eqBarNegatedLower' : AsRadical : union [refer-glyph 'eqLower'] [BarNegator (SymbolMid - dSH) lessEqDist]
create-glyph 'symLower' : AsRadical : symWave (SymbolMid - dSH - lessEqDist) 1 create-glyph 'symLower' : AsRadical : symWave (SymbolMid - dSH - lessEqDist) 1
create-glyph 'symBarNegatedLower' : AsRadical : union [refer-glyph 'symLower'] [BarNegator (SymbolMid - dSH) lessEqDist] create-glyph 'symBarNegatedLower' : AsRadical : union [refer-glyph 'symLower'] [BarNegator (SymbolMid - dSH) lessEqDist]
create-glyph 'eqEqLower' : AsRadical : union create-glyph 'eqEqLower' : AsRadical : union
@ -941,5 +942,8 @@ glyph-block Symbol-Math-Relation-Addon-Glyphs : begin
create-glyph 'symSymLower' : AsRadical : union create-glyph 'symSymLower' : AsRadical : union
symWave (SymbolMid - dSH + lessEqDist * 2 / 3) 1 lesslessSW symWave (SymbolMid - dSH + lessEqDist * 2 / 3) 1 lesslessSW
symWave (SymbolMid - dSH - lessEqDist) 1 lesslessSW symWave (SymbolMid - dSH - lessEqDist) 1 lesslessSW
create-glyph 'eqEqBarNegatedLower' : AsRadical : union [refer-glyph 'eqEqLower'] [EqEqBarNegation] create-glyph 'symEqLower' : AsRadical : union
symWave (SymbolMid - dSH + lessEqDist * 2 / 3) 1 lesslessSW
HBar.m SB RightSB (SymbolMid - dSH - lessEqDist * 7 / 6) lesslessSW
create-glyph 'eqEqBarNegatedLower' : AsRadical : union [refer-glyph 'eqEqLower'] [EqEqBarNegation]
create-glyph 'symSymBarNegatedLower' : AsRadical : union [refer-glyph 'symSymLower'] [EqEqBarNegation] create-glyph 'symSymBarNegatedLower' : AsRadical : union [refer-glyph 'symSymLower'] [EqEqBarNegation]