Periodic table: Difference between revisions

Content added Content deleted
(Add Perl, move Raku)
Line 396: Line 396:
=={{header|Raku}}==
=={{header|Raku}}==
<lang perl6>my $b = 18;
<lang perl6>my $b = 18;
my @offset = (16, 10, 10, (2*$b)+1, (-2*$b)-15, (2*$b)+1, (-2*$b)-15);
my @offset = (16, 10, 10, ($b)+1, (-$b)-15, ($b)+1, (-$b)-15);
my @span = flat ^8 Zxx <1 3 8 44 15 17 15 15>;
my @span = flat ^8 Zxx <1 3 8 44 15 17 15 15>;