aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-04-08 13:52:27 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-04-08 13:52:27 -0400
commit3fd1b67c25fd68aa69c9b0e7d86f8e85a8e6a15b (patch)
treed206f13c5cc1129e0842dcbbec597cb14ab08d49 /src
parentbc2a160b0eb0e46061e02524b2bbcbd0dae31714 (diff)
Avoid producing a NaN during Rotate
Diffstat (limited to 'src')
-rw-r--r--src/r.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/r.bqn b/src/r.bqn
index b4517051..a2d15187 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -146,7 +146,7 @@ Reverse←{
}
Rot←{
"𝕨⌽𝕩: 𝕨 must consist of integers" ! Int𝕨
- l←≠𝕩 ⋄ 𝕨-↩l×⌊𝕨÷l ⋄ ((𝕨+⊢-l×(l-𝕨)≤⊢)⌜↕l) ⊏ 𝕩
+ l←≠𝕩 ⋄ 𝕨-↩l×⌊𝕨÷l+l=0 ⋄ ((𝕨+⊢-l×(l-𝕨)≤⊢)⌜↕l) ⊏ 𝕩
}
Prefixes←{