From 8568944d90f5bc9a60e895a789c85b474d4ff8fe Mon Sep 17 00:00:00 2001 From: Mikolaj Konarski Date: Fri, 12 Dec 2025 09:11:58 +0100 Subject: Make type variables consistent between shaped and mixed lists --- src/Data/Array/Nested/Mixed/Shape.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Data/Array/Nested/Mixed/Shape.hs b/src/Data/Array/Nested/Mixed/Shape.hs index 11ef757..b1b4f81 100644 --- a/src/Data/Array/Nested/Mixed/Shape.hs +++ b/src/Data/Array/Nested/Mixed/Shape.hs @@ -62,7 +62,7 @@ type role ListX nominal representational type ListX :: [Maybe Nat] -> (Maybe Nat -> Type) -> Type data ListX sh f where ZX :: ListX '[] f - (::%) :: f n -> ListX sh f -> ListX (n : sh) f + (::%) :: forall n sh {f}. f n -> ListX sh f -> ListX (n : sh) f deriving instance (forall n. Eq (f n)) => Eq (ListX sh f) deriving instance (forall n. Ord (f n)) => Ord (ListX sh f) infixr 3 ::% -- cgit v1.2.3-70-g09d2