aboutsummaryrefslogtreecommitdiff
path: root/src/Data/Array/Nested/Shaped.hs
diff options
context:
space:
mode:
authorTom Smeding <tom@tomsmeding.com>2025-06-30 10:44:10 +0200
committerTom Smeding <tom@tomsmeding.com>2025-06-30 10:44:10 +0200
commit64c47540bdcf764f6ac3644cabac00e9605c3fa7 (patch)
treebc72628e222dc5cb38df6e9691ab0f364889f191 /src/Data/Array/Nested/Shaped.hs
parentbff10fbf0812bb7c24cc7808af076cd53566f4f6 (diff)
Fix rerank docs
Diffstat (limited to 'src/Data/Array/Nested/Shaped.hs')
-rw-r--r--src/Data/Array/Nested/Shaped.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Data/Array/Nested/Shaped.hs b/src/Data/Array/Nested/Shaped.hs
index 2b0b6b5..198a068 100644
--- a/src/Data/Array/Nested/Shaped.hs
+++ b/src/Data/Array/Nested/Shaped.hs
@@ -191,6 +191,7 @@ srerankP sh sh2 f sarr@(Shaped arr)
(\a -> let Shaped r = f (Shaped a) in r)
arr)
+-- | See the caveats at 'Data.Array.XArray.rerank'.
srerank :: forall sh1 sh2 sh a b. (PrimElt a, PrimElt b)
=> ShS sh -> ShS sh2
-> (Shaped sh1 a -> Shaped sh2 b)