diff options
| author | Alexander Pankoff <ccntrq@screenri.de> | 2020-12-08 14:10:52 +0100 |
|---|---|---|
| committer | Alexander Pankoff <ccntrq@screenri.de> | 2020-12-08 14:10:52 +0100 |
| commit | 958a003d916036a4f72aa87fa5a3d5ea2717d952 (patch) | |
| tree | d87f674640a094145209b7298f93d3936344dd1c | |
| parent | b687fe1babaa737f2d4d409338262c2f9ad1618c (diff) | |
| download | perlweeklychallenge-club-958a003d916036a4f72aa87fa5a3d5ea2717d952.tar.gz perlweeklychallenge-club-958a003d916036a4f72aa87fa5a3d5ea2717d952.tar.bz2 perlweeklychallenge-club-958a003d916036a4f72aa87fa5a3d5ea2717d952.zip | |
reimplement odd
| -rwxr-xr-x | challenge-090/alexander-pankoff/perl/ch-2.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-090/alexander-pankoff/perl/ch-2.pl b/challenge-090/alexander-pankoff/perl/ch-2.pl index 51f636cc6f..eb588779f8 100755 --- a/challenge-090/alexander-pankoff/perl/ch-2.pl +++ b/challenge-090/alexander-pankoff/perl/ch-2.pl @@ -30,5 +30,5 @@ sub ethopian_mul_chain ( $a, $b ) { } sub odd($x) { - $x != ( ( $x >> 1 ) << 1 ); + $x & 1; } |