Supply component?
123456789101112
sub div-e-resto(Supply $divisor, Supply $dividendo) {
my $zip = Supply.zip($divisor, $dividendo);
(
$zip.map(-> [$a, $b] { $a div $b }),
$zip.map(-> [$a, $b] { $a % $b })
)
}
my ($s1, $s2) = div-e-resto(Supply.from-list(10 .. 19), Supply.from-list(1 .. 10));
$s1.tap: -> $val { say "s1: $val" };
$s1.tap: -> $val { say "s2: $val" }
Raku
INFO