`newvect'
---------

newvect(LEN[,LIST])
     :: Ĺ LEN Υ٥ȥ.

RETURN
     ٥ȥ
LEN
     
LIST
     ꥹ

   * Ĺ LEN Υ٥ȥ.  2 ʤ, ʬ 0 
     .  2 , ǥåξʬ, 
     ꥹȤγǤˤ. Ǥ, Ƭ˻Ȥ, 
     ­ʤʬ 0 .
   * ٥ȥʬ,  0 ʬ LEN-1 ʬȤʤ. ( 1 ʬ
     ǤϤʤ. )
   * ꥹȤϳʬ, ݥ󥿤éˤäƥ󥷥˸Ƥӽ
     ΤФ, ٥ȥϳʬʬΥ 
     displacement (Ѱ)ˤäƥॢǸƤӽФ, η, 
     ʬΥ֤礭ʺФƤ. ʬ, ꥹȤ
     , ʬ̤˽äƻ֤褦ˤʤ뤬, ٥ȥ
     , ʬ̤˰¸ۤܰǤ.
   * Asir Ǥ, ĥ٥ȥ, ٥ȥζ̤Ϥʤ. 򺸤ݤ
     нĥ٥ȥȤߤʤ뤷, ݤв٥ȥȤߤʤ.
   * ٥ȥĹ `size()' ˤä.
   * ȡΰȤƥ٥ȥϤ, Ϥ줿ȡ, Υ٥
     ʬ񤭴뤳ȤǤ.

     [0] A=newvect(5);
     [ 0 0 0 0 0 ]
     [1] A=newvect(5,[1,2,3,4,[5,6]]);
     [ 1 2 3 4 [5,6] ]
     [2] A[0];
     1
     [3] A[4];
     [5,6]
     [4] size(A);
     [5]
     [5] def afo(V) { V[0] = x; }
     [6] afo(A)$
     [7] A;
     [ x 2 3 4 [5,6] ]


     `newmat', `size'

