`newmat'
--------

newmat(ROW,COL [,[[A,B,...],[C,D,...],...]])
     :: ROW $@9T(J COL $@Ns$N9TNs$r@8@.$9$k(J.

RETURN
     $@9TNs(J
ROW,COL
     $@<+A3?t(J
A,B,C,D
     $@G$0U(J

   * ROW $@9T(J COL $@Ns$N9TNs$r@8@.$9$k(J. $@Bh(J 3 $@0z?t$,$J$$>l9g(J, $@3F@.J,$O(J 0 $@$K(J
     $@=i4|2=$5$l$k(J. $@Bh(J 3 $@0z?t$,$"$k>l9g(J, $@%$%s%G%C%/%9$N>.$5$$@.J,$+$i(J, 
     $@3F9T$,(J, $@%j%9%H$N3FMWAG(J ($@$3$l$O$^$?%j%9%H$G$"$k(J) $@$K$h$j=i4|2=$5$l(J
     $@$k(J. $@3FMWAG$O(J, $@@hF,$+$i=g$K;H$o$l(J, $@B-$j$J$$J,$O(J 0 $@$,Kd$a$i$l$k(J.
   * $@9TNs$N%5%$%:$O(J `size()' $@$GF@$i$l$k(J.
   * `M' $@$,9TNs$N$H$-(J, `M[I]' $@$K$h$jBh(J `I' $@9T$r%Y%/%H%k$H$7$F<h$j=P$9(J
     $@$3$H$,$G$-$k(J. $@$3$N%Y%/%H%k$O(J, $@$b$H$N9TNs$H@.J,$r6&M-$7$F$*$j(J, $@$$(J
     $@$:$l$+$N@.J,$r=q$-49$($l$P(J, $@B>$NBP1~$9$k@.J,$b=q$-49$o$k$3$H$K$J(J
     $@$k(J.
   * $@H!?t$N0z?t$H$7$F9TNs$rEO$7$?>l9g(J, $@EO$5$l$?H!?t$O(J, $@$=$N9TNs$N@.J,(J
     $@$r=q$-49$($k$3$H$,$G$-$k(J.

     [0] A = newmat(3,3,[[1,1,1],[x,y],[x^2]]);
     [ 1 1 1 ]
     [ x y 0 ]
     [ x^2 0 0 ]
     [1] det(A);
     -y*x^2
     [2] size(A);
     [3,3]
     [3] A[1];
     [ x y 0 ]
     [4] A[1][3];
     getarray : Out of range
     return to toplevel

$@;2>H(J
     `newvect', `size', `det'

