From: Marie-Claude D. <mc...@us...> - 2006-07-12 14:07:53
|
Update of /cvsroot/mupad-combinat/MuPAD-Combinat/experimental In directory sc8-pr-cvs7.sourceforge.net:/tmp/cvs-serv12143 Modified Files: 2005-09-08-David.mu Log Message: Use setPrintMaxSize to always display large matrices Index: 2005-09-08-David.mu =================================================================== RCS file: /cvsroot/mupad-combinat/MuPAD-Combinat/experimental/2005-09-08-David.mu,v retrieving revision 1.12 retrieving revision 1.13 diff -C2 -d -r1.12 -r1.13 *** 2005-09-08-David.mu 20 Dec 2005 15:17:03 -0000 1.12 --- 2005-09-08-David.mu 12 Jul 2006 14:07:40 -0000 1.13 *************** *** 847,852 **** tensorElementToMatrix := proc(x: M::M::tensorSquare) begin ! Dom::Matrix(K)(M::G::dimension $2, table( (rank(op(term,[2,1])), rank(op(term,[2,2]))) = op(term,1) $ term in x)) end_proc: show_info(" view(e(1)) -- view the coproduct of e(1) as a matrix"): --- 847,855 ---- tensorElementToMatrix := proc(x: M::M::tensorSquare) + local Matrix; begin ! Matrix := Dom::Matrix(K); ! Matrix::setPrintMaxSize(max(Matrix::printMaxSize,M::G::dimension^2)); ! Matrix(M::G::dimension $2, table( (rank(op(term,[2,1])), rank(op(term,[2,2]))) = op(term,1) $ term in x)) end_proc: show_info(" view(e(1)) -- view the coproduct of e(1) as a matrix"): |