From 79db9f0bfc67ea8b4ed21d966e270f0adddfd8b8 Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Fri, 5 Aug 2022 12:41:19 +0200
Subject: 2022-08-05 11:41:00

---
 tex/context/fonts/mkiv/bonum-math.lfg | 64 +++++++++++++++++++++++++++++++++++
 1 file changed, 64 insertions(+)

(limited to 'tex/context/fonts/mkiv/bonum-math.lfg')

diff --git a/tex/context/fonts/mkiv/bonum-math.lfg b/tex/context/fonts/mkiv/bonum-math.lfg
index 154f7c346..73a1efcaf 100644
--- a/tex/context/fonts/mkiv/bonum-math.lfg
+++ b/tex/context/fonts/mkiv/bonum-math.lfg
@@ -17,6 +17,11 @@ local dimensions, kerns  if CONTEXTLMTXMODE == 0 then
 
 end
 
+-- When set this will bypass the italic correction hackery!
+local integral_variants = {  bottomright = -0.20 }
+local integral_top      = {  topright    =  0.05 }
+local integral_bottom   = {  bottomright = -0.30 }
+
 return {
     name = "bonum-math",
     version = "1.00",
@@ -204,6 +209,65 @@ return {
                      --     bottomright = -0.1,
                      --     all         = true,
                      -- },
+                        [0x7D] = {
+                            topright = -0.05,
+                            bottomright = -0.05,
+                        }, -- right brace variants
+                        ["0x7D.variants.*"] = {
+                            topright = -0.05,
+                            bottomright = -0.05,
+                        }, -- right brace variants
+                        ["0x7D.parts.top"] = {
+                            topright    = -0.15,
+                        }, -- right brace top
+                        ["0x7D.parts.bottom"] = {
+                            bottomright = -0.15,
+                        }, -- right brace bottom
+                        [0x29] = {
+                            topright = -0.1,
+                            bottomright = -0.1,
+                        }, -- right parenthesis variants
+                        ["0x29.variants.*"] = {
+                            topright = -0.1,
+                            bottomright = -0.1,
+                        }, -- right parenthesis variants
+                        ["0x29.parts.top"] = {
+                            topright    = -0.15,
+                        }, -- right parenthesis top
+                        ["0x29.parts.bottom"] = {
+                            bottomright = -0.15,
+                        }, -- right parenthesis bottom
+                        -- radical
+                        [0x221A] = {
+                            topright = 0.2,
+                            bottomright = 0.2,
+                        },
+                        ["0x221A.variants.*"] = {
+                            topright = 0.2,
+                            bottomright = 0.2,
+                        },
+                        ["0x221A.parts.top"] = {
+                            topright = 0.2,
+                        },
+                        ["0x221A.parts.bottom"] = {
+                            bottomright = 0.2,
+                        },
+                        -- angle
+                        [0x27E9]              = { topright = -0.1, bottomright = -0.1 },
+                        ["0x27E9.variants.*"] = { topright = -0.2, bottomright = -0.2 },
+                        [0x27EB]              = { topright = -0.1, bottomright = -0.1 },
+                        ["0x27EB.variants.*"] = { topright = -0.2, bottomright = -0.2 },
+                        --
+                        [0x222B] = integral_variants, ["0x222B.variants.*"] = integral_variants, ["0x222B.parts.top"] = integral_top, ["0x222B.parts.bottom"] = integral_bottom,
+                        [0x222C] = integral_variants, ["0x222C.variants.*"] = integral_variants, ["0x222C.parts.top"] = integral_top, ["0x222C.parts.bottom"] = integral_bottom,
+                        [0x222D] = integral_variants, ["0x222D.variants.*"] = integral_variants, ["0x222D.parts.top"] = integral_top, ["0x222D.parts.bottom"] = integral_bottom,
+                        [0x222E] = integral_variants, ["0x222E.variants.*"] = integral_variants, ["0x222E.parts.top"] = integral_top, ["0x222E.parts.bottom"] = integral_bottom,
+                        [0x222F] = integral_variants, ["0x222F.variants.*"] = integral_variants, ["0x222F.parts.top"] = integral_top, ["0x222F.parts.bottom"] = integral_bottom,
+                        [0x2230] = integral_variants, ["0x2230.variants.*"] = integral_variants, ["0x2230.parts.top"] = integral_top, ["0x2230.parts.bottom"] = integral_bottom,
+                        [0x2231] = integral_variants, ["0x2231.variants.*"] = integral_variants, ["0x2231.parts.top"] = integral_top, ["0x2231.parts.bottom"] = integral_bottom,
+                        [0x2232] = integral_variants, ["0x2232.variants.*"] = integral_variants, ["0x2232.parts.top"] = integral_top, ["0x2232.parts.bottom"] = integral_bottom,
+                        [0x2233] = integral_variants, ["0x2233.variants.*"] = integral_variants, ["0x2233.parts.top"] = integral_top, ["0x2233.parts.bottom"] = integral_bottom,
+
                     },
                 },
                 {
-- 
cgit v1.2.3