function file_exist_test ( )

%*****************************************************************************80
%
%% file_exist_test() tests file_exist().
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    06 June 2007
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'file_exist_test\n' );
  fprintf ( 1, '  file_exist() is true if a file exists.\n' );
  fprintf ( 1, '\n' );
  fprintf ( 1, '  Exist?    FILENAME\n' );
  fprintf ( 1, '\n' );

  filename = 'filum_test.m';
  fprintf ( 1, '  %d  %s\n', file_exist ( filename ), filename );

  filename = 'filum.html';
  fprintf ( 1, '  %d  %s\n', file_exist ( filename ), filename );

  filename = 'rabbit.txt';
  fprintf ( 1, '  %d  %s\n', file_exist ( filename ), filename );

  filename = 'make.money.fast';
  fprintf ( 1, '  %d  %s\n', file_exist ( filename ), filename );

  return
end
