From fe9b4c84d9b84b8737e7688e3135e2ff50061b69 Mon Sep 17 00:00:00 2001 From: Marshall Lochbaum Date: Sun, 30 May 2021 16:11:29 -0400 Subject: =?UTF-8?q?Rank/Depth=20modifier=20error=20messages=20referred=20t?= =?UTF-8?q?o=20=F0=9D=94=BD=20instead=20of=20=F0=9D=94=BE?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/r1.bqn | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src') diff --git a/src/r1.bqn b/src/r1.bqn index 541a14fa..24fdbc0a 100644 --- a/src/r1.bqn +++ b/src/r1.bqn @@ -651,10 +651,10 @@ GroupGen←{ } ValidateRanks←{ - "⎉ or ⚇: 𝔽 result must have rank at most 1" ! 1≥=𝕩 + "⎉ or ⚇: 𝔾 result must have rank at most 1" ! 1≥=𝕩 𝕩↩Deshape𝕩 - "⎉ or ⚇: 𝔽 result must have 1 to 3 elements" ! (1⊸≤×≤⟜3)≠𝕩 - "⎉ or ⚇: 𝔽 result must consist of integers" ! 1×´Int⌜𝕩 + "⎉ or ⚇: 𝔾 result must have 1 to 3 elements" ! (1⊸≤×≤⟜3)≠𝕩 + "⎉ or ⚇: 𝔾 result must consist of integers" ! 1×´Int⌜𝕩 𝕩 ⊏˜ (≠𝕩)⊸(-+1-˜⌊∘÷˜×⊣)⌜ 𝕨 } _ranks ← {⟨2⟩⊘⟨1,0⟩ ValidateRanks 𝔽} -- cgit v1.2.3