diff options
| author | Mikolaj Konarski <mikolaj.konarski@funktory.com> | 2025-05-13 17:30:44 +0200 |
|---|---|---|
| committer | Mikolaj Konarski <mikolaj.konarski@funktory.com> | 2025-05-13 17:30:44 +0200 |
| commit | 0c993d875a7cb9bace8aea1ef6def200de6b7d51 (patch) | |
| tree | 75e9a8c925a5bb4523d95f7f7e4a9794446b42a1 /ops/Data/Array/Strided/Array.hs | |
| parent | ca78d92aa55e9ba8ad179ef42515e4e7b2b8155a (diff) | |
Fix some of the warnings GHC 9.12.2 now produces
Diffstat (limited to 'ops/Data/Array/Strided/Array.hs')
| -rw-r--r-- | ops/Data/Array/Strided/Array.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ops/Data/Array/Strided/Array.hs b/ops/Data/Array/Strided/Array.hs index f757cd5..9280fe0 100644 --- a/ops/Data/Array/Strided/Array.hs +++ b/ops/Data/Array/Strided/Array.hs @@ -31,7 +31,7 @@ arrayFromVector sh vec shsize = product sh strides = NE.tail (NE.scanr (*) 1 sh) -arrayFromConstant :: (Storable a, KnownNat n) => [Int] -> a -> Array n a +arrayFromConstant :: Storable a => [Int] -> a -> Array n a arrayFromConstant sh x = Array sh (0 <$ sh) 0 (VS.singleton x) arrayRevDims :: [Bool] -> Array n a -> Array n a |