Multiplication tables: Difference between revisions
→{{header|AppleScript}}
Line 348:
script mf
on col(x)
{x & my concatMap(my mClosure(row of its mf, {x:x}), its rng)}
end col
on row(y)
if y < its x then
{""}
else
{((its x) * y) as text}
end if
▲ end tell
end row
end script
Line 387 ⟶ 388:
intercalate(linefeed, map(mClosure(mf's showLine, {mf:mf}), lstTable))
end showTable
|