Averages/Pythagorean means: Difference between revisions
m
→{{header|Perl 6}}: fix markup
Thundergnat (talk | contribs) m (→{{header|Perl 6}}: fix markup) |
|||
Line 2,242:
{{works with|Rakudo|2015.12}}
<lang
sub G { ([*] @_) ** (1 / @_) }
sub H { @_ / [+] 1 X/ @_ }
|