xsort:

-------------------------------------------------------------------------------
   Sort columns of eigenvalues so that the same eigenvalue is on the same row.
   Sort by real parts. If a complex root is matched with a real root it
   checks to see if the complex pair matches another real root, otherwise
   it matches the complex root with the nearest complex root.
-------------------------------------------------------------------------------
   Form:
   s = xsort( r )
-------------------------------------------------------------------------------

   ------
   Inputs
   ------
   r            (n,m)  m columns of n eigenvalues

   -------
   Outputs
   -------
   s            (n,m)  m columns of n eigenvalues sorted

-------------------------------------------------------------------------------

Children: