RosettaCodeData/Task/Matrix-multiplication/Zkl/matrix-multiplication-3.zkl
2017-09-25 22:28:19 +02:00

6 lines
199 B
Text

a:=L( L(1,2,), L(3,4,), L(5,6,), L(7,8) );
b:=L( L(1,2,3,), L(4,5,6) );
printM(matMult(a,b));
fcn printM(m){ m.pump(Console.println,rowFmt) }
fcn rowFmt(row){ ("%4d "*row.len()).fmt(row.xplode()) }