`type'
------

type(OBJ)
     :: OBJ $B$N(B $B7?(B ($B@0?t(B) $B$rJV$9(B.

RETURN
     $B@0?t(B

OBJ
     $BG$0U(B

   * OBJ $B$N(B $B7?$NCM$O<!$NDL$j(B.
    0
          0

    1
          $B?t(B

    2
          $BB?9`<0(B ($B?t$G$J$$(B)

    3
          $BM-M}<0(B ($BB?9`<0$G$J$$(B)

    4
          $B%j%9%H(B

    5
          $B%Y%/%H%k(B

    6
          $B9TNs(B

    7
          $BJ8;zNs(B

    8
          $B9=B$BN(B

    9
          $BJ,;6I=8=B?9`<0(B

    10
          32bit $BId9f$J$7@0?t(B

    11
          $B%(%i!<%*%V%8%'%/%H(B

    12
          GF(2) $B>e$N9TNs(B

    13
          MATHCAP $B%*%V%8%'%/%H(B

    14
          $B0l3,=R8lO@M}<0(B

    -1
          VOID $B%*%V%8%'%/%H(B

   * $B?t$N7?$r5a$a$k$K$O(B, `ntype' $B$rMQ$$$k(B.  $BITDj85$N7?$r5a$a$k$K$O(B,
     `vtype' $B$rMQ$$$k(B.

$B;2>H(B
     *Note `ntype': ntype, *Note `vtype': vtype.

