diff --git a/changes/3.6.2.md b/changes/3.6.2.md index cec72de098..5d74b7f8c3 100644 --- a/changes/3.6.2.md +++ b/changes/3.6.2.md @@ -1,2 +1,3 @@ * Add compile option to default to old-style figures (#397). - * Add control picture symbols (`U+2400` ... `U+2422`, `U+2424`). \ No newline at end of file + * Add control picture symbols (`U+2400` ... `U+2422`, `U+2424`). + * Add Claudian letters (`U+2132`, `U+214E`, `U+2183`, `U+2184`, `U+2C75`, `U+2C76`). \ No newline at end of file diff --git a/font-src/glyphs/common/shapes.ptl b/font-src/glyphs/common/shapes.ptl index a97141ae1d..13fa76caa6 100644 --- a/font-src/glyphs/common/shapes.ptl +++ b/font-src/glyphs/common/shapes.ptl @@ -377,7 +377,6 @@ glyph-block CommonShapes : begin CenterTopSerif (right - sw * sideSerifK * HVContrast) top jut include : tagged 'serifLB' CenterBottomSerif (left + sw * sideSerifK * HVContrast) 0 jut - #include : CenterdBottomSerif (right - Stroke * (sideSerifK - 0.5) * HVContrast) 0 (Jut / 2) define [AICyrISerifs top _left _right] : glyph-proc local left : fallback _left SB local right : fallback _right RightSB diff --git a/font-src/glyphs/letter/latin.ptl b/font-src/glyphs/letter/latin.ptl index fd4dae2632..620403d1c0 100644 --- a/font-src/glyphs/letter/latin.ptl +++ b/font-src/glyphs/letter/latin.ptl @@ -3062,19 +3062,27 @@ glyph-block Letter-Latin-C : begin glyph-block-export CShape CShapeOutline glyph-block-import Letter-Shared-Shapes : CurlyTail - define [CShape top bot sw] : glyph-proc - include : dispiro - widths.lhs sw - g4 RightSB (top - Hook) - hookstart (top - O) - flat (SB + OX) (top - SmoothA) - curl (SB + OX) (bot + SmoothB) - hookend (bot + O) - g4 RightSB (bot + Hook) - - define [CShapeOutline top bot _offset] : glyph-proc + define [CShape top bot sw] : dispiro + widths.lhs sw + g4 RightSB (top - Hook) + hookstart (top - O) + flat (SB + OX) (top - SmoothA) + curl (SB + OX) (bot + SmoothB) + hookend (bot + O) + g4 RightSB (bot + Hook) + + define [RevCShape top bot sw] : dispiro + widths.rhs sw + g4 SB (top - Hook) + hookstart (top - O) + flat (RightSB - OX) (top - SmoothA) + curl (RightSB - OX) (bot + SmoothB) + hookend (bot + O) + g4 SB (bot + Hook) + + define [CShapeOutline top bot _offset] : begin define offset : fallback _offset 1 - include : spiro-outline + return : spiro-outline g4 RightSB (top - Hook) hookstart (top - O - offset) flat (SB + OX + offset) (top - SmoothA) @@ -3087,6 +3095,10 @@ glyph-block Letter-Latin-C : begin include : MarkSet.capital include : CShape CAP 0 + create-glyph 'revC' 0x2183 : glyph-proc + include : MarkSet.capital + include : RevCShape CAP 0 + alias 'cyrl/Es' 0x421 'C' alias 'grek/lunateSigma' 0x3F9 'C' @@ -3098,7 +3110,6 @@ glyph-block Letter-Latin-C : begin create-glyph 'c' 'c' : glyph-proc set-width Width include : MarkSet.e - include : dispiro widths.lhs g4 RightSB (XH - Hook) @@ -3108,6 +3119,18 @@ glyph-block Letter-Latin-C : begin hookend O g4 RightSB Hook + create-glyph 'revSmallC' 0x2184 : glyph-proc + set-width Width + include : MarkSet.e + include : dispiro + widths.rhs + g4 SB (XH - Hook) + hookstart (XH - O) + flat (RightSB - OX) (XH - SmallSmoothA) + curl (RightSB - OX) (0 + SmallSmoothB) + hookend O + g4 SB Hook + alias 'cyrl/es' 0x441 'c' alias 'grek/lunatesigma' 0x3F2 'c' @@ -4568,16 +4591,22 @@ glyph-block Letter-Latin-Upper-H : begin glyph-block-import Common-Derivatives define [HShape top] : glyph-proc - include : VBarLeft SB 0 top - include : VBarRight RightSB 0 top + include : tagged 'strokeL' : VBarLeft SB 0 top + include : tagged 'strokeR' : VBarRight RightSB 0 top include : HBar (SB - O) (RightSB + O) (top * HBarPos) include : AIHSerifs top create-glyph 'H' 'H' : glyph-proc - set-width Width include : MarkSet.capital include : HShape CAP + create-glyph 'halfH' 0x2C75 : glyph-proc + include : MarkSet.capital + include : HShape CAP + eject-contour 'strokeR' + eject-contour 'serifRT' + eject-contour 'serifRB' + alias 'grek/Eta' 0x397 'H' alias 'cyrl/En' 0x41D 'H' @@ -4585,6 +4614,13 @@ glyph-block Letter-Latin-Upper-H : begin include : MarkSet.e include : HShape XH + create-glyph 'halfSmcpH' 0x2C76 : glyph-proc + include : MarkSet.e + include : HShape XH + eject-contour 'strokeR' + eject-contour 'serifRT' + eject-contour 'serifRB' + alias 'cyrl/en' 0x43D 'smcpH' create-glyph 0x4A2 : composite-proc [refer-glyph 'cyrl/En'] [CyrDescender RightSB] @@ -4814,6 +4850,14 @@ glyph-block Letter-Latin-Upper-F : begin include : MarkSet.capital include : FShape CAP + create-glyph 'smcpF' 0xA730 : glyph-proc + set-width Width + include : MarkSet.e + include : FShape XH + + turned 'turnF' 0x2132 'F' Middle (CAP / 2) + turned 'turnSmcpF' 0x214E 'smcpF' Middle (XH / 2) + create-glyph 'symbol/currency/frenchFrancSign' 0x20A3 : glyph-proc include : refer-glyph "F" include : HOverlayBar (SB * 0.5) (SB * 3 + Stroke * HVContrast) [mix 0 XH 0.4]