function value = chvec_eq ( c1, c2 )

%*****************************************************************************80
%
%% chvec_eq() is TRUE if one character vector equals another.
%
%  Licensing:
%
%    This code is distributed under the MIT license.
%
%  Modified:
%
%    16 May 2021
%
%  Author:
%
%    John Burkardt
%
%  Input:
%
%    char C1(N1), C2(N2), two character vectors.
%
%  Output:
%
%    logical VALUE: is TRUE if N1==N2 and C1 == C2 for all indices.
%
  value = false;

  n1 = length ( c1 );
  n2 = length ( c2 );

  if ( n1 ~= n2 )
    return
  end

  for i = 1 : n1

    if ( c1(i) ~= c2(i) )
      return;
    end

  end

  value = true;

  return
end
