aboutsummaryrefslogtreecommitdiff
path: root/test/fuzz.bqn
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-07-03 21:53:39 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-07-03 22:16:10 -0400
commitd360cbe96739906724a8fbadf393965537ecbf4e (patch)
tree639fe6a66ee5c5a336cc156a7649848de44d357e /test/fuzz.bqn
parente01dcaa011a17d2c50fda513577bcc1ae6bf8276 (diff)
Fuzz tests for ⊔
Diffstat (limited to 'test/fuzz.bqn')
-rw-r--r--test/fuzz.bqn6
1 files changed, 3 insertions, 3 deletions
diff --git a/test/fuzz.bqn b/test/fuzz.bqn
index 7299416e..e1b83102 100644
--- a/test/fuzz.bqn
+++ b/test/fuzz.bqn
@@ -193,9 +193,9 @@ _testSelect ← { # /⊏
n ← RandBound 𝕩
d ← 𝕨 gen.Struct sh
RandInd ← 0⊸≠◶⟨⟨⟩,gen.Index⟜(⥊‿RandShape _randChoose)˜⟩
- g ← (/‿⊏ ⊐ 𝕗) ⊏ RandRep‿RandInd
+ g ← ({⊏} = 𝕗) ⊏ RandRep‿RandInd
g { ! (n𝕎 ⊑sh) 𝕏 _testConsistent_ ≡ d }¨ 𝕗
- g { ! (l𝕎¨l≠⊸↑sh) 𝕏 _testConsistent_ ≡ d }¨ 𝕗
+ g { ! (l𝕎¨l≠⊸↑sh) 𝕏 _testConsistent_ ≡ d }⍟((0<≠l)∨⊔˙⊸≠)¨ 𝕗
}
cases ← ⟨
@@ -204,7 +204,7 @@ cases ← ⟨
⟨"≠=≢"‿"", testDim‿@⟩
⟨""‿"≍∾«»", @‿testCombine⟩
⟨"⊐⊒∊⍷∧∨⍋⍒"‿"⊐⊒∊⍋⍒", testMonSearch‿testDySearch⟩
- ⟨"/"‿"/⊏", testIndices‿testSelect⟩ # ⊔ has nested result
+ ⟨"/⊔"‿"/⊏⊔", testIndices‿testSelect⟩
# ↕<∾↑↓≡>⊑ % ⊑⍷
# ˘⎉¨⚇⌜⁼⍟´˝`