Deceptive numbers: Difference between revisions
Content added Content deleted
(Added Algol W) |
(→UNIX Shell: make it work with zsh's native operator precedence, too) |
||
| Line 1,342: | Line 1,342: | ||
while is "$3 > 0" |
while is "$3 > 0" |
||
do |
do |
||
set -- "$(($1 * (($ |
set -- "$(($1 * (-($3 & 1) & ($2 ^ 1) ^ 1) % $4))" "$(($2 * $2 % $4))" "$(($3 >> 1))" "$4" |
||
done |
done |
||
return "$(($1 != 1))" |
return "$(($1 != 1))" |
||