@@ -88,7 +88,7 @@ new Mirror.Sum:
8888 type MirroredType = Tree
8989 type MirroredElemTypes [T ] = (Branch [T ], Leaf [T ])
9090 type MirroredMonoType = Tree [_]
91- type MirroredLabels = " Tree"
91+ type MirroredLabel = " Tree"
9292 type MirroredElemLabels = (" Branch" , " Leaf" )
9393
9494 def ordinal (x : MirroredMonoType ): Int = x match
@@ -100,7 +100,7 @@ new Mirror.Product:
100100 type MirroredType = Branch
101101 type MirroredElemTypes [T ] = (Tree [T ], Tree [T ])
102102 type MirroredMonoType = Branch [_]
103- type MirroredLabels = " Branch"
103+ type MirroredLabel = " Branch"
104104 type MirroredElemLabels = (" left" , " right" )
105105
106106 def fromProduct (p : Product ): MirroredMonoType =
@@ -111,7 +111,7 @@ new Mirror.Product:
111111 type MirroredType = Leaf
112112 type MirroredElemTypes [T ] = Tuple1 [T ]
113113 type MirroredMonoType = Leaf [_]
114- type MirroredLabels = " Leaf"
114+ type MirroredLabel = " Leaf"
115115 type MirroredElemLabels = Tuple1 [" elem" ]
116116
117117 def fromProduct (p : Product ): MirroredMonoType =
0 commit comments