%% NSASM_SMALL_TEST shows how to call NSASM with the "small" data.
%
%  Modified:
%
%    05 September 2006
%
%  Author:
%
%    John Burkardt
%
  clear

  timestamp ( );

  fprintf ( 1, '\n' );
  fprintf ( 1, 'NSASM_SMALL_TEST:\n' );
  fprintf ( 1, '  Call NSASM_INTERFACE with the "small" test data.\n' );

  p_file = 'small_p.txt';
  t_file = 'small_t.txt';
  e_file = 'small_e.txt';
  np0 = 9;
  nu = 100;

  nsasm_interface ( p_file, t_file, e_file, np0, nu );

  fprintf ( 1, '\n' );
  fprintf ( 1, 'NSASM_SMALL_TEST:\n' );
  fprintf ( 1, '  Normal end of execution.\n' );

  fprintf ( 1, '\n' );
  timestamp ( );