Anonymous user
Zebra puzzle: Difference between revisions
→{{header|Raku}}: update some match multi subs
(→{{header|Raku}}: update some match multi subs) |
|||
Line 6,135:
#| find all possible solutions for pairs of houses with
#| properties %
multi sub match(@houses, :Left-Of(%
for 1 ..^ @houses {
my
temp @houses[$idx-1].Hash ,= %a;▼
if plausible(%left-house, %a) &&
temp %right-house ,= %b;
take @houses;
}
Line 6,155 ⟶ 6,157:
#| find all possible houses that match the given properties
multi sub match(@houses, *%props) {
for @houses.grep({plausible($_, %props)}) ->
take @houses;
}
| |||