diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-01-18 21:18:04 -0500 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-01-18 21:24:43 -0500 |
| commit | 7eaaa5874b4e84d3b2ca3d10d3ede870d7f5ed69 (patch) | |
| tree | 4041c9f84646301678d2f1099a2927b179927999 /test/cases/prim.bqn | |
| parent | c11499cef8ad335bd443f320ab2e100ac7ee15fb (diff) | |
Test layer 6 error checking
Diffstat (limited to 'test/cases/prim.bqn')
| -rw-r--r-- | test/cases/prim.bqn | 58 |
1 files changed, 58 insertions, 0 deletions
diff --git a/test/cases/prim.bqn b/test/cases/prim.bqn index 192bf54c..8b3ed0f8 100644 --- a/test/cases/prim.bqn +++ b/test/cases/prim.bqn @@ -388,45 +388,93 @@ ⟨⟩(/≡⊢)≍"ab" # LAYER 6 +! % ∾'c' ≡⟜(∾⥊¨)"abc" (∾´≡∾)"ab"‿"cde"‿"" +! % ∾"abc" +! % ∾≍"ab"‿"cde"‿"" +! % ∾"ab"‿'c'‿"" 1‿2‿3‿4‿6‿9≡∾(⊢×≠↑↓)1+↕3 ≡⟜∾⟨⟩ (≡⟜∾∧≡⟜(∾<))<4 ⟨1‿4,⥊2⟩((∾⋆⌜⌜)≡⋆⌜○∾)⟨2‿3‿4,⟨⟩,⥊5⟩ +! % ∾⟨2‿3,3,3‿3⟩⥊¨0 +! % ∾⟨2‿3,1‿3,2‿2⟩⥊¨0 "abcd"≡"abc"∾'d' "abcd"≡"abc"∾<'d' (↕4‿3)≡(↕3‿3)∾3∾¨↕3 (∾˜≡·¯1⊸(×´∘↓∾↑)∘≢⊸⥊≍˜)2‿3⥊"abcdef" (∾´≡∾)⟨3‿2‿1,0‿2‿1⟩⥊¨<↕6 +! % 'a'∾≍"abc" +! % "ab"∾○≍"cde" +! % (2‿3⥊↕6)∾↕2 ⟨1‿2,⥊0,⥊3⟩≡⊔1‿0‿0‿2 +⟨⟩≡⊔5⥊¯1 +≡⟜⊔⟨⟩ +! % ⊔3 +! % ⊔<3 +! % ⊔≍↕3 +! % ⊔1.5‿0‿2 +! % ⊔1‿¯2 4‿3‿2(≍○<≡·(≠¨≍○<∾)/⊸⊔)"abcdefghi" ⟨⟩≡(3⥊¯1)⊔"abc" +! % ⊔˜'a'‿1‿0 +! % 4⊔○↕2 (≍˘1‿1‿4<∘⥊⎉1 16‿4+⌜↕4)≡2↓⟨3‿2,¯1‿0‿¯1⟩⊔2‿3‿4⥊↕24 ⥊⚇0⊸≡○⊔⟜(⥊<)1‿2‿2‿¯1‿0 (⊔≡·≍⍟2∘<·∾⌜´/∘(0⊸=)¨)⟨0‿¯1‿0‿0,¯1‿0‿0⟩ +(∾↕¨∘≢⊸⊔)⊸≡ 3‿2‿4⥊↕24 +-⟜'a'⊸(⊔≡⊔○⥊)"acc"≍"bac" +(2‿1/⟨↕0‿1,1‿1⥊3⟩)≡2⊔⥊3 +((<=·↕1⊸+)≡·≢¨<¨⊸⊔⟜(<@))2‿1‿3 +! % ⟨1‿2,3‿1⟩⊔2‿3⥊0 +! % ⟨1‿2,3‿4‿5,6‿7⟩⊔2‿3⥊0 +! % ≍⊸⊔≍˘↕3 +! % ⟨⟨<3,2⟩,¯1‿0‿¯1⟩⊔2‿3‿4⥊↕24 +! % ⊐˜'a' +! % ⊏⊸⊐"abc" +! % (3‿2‿4⥊0)⊐4⥊1 2‿0‿4≡"abcd"⊐"cae" ⟨1⟩≡"abcd"⊐"b" (<3)≡⊐⟜(3⊸⊏)"abcd" (5⌊3+↕5)≡⊐⟜(3‿0‿0+⚇1⊢)↕5‿2‿1 +! % ⊐+˙@ +0‿0‿1‿0‿2≡⊐"ccacb" +0‿0‿1‿0‿2≡⊐≍˜˘"ccacb" +≡⟜⊐⟨⟩ +! % (↕5)∊1 +! % 2∊≍˘↕4 1‿0‿0‿1≡"acef"∊"adf" (∊⟜(↕2)≡<⟜2)3⋆⌜○↕5 (<1)≡3‿4‿5∊4+⌜○↕3 +! % ∊<4 ('0'≠"11010001")≡∊"abacbacd" (↑⟜1≡⟜∊⥊⟜∞)9 (⥊⟜1≡∊∘↕)6 ≡⟜∊⟨⟩ ≡○∊⟜(≍˜˘)"abcadbba" +! % ⍷'a' ≡⟜⍷⟨⟩ "ba"≡⍷"baa" +! % ≍⊸⍷"abc" 0‿1‿0‿0≡"abc"⍷"aabcba" (0‿1≍0‿0)≡(1‿2≍4‿5)⍷3‿3⥊↕9 (⌽¨≡⍉)↕2⥊3 ∧´⍉⊸≡¨⟨'a',<'a',"a","abc",""⟩ (↕4)(-˜⌜˜≡·⍉-⌜)↕3‿2 +! % 0‿¯1‿1⍉(3⥊1)⥊1 +! % 1‿0≍˘⊸⍉"ab"≍"cd" +! % 0‿2⍉+⌜˜↕3 +! % 2‿0‿0⍉↕↕3 +! % 3⍉↕↕3 (2×↕3)≡0‿0⍉6+⌜○↕3 ⟨⟩(⍉≡⊢)<4 (2‿0‿1⥊⟨⟩)≡1‿2‿0‿1⍉↕↕4 +(↕1‿2‿0‿3)≡2<⊸⍉↕↕4 +0⊸⍉⊸≡2‿3⥊↕6 +! % ⍋'a' +! % ⍋'a'‿∘ +! % ⍒2 2‿0‿3‿1‿4≡⍋"bdace" 5‿2‿4‿3‿0‿1≡⍋↓"deabb" (⍋≡⍒)⟨"",↕0,0↑<"abc"⟩ @@ -437,9 +485,19 @@ (⊢≡○⍋(0‿1+≠)⥊⊢)⟨¯2,'a',1,'f'⟩ ⟨1,2,3,1‿2,2‿1,1‿3,2‿2,3‿1⟩(⥊⊸(≠∘⊣∾˜¯1⊸⊑⊸(⌊∾⊣)∾×´⊸⌊)⌜≡○(⍋⥊)⥊⌜⟜(+`∘≠⟜(↕6)¨))↕4 ((⥊˜-⥊⟜2‿0)∘≠≡⍋+⍒)2/↕5 +! % ∧⊏⟨+⟩ +! % ∧+‿- +! % ∨'c' "edcba"≡∨"bdace" (↕7)≡∧⍋|⟜⌽1+↕7 +! % ⍋˜6 +! % ⍒⟜↕4 +! % (3‿2‿4⥊0)⍋4⥊1 +! % (3‿2‿4⥊0)⍒1 +! % ⟨+⟩⍋↕6 +! % ⟨1‿3‿1,1‿3‿2⟩⍒⟨1‿3‿{𝕩}⟩ ⟨1,3,∞,'e','i'⟩ (⍋≡≠∘⊣(⊣↓⊢⍋⊸⊏+`∘>)⍋∘∾) (2÷˜↕8)∾"aegz" ⟨'z','d',1‿0,0⟩ (⍒≡≠∘⊣(⊣↓⊢⍋⊸⊏+`∘>)⍒∘∾) (2÷˜↕8)∾"aegz" +(<∘⌈≡(↕6)⊸⍋)2.5 (<1)≡(↕2‿3)⍋1+↕3 (<0)≡"abc"⥊⊸⍒○<≍"acc" |