diff --git a/packages/font-glyphs/src/letter/greek/pi.ptl b/packages/font-glyphs/src/letter/greek/pi.ptl
index 32831dbee..d91989ae0 100644
--- a/packages/font-glyphs/src/letter/greek/pi.ptl
+++ b/packages/font-glyphs/src/letter/greek/pi.ptl
@@ -9,6 +9,7 @@ glyph-block Letter-Greek-Pi : begin
 	glyph-block-import CommonShapes
 	glyph-block-import Common-Derivatives
 	glyph-block-import Letter-Blackboard : BBS BBD BBBarLeft BBBarRight
+	glyph-block-import Letter-Shared : CreateTurnedLetter
 	glyph-block-import Letter-Shared-Shapes : RightwardTailedBar SerifFrame
 	glyph-block-import Letter-Shared-Shapes : CyrDescender MidHook
 
@@ -32,6 +33,8 @@ glyph-block Letter-Greek-Pi : begin
 
 	alias 'cyrl/Pe' 0x41F 'grek/Pi'
 
+	CreateTurnedLetter 'amalg' 0x2A3F 'grek/Pi' HalfAdvance (CAP / 2)
+
 	create-glyph 'grek/smcpPi' 0x1D28 : glyph-proc
 		include : MarkSet.e
 		include : PiShape [DivFrame 1] XH 0 (shrinkRate -- 0) (doSerif -- SLAB)
diff --git a/packages/font-glyphs/src/letter/latin/upper-a.ptl b/packages/font-glyphs/src/letter/latin/upper-a.ptl
index 56be53952..ad03995ee 100644
--- a/packages/font-glyphs/src/letter/latin/upper-a.ptl
+++ b/packages/font-glyphs/src/letter/latin/upper-a.ptl
@@ -40,9 +40,9 @@ glyph-block Letter-Latin-Upper-A : begin
 				include : FlipAround df.middle (top / 2)
 			[Just BODY-ROUND-TOP] : spiro-outline
 				corner   df.leftSB   0
-				curl     df.leftSB  (top - ArchDepthA)
+				curl     df.leftSB  (top - df.archDepthA)
 				arch.rhs (sw -- sw)  top
-				flat     df.rightSB (top - ArchDepthB)
+				flat     df.rightSB (top - df.archDepthB)
 				corner   df.rightSB  0
 
 		export : define [Outer df bodyShape top sw] : match bodyShape
@@ -52,9 +52,9 @@ glyph-block Letter-Latin-Upper-A : begin
 			[Just BODY-ROUND-TOP] : dispiro
 				widths.rhs sw
 				flat     df.leftSB   0 [heading Upward]
-				curl     df.leftSB  (top - ArchDepthA)
+				curl     df.leftSB  (top - df.archDepthA)
 				arch.rhs (sw -- sw)  top
-				flat     df.rightSB (top - ArchDepthB)
+				flat     df.rightSB (top - df.archDepthB)
 				curl     df.rightSB  0 [heading Downward]
 
 		define [CrossBar df bodyShape top sw] : begin
@@ -173,7 +173,9 @@ glyph-block Letter-Latin-Upper-A : begin
 	select-variant 'currency/australSign' 0x20B3 (follow -- 'A')
 	link-reduced-variant 'grek/Alpha/sansSerif' 'grek/Alpha' MathSansSerif (follow -- 'A/sansSerif')
 	alias 'cyrl/A' 0x410 'A'
-	CreateTurnedLetter 'turnA' 0x2C6F 'A' HalfAdvance (CAP / 2)
+
+	CreateTurnedLetter 'turnA'  0x2C6F 'A'           HalfAdvance (CAP / 2)
+	CreateTurnedLetter 'forall' 0x2200 'A/sansSerif' HalfAdvance (CAP / 2)
 
 	glyph-block-import Letter-Blackboard : BBS BBD
 	glyph-block-import Letter-Latin-V : BBVShape BBVInnerMaskShape
