diff options
| -rw-r--r-- | challenge-060/markus-holzer/raku/ch-1.raku | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/challenge-060/markus-holzer/raku/ch-1.raku b/challenge-060/markus-holzer/raku/ch-1.raku index a870a6fb1e..8019730554 100644 --- a/challenge-060/markus-holzer/raku/ch-1.raku +++ b/challenge-060/markus-holzer/raku/ch-1.raku @@ -9,10 +9,8 @@ multi sub MAIN( Bool:D :$t ) { run-tests; } sub to-excel( PositiveInt $n ) { - state @digits = |( 'A'..'Z' ); - multi ec( Int $i where * < 26 ) { - @digits[ $i ] } + ( $i + 65 ).chr } multi ec( Int $i ) { ec( $i div 26 - 1 ) ~ ec( $i % 26 ) } |