function triangle_sides_test ( )

%*****************************************************************************80
%
%% triangle_sides_test() tests triangle_sides().
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    01 March 2019
%
%  Author:
%
%    John Burkardt
%
  fprintf ( 1, '\n' );
  fprintf ( 1, 'triangle_sides_test\n' );
  fprintf ( 1, '  MATLAB/Octave version %s\n', version ( ) );
  fprintf ( 1, '  Test triangle_sides,\n' );
  fprintf ( 1, '  which reports the lengths of the sides of a triangle.\n' );

  v = [ 0.0, 0.0;
        3.0, 0.0;
        0.0, 4.0 ];
  triangle_print ( v, '  Triangle #1:' );
  [ a, b, c ] = triangle_sides ( v );
  fprintf ( 1, '  a = %g, b = %g, c = %g\n', a, b, c );
  
  v = [ 4.0, 0.0;
        0.0, 0.0;
        0.0, 3.0 ];
  triangle_print ( v, '  Triangle #2:' );
  [ a, b, c ] = triangle_sides ( v );
  fprintf ( 1, '  a = %g, b = %g, c = %g\n', a, b, c );

  v = [ 0.1, 0.0;
        3.0, 0.2;
        0.3, 4.0 ];
  triangle_print ( v, '  Triangle #3:' );
  [ a, b, c ] = triangle_sides ( v );
  fprintf ( 1, '  a = %g, b = %g, c = %g\n', a, b, c );

  v = rand ( 3, 2 );
  triangle_print ( v, '  Triangle #4:' );
  [ a, b, c ] = triangle_sides ( v );
  fprintf ( 1, '  a = %g, b = %g, c = %g\n', a, b, c );
        
  return
end
