read a / rows=3 cols=3 list
 1 19 -2
354 0 28
-3 15 7
read b / rows=2 cols=2 list
78 592
4 -65
read c / rows=3 cols=2 list
16 44
-3 13
0 23
* concatenate a and c side by side
matrix ac=a|c
print ac
* stack b and c with b on top
matrix bc=(b'|c')'
print bc
* get kronecker product of a and b
matrix k=a@b
format(6f10.0)
print k / format
STOP