`conj', `real', `imag'
----------------------

real(COMP)
     :: COMP $B$N<B?tItJ,(B.

imag(COMP)
     :: COMP $B$N5u?tItJ,(B.

conj(COMP)
     :: COMP $B$N6&LrJ#AG?t(B.

RETURN COMP
     $BJ#AG?t(B

   * $BJ#AG?t$KBP$7(B, $B<BIt(B, $B5uIt(B, $B6&Lr$r5a$a$k(B.

   * $B$3$l$i$O(B, $BB?9`<0$KBP$7$F$bF/$/(B.

     [111] A=(2+@i)^3;
     (2+11*@i)
     [112] [real(A),imag(A),conj(A)];
     [2,11,(2-11*@i)]

