function a = wilk04_inverse ( )

%*****************************************************************************80
%
%% WILK04_INVERSE returns the inverse of the WILK04 matrix.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    25 January 2015
%
%  Author:
%
%    John Burkardt
%
%  Output:
%
%    real A(4,4), the matrix.
%
  a = [ ...
   0.000000000001094E+16, ...
  -0.000000013391962E+16, ...
   0.000114732803288E+16, ...
  -1.153978022391245E+16; ...
   0.000000000000000, ...
   0.000000000001397E+16, ...
  -0.000000011973129E+16, ...
   0.000120425263952E+16; ...
   0.000000000000000, ...
   0.000000000000000, ...
   0.000000000001052E+16, ...
  -0.000000010583927E+16; ...
   0.000000000000000, ...
   0.000000000000000, ...
   0.000000000000000, ...
   0.000000000001404E+16 ];

  return
end
