15 puzzle solver: Difference between revisions

Content added Content deleted
(Added Uiua solution)
m (→‎{{header|Uiua}}: Added Uiua Pad link)
Line 10,561: Line 10,561:
{{Works with |Uiua|0.12.0-dev.1}} Uses experimental `◹` and `astar`.
{{Works with |Uiua|0.12.0-dev.1}} Uses experimental `◹` and `astar`.
This works but it is very, very slow for complex states.
This works but it is very, very slow for complex states.

[https://www.uiua.org/pad?src=0_12_0-dev_1__IyBTb2x2ZSBhIDE1IHB1enpsZQojIEV4cGVyaW1lbnRhbCEKVCDihpAg4oavNF80IOKGuzHih6ExNgojIFJldHVybiBzaHVmZmxlZCBjb3B5IG9mIHRoZSBpbnB1dC4KU2h1ZmZsZSDihpAg4oqP4oq4KOKNj1vijaXimoJd4qe7KQojIFBvc2l0aW9ucyBvZiB0aGUgbnVtYmVycyAobm90IDApClBvcyDihpAg4omhKOKKouKKmuKMlSnihpgx4oehMTbCpAojIE9ubHkga2VlcCBudW1iZXJzIGluIHRoaXMgcm93L2NvbCB3aGljaCBzaG91bGQgYmUgaW4gdGhpcyByb3cvY29sLAojIChhIGIpIC0-IGNoZWNrIGEgYWdhaW5zdCBiLgpJblJpZ2h0UmFuayDihpAg4pah4pa94omh4oiK4oqZwqQsCiMgRm9yIGVhY2ggcGFpciBpbiB0aGUgd3Jvbmcgb3JkZXIsIGFkZCB0d28gKHRvIGEgbWF4IG9mIHNpeCkuCkluV3JvbmdPcmRlciDihpAg4oanNsOXMi8r4pe5Lyviip48LuKWveKKuOKJoDDCsOKWoQoKRGlzdGFuY2Ug4oaQIC8rLyvijLUt4oipUG9zClBlbmFsdGllcyDihpAgK-KIqSgvK-KJoUluV3JvbmdPcmRlcuKJoUluUmlnaHRSYW5rKSDiiKnijYksLAojIEhldXJpc3RpYyBkaXN0YW5jZSB0byBnb2FsID0gc3VtKG1hbmhhdHRhbiBkaXN0YW5jZXMpICsgUGVuYWx0aWVzCiMgKFRhcmdldCBDdXJyZW50KSAtPiBuCkhldXJpc3RpYyDihpAgK-KKgyhQZW5hbHRpZXN8RGlzdGFuY2UpIFQKCiMgRm91ciBwb3NzaWJsZSBuZWlnaGJvdXJzCk5mb3VyIOKGkCBbWzEgMF0gW8KvMSAwXSBbMCAxXSBbMCDCrzFdXQojIEFjdHVhbCBuZWlnaGJvdXJzIGF0IGEgcG9pbnQuClZhbGlkTiDihpAg4omhKOKKginiipnCpDrin5wo4pa94oq4KOKJpTDiiaEv4oanKeKWveKKuCg8NOKJoS_ihqUpK05mb3VyKcKkCiMgUHJlY2FsY3VsYXRlIHRoZW0uClZhbGlkTnMg4oaQIOKKnijilqEgVmFsaWRO4oqfKeKHoTQg4oehNAoKIyBHZXQgdGhlIHZhbGlkIChmcm9tIHRvKSBtb3ZlcyBmcm9tIHRoaXMgY2VsbC4KTW92ZXMg4oaQIMKw4pah4oqhOlZhbGlkTnPiiqLiiprijJUwCiMgU3dhcCB0aGUgdmFsdWVzIGF0IHRoZSBpbmRleGVzIFswIDFdIFthIGIgMiAzXSAtPiBbYiBhIDIgM10KU3dhcCDihpAg4o2cKOKKoXziiJjil4wpIOKKgyjih4ziipniiJh84oqhKQojIExpc3QgdGhlIHBvc3NpYmxlIG5leHQgcG9zaXRpb25zIGZvciBhIHBvc2l0aW9uCk5leHQg4oaQIOKKmeKXjOKJoShTd2FwIOKKmS4p4oqZwqTiirhNb3ZlcwoKIyBTZXQgdXAgaW5pdGlhbCBwdXp6bGUgc3RhdGUuCuKNpShTd2Fw4oqh4oq4KOKMisOX4pqC4qe7KeKKuE1vdmVzKTkwIFQgIyBSYW5kb20gc2h1ZmZsZS4KIyBbWzkgMSAyIDRdIFsxMyA2IDUgN10gWzMgMTEgMTQgMTVdIFsxMCAwIDggMTJdXSAjIDM0IHN0ZXBzCiMgW1sxNSAxNCAxIDZdIFs5IDExIDQgMTJdIFswIDEwIDcgM10gWzEzIDggNSAyXV0gIyBNYWluCiMgW1swIDEyIDkgMTNdIFsxNSAxMSAxMCAxNF0gWzMgNyAyIDVdIFs0IDggNiAxXV0gIyBFeHRyYSBDcmVkaXQKCiZwIlJ1bm5pbmcuLi4iJnAuCuKNnG5vd2FzdGFyKE5leHR8SGV1cmlzdGljfOKJjVQpCiZwJCJfIHNlY29uZHMiCiMgVHJhY2sgdGhlIG1vdmVtZW50IG9mIHRoZSAwIGJldHdlZW4gYWRqYWNlbnQgc3RlcHMuCuKJoSgvLSnil6sy4peH4omhKOKKouKKmuKMlTAp4oeM4oqiCiMgTWFwIHRvIGRpcmVjdGlvbnMKL-KKguKHjOKJoeKNoygiZCIgwrDCrzFfMHwidSIgwrAxXzB8InIiIMKwMF_CrzF8ImwiIMKwMF8xfOKImCkK Try it in Uiua Pad!]
<syntaxhighlight lang="uiua">
<syntaxhighlight lang="uiua">
# Solve a 15 puzzle
# Solve a 15 puzzle
Line 10,608: Line 10,610:
# Map to directions
# Map to directions
/⊂⇌≡⍣("d" °¯1_0|"u" °1_0|"r" °0_¯1|"l" °0_1|∘)
/⊂⇌≡⍣("d" °¯1_0|"u" °1_0|"r" °0_¯1|"l" °0_1|∘)
⊙⊙(&p$"_ seconds"- N now)
</syntaxhighlight>
</syntaxhighlight>
{{out}}
{{out}}