11 lines
205 B
Plaintext
11 lines
205 B
Plaintext
// Prints an X×X multiplication table
|
||
DESIGNA n VT X
|
||
|
||
DONICVM i VT I VSQVE n + I FACE {
|
||
DESIGNA line VT ""
|
||
DONICVM k VT I VSQVE n + I FACE {
|
||
DESIGNA line VT line : i * k : " "
|
||
}
|
||
DICE(line)
|
||
}
|