fix test/squeezeValid.bqn
This commit is contained in:
parent
66ea63a49d
commit
c508e2ccd9
@ -21,7 +21,7 @@ Do ← { 𝕊:
|
|||||||
|
|
||||||
F ← { 𝕊:
|
F ← { 𝕊:
|
||||||
p ← {r.Range 2? r.Range l; (¯1+l-⊢)⍟(r.Range 2) r.Range (2⋆r.Range 10)⌊l}
|
p ← {r.Range 2? r.Range l; (¯1+l-⊢)⍟(r.Range 2) r.Range (2⋆r.Range 10)⌊l}
|
||||||
b ← 𝕩⌾(p⊸⊑) a
|
b ← 𝕩˙⌾(p⊸⊑) a
|
||||||
! b EEqual Squeeze b # won't be acceptable with in-place squeezing, but that doesn't exist yet
|
! b EEqual Squeeze b # won't be acceptable with in-place squeezing, but that doesn't exist yet
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user