Add fuzz tests for character ¬

1 files changed, 2 insertions, 1 deletions

diff --git a/test/fuzz.bqn b/test/fuzz.bqn
index 9c52f9d7..94819cc3 100644
--- a/test/fuzz.bqn
+++ b/test/fuzz.bqn
@@ -139,11 +139,12 @@ TestDyArith ← opts.dyArith{
     (𝕨⊸RandArith¨ sh)_t¨ f
     {
       k←𝕩
-      p‿m ← (∊/⊣)⟜f¨ ⟨+⟩‿⟨-⟩
+      p‿m‿n ← (∊/⊣)⟜f¨ ⟨+⟩‿⟨-⟩‿⟨¬⟩
       rca ← ⟨RandChar,RandArith⟩
       Fit ← -⟜(@+1-˜17×2⋆16)⌈-⟜@⌊⊢
       {     (⌽⍟(Rand 2) -∘Fit⟜-` rca{k𝕎𝕩}¨sh)_t 𝕩 }¨ p
       { s←Rand 2⋄(Fit`⍟s(⊣`⍟(¬s)rca){k𝕎𝕩}¨sh)_t 𝕩 }¨ m
+      { s←Rand 2⋄((1+Fit)`⍟s(⊣`⍟(¬s)rca){k𝕎𝕩}¨sh)_t 𝕩 }¨ n
     }⍟(0⊸<∧≤⟜5) 𝕨
   }
 }