Monads/List monad: Difference between revisions
Content added Content deleted
(Added Wren) |
SqrtNegInf (talk | contribs) m (→{{header|Raku}}: remove un-needed '*.') |
||
| Line 600: | Line 600: | ||
sub divisors (Int $int) { gather for 1 .. $int { .take if $int %% $_ } } |
sub divisors (Int $int) { gather for 1 .. $int { .take if $int %% $_ } } |
||
put join "\n", (flat ^10).&bind(* + 3).&bind( |
put join "\n", (flat ^10).&bind(* + 3).&bind(&divisors)».&bind(*.base: 2);</lang> |
||
{{out}} |
{{out}} |
||