aboutsummaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-09-25 11:11:53 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-09-25 11:11:53 -0400
commit3a5c0fa52c9b3135c88e1bbcb1d6f853d567053e (patch)
tree476f20f7216cd50bfa810136392d012bcb1546cb /examples
parent501a0e838c5e92f2619f715bc755e213658d74f3 (diff)
Add warning about _pow with 𝕩≡1
Diffstat (limited to 'examples')
-rw-r--r--examples/fifty.bqn1
1 files changed, 1 insertions, 0 deletions
diff --git a/examples/fifty.bqn b/examples/fifty.bqn
index d79f11cc..c235b24c 100644
--- a/examples/fifty.bqn
+++ b/examples/fifty.bqn
@@ -170,6 +170,7 @@ KnightsTour ← {
! (KnightsTour 6) ≡ 6‿6⥊0‿9‿20‿35‿6‿11‿21‿32‿7‿10‿19‿26‿8‿1‿34‿25‿12‿5‿33‿22‿31‿16‿27‿18‿2‿15‿24‿29‿4‿13‿23‿30‿3‿14‿17‿28
# 34
+# Fails when 𝕩 is 1; the APL version did this too!
_pow ← {𝔽´𝔽˜⍟(/2|⌊∘÷⟜2⍟(↕·⌈2⋆⁼⊢)𝕩)𝕨}
! 847288609443 ≡ 3 ×_pow 25