Wave function collapse: Difference between revisions

 

=={{header|C}}==

#include <stdlib.h>

#include <string.h>

free(tile);

exit(0);

 

Note: here we use <code>R</code> where J used <code>i</code>, because we use i as an index/loop counter (other than <code>m</code>, <code>y</code> and <code>i</code>, the comments on [[#J|the j implementation]] should be directly relevant here). Also, when assembling the result at the end, it was convenient to treat the block overlap issue during indexing.

=={{header|J}}==

 

wfc=: {{

adj=: y#.y|"1(y#:,i.y)+"1/<:3 3#:1 3 5 7

lap=. {{ y#~(+0=i.@#)-.;m$<n{.1 }}

({:y)lap({:$m)"1 ({.y)lap({:$m),/"2,/0 2 1 3|:(y$i){m

 

We work with the 3x3 partial tiles, and the larger 17x17 tile which we are randomly generating. (17x17 because every 3x3 block contributes 2x2 pixels to the result and along a horizontal and vertical edge row and column of the tile, the 3x3 blocks contribute an additional row and column of pixels.)

For task purposes here, we will use space to represent a white pixel and "#" to represent a black pixel. Also, because characters are narrow, we will insert a space between each of these "pixels" to better approximate a square aspect ratio.

 

┌──────┬──────┬──────┬──────┬──────┐

│ │ │ # │ # │ # │

│ # # # # # # │# # # # # # # # # # # # # # # │# # # # # # # # # # # │

│ # # # # │ # # # # # # │ # # # # # │

 

=={{header|Perl}}==

{{trans|Raku}}

use experimental 'for_list';

 

my @bdims = (5,3,3);

my @size = (8,8);

{{out}}

<pre> # # # #

{{libheader|Phix/online}}

You can run this online [http://phix.x10.mx/p2js/wfc.htm here].<br>

<span style="color: #000080;font-style:italic;">--

-- demo\rosetta\WaveFunctionCollapse.exw

<span style="color: #000000;">main</span><span style="color: #0000FF;">()</span>

 

=== trivial ditty ===

more randomly, it would soon fail with no tile matching >=3 neighbours.<br>

(lowest entropy would also fail b/c it'd favour 2 no conn over 3 with)

<span style="color: #008080;">with</span> <span style="color: #008080;">javascript_semantics</span>

<span style="color: #008080;">include</span> <span style="color: #000000;">builtins</span><span style="color: #0000FF;">/</span><span style="color: #000000;">unicode_console</span><span style="color: #0000FF;">.</span><span style="color: #000000;">e</span>

<span style="color: #000000;">make_rows</span><span style="color: #0000FF;">(</span><span style="color: #000000;">20</span><span style="color: #0000FF;">)</span>

 

=={{header|Raku}}==

{{trans|C}}

 

my @Blocks = ( [ <0 0 0>,

my @tile = wfc @Blocks».List.flat, @bdims, @size ;

 

{{out}}

<pre>

 

The following is a translation of his C version before macros were added. Wren doesn't support macros and, whilst I could use functions instead, I decided on efficiency grounds to leave it as it is.

 

var rand = Random.new()

}

System.print()

 

{{out}}