 Usage:  out = givenrot (in)  
 
 Input:

  in                     p x p matrix 
                         Outout 
                         
  al                     p x (p-1)/2 vector 
                         
--------------------------------------------------------------
(C) MD*TECH Method and Data Technologies, 17.8.2000