diff --git a/packages/font-glyphs/src/letter/latin/upper-e.ptl b/packages/font-glyphs/src/letter/latin/upper-e.ptl
index 1a0edd9b7..4612ed635 100644
--- a/packages/font-glyphs/src/letter/latin/upper-e.ptl
+++ b/packages/font-glyphs/src/letter/latin/upper-e.ptl
@@ -85,10 +85,12 @@ glyph-block Letter-Latin-Upper-E : begin
 	select-variant 'grek/Epsilon' 0x395 (follow -- 'E')
 	link-reduced-variant 'grek/Epsilon/sansSerif' 'grek/Epsilon' MathSansSerif (follow -- 'E/sansSerif')
 
-	select-variant 'smcpE' 0x1D07 (follow -- 'E')
 	alias 'cyrl/Ie' 0x415 'E'
 
-	select-variant 'revE' 0x18E (follow -- 'E')
+	select-variant 'revE'   0x18E  (follow -- 'E')
+	select-variant 'exists' 0x2203 (follow -- 'E/sansSerif') (shapeFrom -- 'revE')
+
+	select-variant 'smcpE' 0x1D07 (follow -- 'E')
 	CreateTurnedLetter 'turnSmcpE' 0x2C7B 'smcpE' HalfAdvance (XH / 2)
 
 	glyph-block-import Letter-Blackboard : BBS BBD
@@ -99,5 +101,3 @@ glyph-block Letter-Latin-Upper-E : begin
 				EShape CAP (serif -- false) (stroke -- BBS)
 				Rect (CAP - BBS) BBS (xEBarLeft + [HSwToV BBS]) (xEBarLeft + BBD)
 			VBar.l (xEBarLeft + BBD) 0 CAP BBS
-
-	# Ognoek shapes
diff --git a/packages/font-glyphs/src/symbol/math.ptl b/packages/font-glyphs/src/symbol/math.ptl
index 5ba730531..59366418a 100644
--- a/packages/font-glyphs/src/symbol/math.ptl
+++ b/packages/font-glyphs/src/symbol/math.ptl
@@ -7,11 +7,11 @@ export : define [apply] : begin
 	run-glyph-module "./math/arith.mjs"
 	run-glyph-module "./math/complement.mjs"
 	run-glyph-module "./math/dots-and-colons.mjs"
+	run-glyph-module "./math/empty-set.mjs"
 	run-glyph-module "./math/frame.mjs"
 	run-glyph-module "./math/geometry.mjs"
 	run-glyph-module "./math/integrals.mjs"
 	run-glyph-module "./math/large-operators.mjs"
-	run-glyph-module "./math/letter-like.mjs"
 	run-glyph-module "./math/logicals.mjs"
 	run-glyph-module "./math/other.mjs"
 	run-glyph-module "./math/relation.mjs"
diff --git a/packages/font-glyphs/src/symbol/math/letter-like.ptl b/packages/font-glyphs/src/symbol/math/empty-set.ptl
similarity index 85%
rename from packages/font-glyphs/src/symbol/math/letter-like.ptl
rename to packages/font-glyphs/src/symbol/math/empty-set.ptl
index 0ddab055b..8b8db0a4c 100644
--- a/packages/font-glyphs/src/symbol/math/letter-like.ptl
+++ b/packages/font-glyphs/src/symbol/math/empty-set.ptl
@@ -4,15 +4,11 @@ import [mix linreg clamp fallback] from "@iosevka/util"
 
 glyph-module
 
-glyph-block Symbol-Math-Letter-Like : begin
+glyph-block Symbol-Math-Empty-Set : begin
 	glyph-block-import CommonShapes
 	glyph-block-import Common-Derivatives
 	glyph-block-import Common-OShape-Variants : OvalShapeT
 
-	turned 'forall' 0x2200 'A.straightSerifless' Middle (CAP / 2)
-	alias 'exists' 0x2203 'revE.serifless'
-	turned 'amalg' 0x2A3F 'grek/Pi' Middle (CAP / 2)
-
 	create-glyph 'emptySet' 0x2205 : glyph-proc
 		include : OvalShapeT dispiro CAP 0 SB RightSB OperatorStroke
 		include : MarkSet.capital