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)
|
||
}
|