function a = hess5_eigen_right ( )

%*****************************************************************************80
%
%% HESS5_EIGEN_RIGHT returns the right eigenvectors of the HESS5 matrix.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    14 March 2018
%
%  Author:
%
%    John Burkardt
%
%  Output:
%
%    complex A(5,5), the right eigenvector matrix.
%
  a = [ ...
  -0.4048+0.0000i, -0.2788-0.1981i, -0.2788+0.1981i,  1.0000+0.0000i,  1.0000+0.0000i; ...
   1.0000+0.0000i,  1.0000+0.0000i,  1.0000+0.0000i,  0.0372+0.0000i,  0.5780+0.0000i; ...
   0.0565+0.0000i, -0.0712-0.9695i, -0.0712+0.9695i, -0.2064+0.0000i,  0.1887+0.0000i; ...
   0.1687+0.0000i, -0.3560+0.6933i, -0.3560-0.6933i, -0.5057+0.0000i,  0.1379+0.0000i; ...
  -0.8231+0.0000i,  0.1938-0.0411i,  0.1938+0.0411i, -0.0966+0.0000i,  0.0139+0.0000i ];

  return
end

