function filum_test225 ( )

%*****************************************************************************80
%
%% filum_test225() tests file_sequence_size().
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    13 October 2008
%
%  Author:
%
%    John Burkardt
%
  filename = 'data_100.txt';

  fprintf ( 1, '\n' );
  fprintf ( 1, 'filum_test225():\n' )
  fprintf ( 1, '  file_sequence_size() "sizes" the files in a file sequence.\n' );

  fprintf ( 1, '\n' );
  fprintf ( 1, '  Examining files in sequence starting with:\n' );
  fprintf ( 1, '    "%s".\n', filename );

  [ file_dim, file_num ] = file_sequence_size ( filename );

  fprintf ( 1, '\n' );
  fprintf ( 1, '  Number of files:      %d\n', file_num );
  fprintf ( 1, '  Number of data items: %d\n', file_dim );

  return
end
