RosettaCodeData/Task/Long-multiplication/J/long-multiplication-1.j

6 lines
122 B
Plaintext

digits =: ,.&.":
polymult =: +//.@(*/)
buildDecimal=: 10x&#.
longmult=: buildDecimal@polymult&digits