Anonymous user
Ethiopian multiplication: Difference between revisions
Pari/GP
(→{{header|TUSCRIPT}}: Marked incorrect.) |
(Pari/GP) |
||
Line 1,510:
in
{Show {EthiopicMult 17 34}}</lang>
=={{header|PARI/GP}}==
<lang PARI/GP>multE(a,b)={
my(t=0);
while(a,
if (bitand(a,1), t += b);
b <<= 1;
a >>= 1;
);
t
};</lang>
=={{header|Perl}}==
| |||