Solve the no connection puzzle: Difference between revisions

(→‎{{header|Raku}}: fix up internal links)
Line 2,200:
X :: 1..N,
Graph =
{{1,23}, {1,34}, {1,45},
{2,1}, {2,34}, {2,5}, {2,6},
{3,21}, {3,4}, {3,6}, {3,7},
{4,1}, {4,2}, {4,3}, {4,65}, {4,7}, {4,8},
{5,1}, {5,2}, {5,34}, {5,6}, {5,7}, {5,8},
{6,2}, {6,3}, {6,4}, {6,5}, {6,7}, {6,8},
{7,3}, {7,4}, {7,6}, {7,85},
{8,54}, {8,65}, {8,76}},
 
all_distinct(X),
Line 2,237:
<pre>
Picat> no_connection_puzzle(_X)
[23,54,87,61,38,12,45,76]
 
23 54
/|\ /|\
/ | X | \
/ |/ \| \
87 - 61 - 38 - 12
\ |\ /| /
\ | X | /
\|/ \|/
45 76
 
 
</pre>
 
495

edits