9 lines
205 B
Text
9 lines
205 B
Text
(var pad-num (comp str (pad-left " " 4)))
|
|
|
|
(join "\n"
|
|
(for y (range 1 13)
|
|
(... str "x" (pad-num y)
|
|
(for x (range 1 13)
|
|
(if (> y x)
|
|
" "
|
|
(pad-num (* x y)))))))
|