Monads/List monad: Difference between revisions

m
→‎{{header|Raku}}: future-proof against next release
(Added Delphi example)
m (→‎{{header|Raku}}: future-proof against next release)
Line 672:
sub divisors (Int $int) { gather for 1 .. $int { .take if $int %% $_ } }
 
put join "\n", (flat ^10).&bind(* + 3).&bind(&divisors)».&bind(*.base: 2).join: "\n";</lang>
 
{{out}}
2,392

edits