Langton's ant: Difference between revisions

Content added Content deleted
(add BQN)
(→‎{{header|BQN}}: Simpler Fmt; avoid Rot/rot name collision; norun link)
Line 812: Line 812:


<lang bqn>Rot ← ¬⊸{-⌾(𝕨⊸⊑)⌽𝕩}
<lang bqn>Rot ← ¬⊸{-⌾(𝕨⊸⊑)⌽𝕩}
Fmt ← {𝕩⊑" #"
Fmt ← ⊏⟜" #"
_while_ ← {𝔽⍟𝔾∘𝔽_𝕣_𝔾∘𝔽⍟𝔾𝕩}
_while_ ← {𝔽⍟𝔾∘𝔽_𝕣_𝔾∘𝔽⍟𝔾𝕩}


Ant ← 2⊑{ # Generator Block
Ant ← 2⊑{ # Generator Block
p‿d‿g:
p‿d‿g:
rot ← d Rot˜ p⊑g
r ← d Rot˜ p⊑g
p + rot
p + r
rot
r
¬⌾(p⊸⊑)g
¬⌾(p⊸⊑)g
Line 830: Line 830:
•Show Fmt Ant ⟨50‿50, 0‿1, 100‿100⥊0⟩</lang>
•Show Fmt Ant ⟨50‿50, 0‿1, 100‿100⥊0⟩</lang>


[https://mlochbaum.github.io/BQN/try.html#code=Um90IOKGkCDCrOKKuHst4oy+KPCdlajiirjiipEp4oy98J2VqX0KRm10IOKGkCB78J2VqeKKkSIgIyJ9wqgKX3doaWxlXyDihpAge/CdlL3ijZ/wnZS+4oiY8J2UvV/wnZWjX/CdlL7iiJjwnZS94o2f8J2UvvCdlal9CgpBbnQg4oaQIDLiipF7ICMgR2VuZXJhdG9yIEJsb2NrCiAgcOKAv2TigL9nOgogIHJvdCDihpAgZCBSb3TLnCBw4oqRZwogIOKfqAogICAgcCArIHJvdAogICAgcm90CiAgICDCrOKMvihw4oq44oqRKWcKICDin6kKfSBfd2hpbGVfIHsgICAjIENvbmRpdGlvbiBCbG9jawogIHDigL9k4oC/ZzoKICDiiKfCtChw4omlMOKAvzAp4oincDziiaJnCn0KCuKAolNob3cgRm10IEFudCDin6g1MOKAvzUwLCAw4oC/MSwgMTAw4oC/MTAw4qWKMOKfqQo= Try It!] (Displaying the result takes some time due to JS, ≈40 secs on my machine)
[https://mlochbaum.github.io/BQN/try.html#code=Um90IOKGkCDCrOKKuHst4oy+KPCdlajiirjiipEp4oy98J2VqX0KRm10IOKGkCDiio/in5wiICMiwqgKX3doaWxlXyDihpAge/CdlL3ijZ/wnZS+4oiY8J2UvV/wnZWjX/CdlL7iiJjwnZS94o2f8J2UvvCdlal9CgpBbnQg4oaQIDLiipF7ICMgR2VuZXJhdG9yIEJsb2NrCiAgcOKAv2TigL9nOgogIHIg4oaQIGQgUm90y5wgcOKKkWcKICDin6gKICAgIHAgKyByCiAgICByCiAgICDCrOKMvihw4oq44oqRKWcKICDin6kKfSBfd2hpbGVfIHsgICAjIENvbmRpdGlvbiBCbG9jawogIHDigL9k4oC/ZzoKICDiiKfCtChw4omlMOKAvzAp4oincDziiaJnCn0KCuKAolNob3cgRm10IEFudCDin6g1MOKAvzUwLCAw4oC/MSwgMTAw4oC/MTAw4qWKMOKfqQ==&norun Try It!] (Running will take some time due to JS, ≈40 secs on my machine)



=={{header|C}}==
=={{header|C}}==