function A = biharmonic_fd2d_stencil ( )

%*****************************************************************************80
%
%% biharmonic_fd2d_stencil() returns a 5x5 stencil for the biharmonic equation.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    30 May 2021
%
%  Author:
%
%    John Burkardt
%
%  Output:
%
%    real A(5,5): the stencil.
%
  A = [ 0,  0,  1,  0,  0;
        0,  2, -8,  2,  0;
        1, -8, 20, -8,  1;
        0,  2, -8,  2,  0;
        0,  0,  1,  0,  0 ];

  return
end

