RosettaCodeData/Task/Least-common-multiple/Mathematica/least-common-multiple.math