RosettaCodeData/Task/Matrix-chain-multiplication/Zkl/matrix-chain-multiplication-2.zkl
2023-07-01 13:44:08 -04:00

6 lines
255 B
Text

fcn pp(u){ // pretty print a list of lists
var letters=["A".."Z"].pump(String);
u.pump(String,
fcn(n){ if(List.isType(n)) String("(",pp(n),")") else letters[n] })
}
fcn prnt(s,u){ "%-9,d %s\n\t-->%s\n".fmt(s,u.toString(*,*),pp(u)).println() }