From 6f912510c594de511bc92b7f47d0d405b64aaa1e Mon Sep 17 00:00:00 2001 From: Tom Smeding Date: Wed, 3 Apr 2024 15:06:12 +0200 Subject: Some debugging Show instances --- src/Data/Array/Mixed.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'src/Data/Array/Mixed.hs') diff --git a/src/Data/Array/Mixed.hs b/src/Data/Array/Mixed.hs index 30dfd92..f597bbf 100644 --- a/src/Data/Array/Mixed.hs +++ b/src/Data/Array/Mixed.hs @@ -70,6 +70,7 @@ type family Rank sh where type XArray :: [Maybe Nat] -> Type -> Type data XArray sh a = XArray (U.Array (GNat (Rank sh)) a) + deriving (Show) zeroIdx :: StaticShapeX sh -> IxX sh zeroIdx SZX = IZX -- cgit v1.2.3-70-g09d2