function st_to_msm_test01 ( )

%*****************************************************************************80
%
%% st_to_msm_test01() tests st_to_msm().
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    02 November 2008
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'st_to_msm_test01():\n' );
  fprintf ( 1, '  Use ST_TO_MSM to read an ST file,\n' );
  fprintf ( 1, '  and create a MATLAB Sparse Matrix.\n' );

  input_file = 'st_to_msm_test01.st';

  b = st_to_msm ( input_file );

  disp ( b )

  return
end
