diff options
| author | Tom Smeding <t.j.smeding@uu.nl> | 2024-04-03 15:06:12 +0200 |
|---|---|---|
| committer | Tom Smeding <t.j.smeding@uu.nl> | 2024-04-03 15:06:12 +0200 |
| commit | 6f912510c594de511bc92b7f47d0d405b64aaa1e (patch) | |
| tree | 5ac52a510fef9f90b54c6388ddbcfea6171ab20a /src/Data/Array/Mixed.hs | |
| parent | 22072f46b1196ff8c8fb716f7650f9afc0904a03 (diff) | |
Some debugging Show instances
Diffstat (limited to 'src/Data/Array/Mixed.hs')
| -rw-r--r-- | src/Data/Array/Mixed.hs | 1 |
1 files changed, 1 insertions, 0 deletions
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 |