Cleanup of be5invis#2563 .

Author: jmcwilliams403

packages/font-glyphs/src/letter/armenian/shared.ptl

@@ -55,7 +55,7 @@ glyph-block Letter-Armenian-Shared-Shapes : begin
 		local hookY : fallback _hookY (top - Hook)
 		local ada : fallback _ada ArchDepthA
 		local adb : fallback _adb ArchDepthB
-		local yMidDepth : if (top > ada + adb) ada (top * (ada / (ada + adb)))
+		local yMidDepth : if (top - base > ada + adb) ada ((top - base) * (ada / (ada + adb)))
 		include : dispiro
 			widths.lhs df.mvs
 			g4 df.rightSB hookY
@@ -75,7 +75,7 @@ glyph-block Letter-Armenian-Shared-Shapes : begin
 		local hookY : fallback _hookY (top - Hook)
 		local ada : fallback _ada ArchDepthA
 		local adb : fallback _adb ArchDepthB
-		local yMidDepth : if (top > ada + adb) adb (top * (adb / (ada + adb)))
+		local yMidDepth : if (top - base > ada + adb) adb ((top - base) * (adb / (ada + adb)))
 		include : dispiro
 			widths.rhs df.mvs
 			g4 df.leftSB hookY