function a = wilk12_eigen_right ( )

%*****************************************************************************80
%
%% WILK12_EIGEN_RIGHT returns the right eigenvectors of the WILK12 matrix.
%
%  Licensing:
%
%    This code is distributed under the GNU LGPL license.
%
%  Modified:
%
%    02 July 2011
%
%  Author:
%
%    John Burkardt
%
%  Parameters:
%
%    Output, real A(12,12), the right eigenvector matrix.
%
  a = [ ...
  0.075953934362606,  0.139678536121698, ...
  0.212972721043730,  0.286424756003626, ...
  0.349485357102525,  0.392486174053140, ...
  0.408397328102426,  0.393960067241308, ...
  0.350025473229225,  0.281131870150006, ...
  0.194509944233873,  0.098787565402021; ...
  0.047186270176379,  0.035170881219766, ...
 -0.019551243493406, -0.113663824929275, ...
 -0.229771631994320, -0.342302599090153, ...
 -0.425606879283194, -0.461118871576638, ...
 -0.441461339130489, -0.370865208095037, ...
 -0.262574394436703, -0.134619530658877; ...
  0.087498415888682,  0.002474434526797, ...
 -0.095923839958749, -0.124601769209776, ...
 -0.044875899531161,  0.121565513387420, ...
  0.312274076477727,  0.458792947263280, ...
  0.515554022627437,  0.471997957002961, ...
  0.348267903145709,  0.181505588624358; ...
  0.356080027225304, -0.163099766915005, ...
 -0.325820728704039, -0.104423010988819, ...
  0.176053383568728,  0.245040317292912, ...
  0.069840787629820, -0.207165420169259, ...
 -0.418679217847974, -0.475318237218216, ...
 -0.383234018094179, -0.206444528035974; ...
 -0.709141914617340,  0.547208974924657, ...
  0.370298143032545, -0.087024255226817, ...
 -0.174710647675812, -0.026657290116937, ...
  0.077762060814618,  0.057335745807230, ...
 -0.018499801182824, -0.070417566622935, ...
 -0.072878348819266, -0.042488463457934; ...
 -0.713561589955660,  0.677624765946043, ...
  0.144832629941422, -0.095987754186127, ...
 -0.033167043991408,  0.015790103726845, ...
  0.009303310423290, -0.002909858414229, ...
 -0.003536176142936,  0.000317090937139, ...
  0.002188160441481,  0.001613099168127; ...
  0.694800915350134, -0.717318445412803, ...
 -0.021390540433709,  0.047257308713196, ...
  0.000033398195785, -0.003862799912030, ...
  0.000145902034404,  0.000419891505074, ...
 -0.000039486945846, -0.000069994145516, ...
  0.000013255774472,  0.000029720715023; ...
  0.684104842982405, -0.728587222991804, ...
  0.028184117194646,  0.019000894182572, ...
 -0.002364147875169, -0.000483008341150, ...
  0.000145689574886,  0.000006899341493, ...
 -0.000009588938470,  0.000001123011584, ...
  0.000000762677095, -0.000000504464129; ...
  0.679348386306787, -0.732235872680797, ...
  0.047657921019166,  0.006571283153133, ...
 -0.001391439772868,  0.000028271472280, ...
  0.000025702435813, -0.000004363907083, ...
 -0.000000016748075,  0.000000170826901, ...
 -0.000000050888575,  0.000000010256625; ...
  0.677141058069838, -0.733699103817717, ...
  0.056254187307821,  0.000845330889853, ...
 -0.000600573479254,  0.000060575011829, ...
 -0.000000899585454, -0.000000703890529, ...
  0.000000147573166, -0.000000020110423, ...
  0.000000002229508, -0.000000000216223; ...
  0.675994567035284, -0.734406182106934, ...
  0.060616915148887, -0.002116889869553, ...
 -0.000112561724387,  0.000026805640571, ...
 -0.000002875297806,  0.000000236938971, ...
 -0.000000016773740,  0.000000001068110, ...
 -0.000000000062701,  0.000000000003446; ...
 -0.675318870608569,  0.734806603365595, ...
 -0.063156546323253,  0.003858723645845, ...
 -0.000198682768218,  0.000009145253582, ...
 -0.000000387365950,  0.000000015357316, ...
 -0.000000000576294,  0.000000000020662, ...
 -0.000000000000713,  0.000000000000023 ]';

  return
end
