function chrpak_test ( )

%*****************************************************************************80
%
%% CHRPAK_TEST tests the CHRPAK library.
%
%  Licensing:
%
%    This code is distributed under the GNU LGPL license.
%
%  Modified:
%
%    16 December 2018
%
%  Author:
%
%    John Burkardt
%
  addpath ( '../chrpak' );

  timestamp ( );
  fprintf ( 1, '\n' );
  fprintf ( 1, 'CHRPAK_TEST:\n' );
  fprintf ( 1, '  MATLAB version\n' );
  fprintf ( 1, '  Test the CHRPAK library.\n' );

  chrpak_test001 ( );
  chrpak_test005 ( );
  chrpak_test006 ( );

  ch_cap_test ( );
  ch_is_digit_test ( );
  ch_is_isbn_digit_test ( );
  ch_low_test ( );
  ch_to_digit_test ( );

  chrpak_test022 ( );

  ch_to_rot13_test ( );
  ch_uniform_test ( );
  digit_to_ch_test ( )

  chrpak_test046 ( );

  i4_length_test ( );
  i4_to_binhex_test ( );
  i4_to_isbn_digit_test ( );
  i4_to_nunary_test ( );

  chrpak_test057 ( );

  i4_to_unary_test ( );
  i4_uniform_ab_test ( );

  i4vec_print_test ( );

  chrpak_test066 ( );
  chrpak_test067 ( );

  isbn_digit_to_i4_test ( );

  chrpak_test083 ( );
  chrpak_test090 ( );
  chrpak_test091 ( );

  s_digits_count_test ( );

  chrpak_test1015 ( );
  chrpak_test102 ( );
  chrpak_test105 ( );

  s_quote_test ( );

  chrpak_test115 ( );
  chrpak_test1155 ( );
  chrpak_test1225 ( );
  chrpak_test1227 ( );
  chrpak_test1255 ( );

  s_to_caesar_test ( );
  s_to_digits_test ( )
  s_to_format_test ( );
  s_to_isbn_digits_test ( );
  s_to_l4_test ( );
  s_to_rot13_test ( );
  s_word_count_test ( );
  s_word_extract_first_test ( );
%
%  Terminate.
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'CHRPAK_TEST:\n' );
  fprintf ( 1, '  Normal end of execution.\n' );
  fprintf ( 1, '\n' );
  timestamp ( );

  rmpath ( '../chrpak' );

  return
end
