diff options
| author | holli-holzer <holli.holzer@gmail.com> | 2019-09-17 22:06:54 +0200 |
|---|---|---|
| committer | holli-holzer <holli.holzer@gmail.com> | 2019-09-17 22:06:54 +0200 |
| commit | a5f2fcebc521f4200e04947ccd454ab35e317be6 (patch) | |
| tree | fab56428024a8590cedad246183f2c7fa7e04615 | |
| parent | 62a8eaa47b92e0808f24cbdd89c29a164a168c62 (diff) | |
| download | perlweeklychallenge-club-a5f2fcebc521f4200e04947ccd454ab35e317be6.tar.gz perlweeklychallenge-club-a5f2fcebc521f4200e04947ccd454ab35e317be6.tar.bz2 perlweeklychallenge-club-a5f2fcebc521f4200e04947ccd454ab35e317be6.zip | |
...
| -rw-r--r-- | challenge-026/markus-holzer/perl6/ch-2.p6 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-026/markus-holzer/perl6/ch-2.p6 b/challenge-026/markus-holzer/perl6/ch-2.p6 index 68e4321c19..d4a6529a4f 100644 --- a/challenge-026/markus-holzer/perl6/ch-2.p6 +++ b/challenge-026/markus-holzer/perl6/ch-2.p6 @@ -2,8 +2,8 @@ use Test; # Rakus trigonometry functions operate on radians. So we must convert degrees to radians. # That's simple enough using a new postfix operator and high school math. -multi sub postfix:<°>( Numeric $degrees ) is looser(&prefix:<->) returns Real { $degrees * π / 180 } - +multi sub postfix:<°>( Numeric $degrees ) returns Real { $degrees * π / 180 } + # This implements the "simple" version of the algorithm as described on Wikipedia. # There already is an implementation of the complex math version (that uses `i`) # on Rosetta-Code https://rosettacode.org/wiki/Averages/Mean_angle#Perl_6 |