aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
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 bacec9aa..be2df8e6 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -448,7 +448,7 @@ inverse ← {(βŠ‘(0βŠπ•©)⊐<) βŠ‘ ((1βŠπ•©)∾⟨!∘0⟩)˜} ⍉ (2∾˜2Γ
∧, ⊒⊘(÷˜)
∨, ⊒⊘(-˜÷1-⊒)
<, {!IsArray𝕩⋄!0==π•©β‹„βŠ‘π•©}⊘(!∘0)
- /, {!(β‹β‰‘β†•βˆ˜β‰ )π•©β‹„β‰ βŒœβŠ”π•©}⊘(!∘0)
+ /, {!1==𝕩⋄!∧´NatβŒœπ•©β‹„!(∧´¯1βŠΈβ†“β‰€1βŠΈβ†“)𝕩⋄GroupLen𝕩}⊘(!∘0)
⟩
⁼ ← {Inverse 𝕗}