diff options
author | Tom Smeding <tom@tomsmeding.com> | 2024-06-07 21:45:21 +0200 |
---|---|---|
committer | Tom Smeding <tom@tomsmeding.com> | 2024-06-07 21:45:21 +0200 |
commit | 83da7fe89c52cf84b6181141b1b0f6ffcf4ecd7c (patch) | |
tree | d172bb2b168670721f30bfe89fb2a9c8602af5eb /src/Data/Array/Nested/Internal/Shaped.hs | |
parent | cbd851577d961a01c6a75533079e4de4aafdeb24 (diff) |
Fix formatting
These were originally directly adjacent, where the alignment showed the
similarities. Now the alignment is just spurious.
Diffstat (limited to 'src/Data/Array/Nested/Internal/Shaped.hs')
-rw-r--r-- | src/Data/Array/Nested/Internal/Shaped.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Data/Array/Nested/Internal/Shaped.hs b/src/Data/Array/Nested/Internal/Shaped.hs index 7e480c9..c640a44 100644 --- a/src/Data/Array/Nested/Internal/Shaped.hs +++ b/src/Data/Array/Nested/Internal/Shaped.hs @@ -64,7 +64,7 @@ deriving instance NFData (Mixed (MapJust sh) a) => NFData (Shaped sh a) newtype instance Mixed sh (Shaped sh' a) = M_Shaped (Mixed sh (Mixed (MapJust sh') a)) deriving instance Show (Mixed sh (Mixed (MapJust sh') a)) => Show (Mixed sh (Shaped sh' a)) -newtype instance MixedVecs s sh (Shaped sh' a) = MV_Shaped (MixedVecs s sh (Mixed (MapJust sh' ) a)) +newtype instance MixedVecs s sh (Shaped sh' a) = MV_Shaped (MixedVecs s sh (Mixed (MapJust sh') a)) instance Elt a => Elt (Shaped sh a) where mshape (M_Shaped arr) = mshape arr |