 Usage:  y = creal (z)  
 
 Input:

  y                      n x p x d1 x ... x dn complex array 
                         
 Output:

  re                     n x p x d1 x ... x dn array real part of z 
                         
--------------------------------------------------------------
(C) MD*TECH Method and Data Technologies, 17.8.2000
